Markierte Zeile Kopieren und einfügen
30.06.2022 08:04:33
Christoph
Kann mir da Bitte wer weiterhelfen.
Ich möchte eine Markierte Zelle in eine andere geschlossene Arbeitsmappe kopieren und immer die nächste frei Zeile verwenden.
Soweit bin ich schon nur.
Sub Geschlossene_Arbeitsmappe()
Dim sPfad As String
Dim wbQuelle As Workbook
'Dateipfad der Quelldatei
sPfad = "XY"
'Arbeitsmappe öffnen
Set wbQuelle = Workbooks.Open(sPfad)
'Daten kopieren und einfügen
'Arbeitsmappe schließen
wbQuelle.Close SaveChanges:=True
End Sub