aktuell arbeite ich an einem Code, der aus einer anderen Datei, alle nicht-leeren Zellen einer Spalte, eines variablen Datenblatts kopiert. Das funktioniert auch soweit.
Was aktuell passiert ist, dass ich jedes Mal beim Ausführen des Makros im Dialogfenster die richtige Datei aussuchen muss. Gibt es da einen Weg drum herum? Ich möchte also praktisch, dass Excel die Datei eigenständig öffnet und schließt ohne, dass ich das mitbekomme. Ich habe mich bereits an der getObject Methode versucht und bin kläglich gescheitert. Das hier ist mein Code bisher:
Sub Kopieren()
Dim variable As String, wb As String
variable = ActiveSheet.Range("B2").Text
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.Dialogs(xlDialogOpen).Show
'C:\\Laufwerk\Ursprungsdatei.xlsm'
wb = ActiveWorkbook.Name
Workbooks(wb).Sheets(variable).Range("A10:A200").SpecialCells(xlCellTypeFormulas, 1).Copy
ThisWorkbook.Sheets("Arbeitsdatei").Range("X5").PasteSpecial Paste:=xlValues, Operation:=xlNone, _
_
SkipBlanks:= _
True, Transpose:=False
Application.CutCopyMode = False
Workbooks(wb).Close savechanges:=False
Application.DisplayAlerts = True
End Sub
Über Vorschläge würde ich mich sehr freuen!
Viele Grüße
Kathrin