Abend zusammen,
ich suche eine Möglichkeit, um Daten auf direktem Wege aus einer Mappe (Quelle) in eine andere Mappe zu kopieren/zu übertragen (und jetzt kommt das besondere)
- ich möchte die Zieldatei nicht öffnen und
- es soll der Passwortschutz nicht aufgehoben werden müssen.
Es sollen also Daten in eine PW-geschützte Mappe übertragen werden, deren Speicherort feststeht.
Ich stelle mir so etwas ähnliches vor wie es ja in einer Mappe von einem Sheet zum anderen möglich ist und zwar so:
Sub KopierenOhneZwischenablage1()
'Kopieren von Daten ohne Sheet zu öffnen oder select zu nutzen
With Range("A1") ' das ist die Quelle
Sheets("Ziel").Range("A1").Value = .Value ' das ist das Ziel
With Range("A2") ' Quelle
Sheets("Ziel").Range("A2").Value = .Value ' Ziel
End With
End With
End Sub
Meine Frage ist also, ob es eine solche Lösung auch für die Übertragung von Daten von einer (geöffneten) Datei in eine andere (geschlossene Datei gibt (als von Workbook zu Workbook) ?Danke für Eure Ideen oder sogar Lösungen!
Viele Grüße
Dietmar aus Aachen