Office: (Office 2019) Excel VBA aus einem Formular Daten in eine geschlossen Arbeitsmappe zu übertragen

Hallo, ich bräuchte mal eure Hilfe
Ich habe ein Solaranlage, wo ich jede Woche neu Daten bekomme, die ich in der Arbeitsmappe
SolarStrom 2020_01_01 speichere. Die Daten werden in eine Formular getragen und gespeichert Nun möchte ich Daten auch in der Arbeitsmappe Vergleichs_Jahre_1 auch speichern. Ich bekomme es hin, wenn ich die beide Arbeitsmappen geöffnet habe, in ein Modul Wie bekomme man es hin, dass wenn die Arbeitsmappe SolarStrom 2020_01_01 geöffnet ist und die andere Arbeitsmappe geschossen ist, in einem Formular.
Mein Modul
Sub kopieren_einfach()
Workbooks("Solar Strom 2020_01_01.xlsm").Worksheets("2020").Range("A1:J55").Copy _
Workbooks("Vergleichstabelle_Jahre_1.xlsm").Worksheets("Jahr2020").Range("A1")
End Sub
Vielleicht könnt ihr mir helfen.
Gruß Klaus-Peter

:)

 

Hallo Klaus-Peter,

das geht nicht.

Bitte berücksichtige das Themen die Erledigt sind als Erledigt markiert werden können. Also mache es unten links mit Klick auf den Schalter "als erledigt setzen", falls Problem gelöst.
Der Zustand des Beitrages wird dann in der Übersicht angezeigt und man braucht sich diese Beiträge nicht mehr ansehen.





Meine Homepage Homeseite - Hajo's Excelseiten

 

Hallo Klaus-Peter,

HaJo hat ein bisschen Recht.
Man könnte schon in geschlossene Dateien Daten übertragen.
Dafür müsste man es aber anders - und vor allem komplizierter - programmieren.

Was hältst du denn von dieser Alternative:

1. deine Datei "Vergleichstabelle_Jahre_1.xlsm" per Code öffnen
2. deinen Code zum Kopieren + Einfügen verwenden
3. deine Datei "Vergleichstabelle_Jahre_1.xlsm" per Code wieder schließen


Als Code würde das so aussehen:

Code:

Wichtig!
Zwischen PFAD und Vergleichstabelle_Jahre_1.xlsm MUSS ein (Backslash) stehen!
Dieser wird hier leider nicht im Code angezeigt.

Anstelle von PFAD musst du den Pfad eintragen, in dem die Datei gespeichert ist
In der letzten Zeile ist die Angabe von PFAD nicht erforderlich, da die DAtei ja schon geöffnet ist.
Und mit dem Parameter True wir die Datei auch gleich automatisch gespeichert.

Hilfts?

Wenn nicht, dann spiel mal ein wenig mit dem Code. Ich hab das jetzt "auswendig", ohne zu testen aufgeschrieben.
Vielleicht hab ich den einen oder anderen Befehl falsch angegeben.

Ciao
Thorsten

 

Hallo,

du kannst die Mappe auch unsichtbar öffnen.

https://www.herber.de/forum/archiv/1...t_oeffnen.html

Aber du musst auf jeden Fall vor dem Öffnen prüfen, ob diese nicht bereits geöffnet ist. Und wenn dies der Fall ist, diese am Ende nicht schließen.

 

Sorry, aber Hajo hat einfach Recht. Das was der TS will, geht nicht. Man kann auf keine Datei zugreifen (sichtbar oder unsichtbar mit welcher Methode auch immer: ADO, Powerquery usw. usf.), ohne sie in rgendeiner Art und Weise zu öffnen.

 

Mit Power Query kannst du zwar nicht in andere Mappen schreiben, aber von ungeöffneten Mappen lesen.

Du kannst mit Power Query sogar Daten von der gesicherten Version der Mappe lesen, die du gerade geöffnet hast.

 

\@Ws-53: Ja, und. Die Datei wird geöffnet im Sinne von Lesen, auch wenn ein anderes Programm sie schreibend geöffnet hat. Das ändert nichts daran, dass Hajo die Frage umfassend beantwortet hat. Die Datei wird von PQ geöffnet, sie bleibt nicht "ungeöffnet". Das ist einfach falsch!

Alles andere ist Chit Chat (in Englisch viel schöner wg. Chit *grins )