ich habe eine Frage zu folgendem Code:
Private Sub sheetimport()
Dim folder As Variant, wbAct As Workbook, wbNeu As Workbook
folder = Application.GetOpenFilename
If folder = False Then Exit Sub
Set wbAct = ActiveWorkbook
Set wbNeu = Workbooks.Open(folder)
wbNeu.Sheets("PV_system_survey").Copy Before:=wbAct.Sheets("Data_end")
wbAct.Sheets("Evaluation").Activate
wbNeu.Close False
MsgBox ("The sheet was importet successfully!")
End Sub
Mit diesem Code importiere ich ein Tabellenblatt mit einem vorgegebenen Namen (in diesem Fall "PV_system_survey") in meine aktive Arbeitsmappe. Mein Ziel ist es jedoch ein Tabellenblatt aus der geöffneten Mappe auswählen zu können, da nicht jedes Tabellenblatt den gleichen Namen trägt.
Kann man das überhaupt realisieren?
Über Hilfe würde ich mich sehr freuen.
Gruß
Sascha