Hallo Gast54888
Ich habe es mir jetzt erst einmal angeschaut und denke das ich damit erst einmal klar komme.
Was mir aufgefallen ist, ist das ich die beiden Sheets in 2 unterschiedlichen Dateien habe (Workbooks)
Also muss ich noch die verschiedenen Workbooks ansprechen und nicht nur die Sheets.
‘ Dim QPath As String ‘ Weiß ich noch nicht wie es verwendet wird und ob ich es brauche
Dim QName As Workbook
Dim QSheet As Worksheet
‘ Dim ZPath As String ‘ Weiß ich noch nicht wie es verwendet wird und ob ich es brauche
Dim ZName As String
Dim ZSheet As String
'Set QPath = ActiveWorkbook.Path ‘ Weiß ich noch nicht wie es verwendet wird und ob ich es brauche
Set QName = ActiveWorkbook 'Erstellt sich aus aktiver Quelldatei "Datenexport"
Set QSheet = ActiveSheet 'Erstellt sich aus aktiven Quellsheet "Meldung"
'ZPath = "D:\Users\YYY\XXXXXXXXX\Desktop\Rohdaten\Dokumentation\" ‘ Weiß ich noch nicht wie es verwendet wird und ob ich es brauche
ZName = "Test_Makro_Dokumentation_Test_Datenblatt.xlsm" ‘Zieldatei Dokumentation
ZSheet = "Dokumentation Test" ‘ZielSheet Dokumentation
Kann ich jetzt einfach die Zeilen in:
With Worksheets(ZName & ZSheet) und
With Worksheets(QName & QSheet) umbenennen, oder muss ich das anders machen?
Danke für deine Hilfe
Bernd
|