Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
944to948
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
944to948
944to948
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Daten übetragen

Daten übetragen
26.01.2008 18:05:10
Gerhard
Hallo zusammen,
Bitte um Hilfe…
Wie kann ich Messdaten von der momentan geöffneten Arbeitsmappe Quelle)aus dem
1.Registerblatt in eine geschlossene Arbeitsmappe (Ziel) in das 2.Registerblatt
mit einem Makro automatisch übernehmen ?
Details:
Die Quell Dateien sowie das 1.Registerblatt haben dynamische Namen
Die zu übertragenden Messdaten die im 1. Registerblatt vorhanden sind,
liegen im Bereich von A1 bis F5000
es sollen also die kompletten Spalten A bis F übernommen werden.
Die geschlossene Zieldatei liegt im Verzeichnis:
E:\Messdaten\Vorlage.xls und soll geöffnet werden und die Messdaten
in das 2.Registerblatt übernommen werden.
Die Quelldatei soll ohne speichern geschlossen werden und die
Zieldatei Vorlage.xls mit den neuen Daten soll geöffnet bleiben!
Vielen Dank für Eure Hilfe
Gruß Gerhard

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten übertragen
26.01.2008 18:28:00
Hajo_Zi
Hallo Gerhard,
in geschlossene Arbeitsmappen kann nichts geschrieben werden.

AW: Daten übertragen
26.01.2008 18:37:11
Gerhard
Hi,
Ich habe doch in meinem Betrag geschrieben, dass die geschlossene Datei
Vorlage.xls mit einem Makro geladen werden sollte und dann die Messdaten
übernommen werden sollten!
Gruß Gerhard

AW: Daten übertragen
26.01.2008 18:42:00
Original
Hi,

Sub til()
Const ZIEL As String = "E:\Messdaten\Vorlage.xls"
Dim wbZ As Workbook
Set wbZ = Workbooks.Open(ZIEL)
With ThisWorkbook
.Sheets(1).Range("A1:F5000").Copy wbZ.Sheets(2).Range("A1")
.Saved = True
.Close
End With
Set wbZ = Nothing
End Sub


mfg Kurt

Anzeige
AW: Daten übertragen
26.01.2008 19:15:00
Gerhard
Hallo Kurt,
Makro funktioniert erst einmal.
Wie muss das Makro aussehen wenn:
1. das Makro über eine eigene Symbolleiste gestartert wird?
es erscheint momentan Fehlermeldung: Objekt unterstützt diese Eigenschaft der Methode nicht!
2. wenn die Datei Vorlage.xls bereits geöffnet ist sollte nach Drücken der Symboltaste ebenfalls Daten
von der Quelldatei in die Zieldatei übertragen werden!
Vielen Dank
Gruß
Gerhard

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige