Hi habe folgende Funktion:

Sub NeueArbeitsmappeTutorial()

    Dim MeineArbeitsmappe As Workbook
    
    Set MeineArbeitsmappe = Workbooks.Add
    
    ActiveWindow.Caption = "MeineArbeitsmappe"
    
    MeineArbeitsmappe.SaveAs "C:\Users\Krause\Desktop\Projekt VBA\MeineArbeitsmappe"   

End Sub

Ich möchte gerne, dass die Mappe nach einer Zelle meines aktuellen Projektes benannt wird.

MeineArbeitsmappe.SaveAs "C:\Users\Bibo\Desktop\Projekt VBA\Worksheets("Sheet1").Range("A1").select"  funktioniert leider nicht