Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 09:31:31
Bild "In Zelle platzieren"
25.04.2024 09:23:47
Spalten in Kreuztabelle hinzufügen/löschen je nach Vorgabe
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1308to1312
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1308to1312
1308to1312
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro Datei öffnen und Daten pasten

Makro Datei öffnen und Daten pasten
11.04.2013 10:12:31
Enrico
Hallo Forum,
Ich möchte folgende Aufgabe lösen:
Ich habe eine Excel Mappe die jede Menge Berechnungen vornimmt. Die Ergebnisse möchte ich auch nach ändern der Eingangsdaten vergleichen können und druckbar dargestellt bekommen.
Ich möchte gerne ein Makro mit dem Namen PrintData erstellen, dass beim Ausführen eine neue Mappe öffnet und dann bestimmte Eingangs und Ausgangsdaten (meine Auswahl) in die neue Mappe kopiert. Jetzt möchte ich einige Eingangsdaten ändern und das Makro nochmals ausführen, jetzt sollen die ausgewählten Daten zum Vergleich jedoch in die Spalte daneben kopiert werden, dass muss solange funktionieren bis die zuvor automatisch geöffnete Mappe geschlossen wird.
Jetzt die schlechte Nachricht, ich weiß nicht wie ich das anstellen soll! :-(
besten Dank für eure Hilfe

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro Datei öffnen und Daten pasten
11.04.2013 10:18:19
Hajo_Zi
warum andere Datei? kopiere die Werte doch gleich in die Spalte daneben.
Gruß Hajo

AW: Makro Datei öffnen und Daten pasten
11.04.2013 10:20:28
Klaus
ich möchte gerne ein Makro mit dem Namen PrintData erstellen
einfach.
dass beim Ausführen eine neue Mappe öffnet
eine ganz neue Mappe oder nur ein neues Arbeitsblatt? da du untern "Mappe schließen" schreibst, nehme ich an du meinst wirklich eine Mappe. Wird diese nach Nutzung gelöscht?
und dann bestimmte Eingangs und Ausgangsdaten (meine Auswahl) in die neue Mappe kopiert.
wie sieht deine Auswahl denn aus? Eigentlich dürfte die sich ja von Ausführung zu Ausführung nicht ändern, sonst bringt dir ja der Vergleich nichts.
Einfacher währe es, wenn du sagen kannst "immer Bereich B7:B100".
Lässt man es bei "Auswahl", gibt es ein dutzend Ausnahmen zu betrachten (was ist, wenn du alle Zellen auswählst? oder Zeilen statt Spalten? Oder ein Bild, oder einen Button?).
Jetzt möchte ich einige Eingangsdaten ändern und das Makro nochmals ausführen, jetzt sollen die ausgewählten Daten zum Vergleich jedoch in die Spalte daneben kopiert werden,
Muss es ZWINGEND das gleiche Makro nochmal sein, oder kannst du beim zweiten mal auch ein anderes Makro ausführen?
Ich mein, das geht schon mit einem Makro (Publich Boolean Variable beim ersten ausführen umschalten), halte ich aber für unnötig fehleranfällig und kompliziert.
dass muss solange funktionieren bis die zuvor automatisch geöffnete Mappe geschlossen wird.
Was passiert denn mit der "zuvor automatisch geöffneten" Mappe? Wird die gespeichert, oder einfach nur geschlossen?
Grüße,
Klaus M.vdT.

Anzeige
AW: Makro Datei öffnen und Daten pasten
11.04.2013 10:32:56
Klaus
Hi,
das könnte funktionieren.
Kopiert immer ganze Spalten zum vergleich.
Zeile 1 muss IMMER gefüllt sein, sonst funktioniert es nicht!
Wenn du die "neue" Datei schließt, musst du einmal das Makro "ResetFirstOpen" ausführen - oder die Masterdatei schließen und wieder öffnen.
Option Explicit
Public bFirstOpen As Boolean
Public wkbNew As Workbook
Sub PrintData()
Dim wkbOld As Workbook
Set wkbOld = ActiveWorkbook
If bFirstOpen Then
Else
Workbooks.Add
Set wkbNew = ActiveWorkbook
bFirstOpen = True
wkbOld.Activate
End If
Dim iCol As Integer
Selection.EntireColumn.Copy
With wkbNew.Sheets(1)
iCol = .Cells(1, .Columns.Count).End(xlToLeft).Column
.Cells(1, iCol + 1).PasteSpecial
End With
End Sub
Sub ResetFirstOpen()
bFirstOpen = False
End Sub

Anzeige
AW: Makro Datei öffnen und Daten pasten
11.04.2013 10:48:24
Enrico
Hallo Klaus,
1. Ja, eine ganz neue Mappe ist gemeint, da ich sozusagen ein Datei für Berechnungen und eine nur zur Datenausgabe und Vergleich haben möchte die ich dann abspeichern oder verwerfen kann, die aber nicht die ganzen Berechnungsformeln im Hintergrund hat.
2. Ja, immer der gleiche Bereich soll kopiert und eingefügt werden.
3. Es könnten auch 2 Mokros verwendet werden, ich dachte nur das die Lösung mit einem Makro die elegantere wäre.
4. Die Datei soll mit neuem Namen gespeichert und dann geschlossen werden oder auch einfach nur geschlossen.

Mein Beispielmakro ausprobiert? owT
11.04.2013 10:54:53
Klaus
.

Anzeige
AW: Mein Beispielmakro ausprobiert? owT
11.04.2013 10:57:56
Enrico
Hallo,
ich habe es gerade probiert und es funktioniert auch nur wird der kopierte Bereich immer wieder überschrieben und nicht in die Zelle daneben eingefügt.

AW: Mein Beispielmakro ausprobiert? owT
11.04.2013 11:01:33
Klaus
nur wird der kopierte Bereich immer wieder überschrieben und nicht in die Zelle daneben eingefügt.
Bei mir schon. Ich kann nur raten: Zeile 1 ist nicht gefüllt? Die erste freie Spalte wird in dieser Zeile ermittelt:
iCol = .Cells(1, .Columns.Count).End(xlToLeft).Column
die 1 steht hier für Zeile 1.
Entweder, du sorgst dafür dass Zeile 1 immer gefüllt ist, oder du änderst die 1 auf eine immer gefüllte Zeile ab (wenn du zB immer Daten in Zeile 17 stehen hast, dann so:
iCol = .Cells(17, .Columns.Count).End(xlToLeft).Column
Grüße,
Klaus M.vdT.

Anzeige
AW: Mein Beispielmakro ausprobiert? owT
11.04.2013 11:31:02
Enrico
Hey,
So, jetzt habe ich es fast verstanden!!
Das Problem ist jetzt nur noch, dass das Markro die Spalte kopiert in der gerade eine Zelle aktiviert ist. Ich denke es wäre Gut, wenn man das über Bereiche lösen könnte, da die Eingangs,- und Ausgangsdaten ohnehin in verschiedenen Spalten stehen.
bis dahin vielen Dank
Gruß

AW: Mein Beispielmakro ausprobiert? owT
11.04.2013 11:37:10
Klaus
Das Problem ist jetzt nur noch, dass das Markro die Spalte kopiert in der gerade eine Zelle aktiviert ist. Ich denke es wäre Gut, wenn man das über Bereiche lösen könnte, da die Eingangs,- und Ausgangsdaten ohnehin in verschiedenen Spalten stehen.
Ja, das sehe ich genauso. Dann lös es doch bitte anders.
Da ich deinen Tabellenaufbau ja nicht kenne, kann ich dir dabei leider nicht helfen. Nur soweit:
Selection.EntireColumn.Copy
kopiert die Spalte der ausgewählten Zeile. Hier musst du halt ändern, in sinngemäß
meinausgewählterbereich.Copy
Grüße,
Klaus M.vdT.
Anzeige

310 Forumthreads zu ähnlichen Themen

Daten aus vielen xls-Datein auslesen
Daniel

Hallo Profis,
ich suche einen VBA-Befehl für folgendes:
Ich habe einen Ordner mit vielen xls-Dateien. Diese sollen nun alle in einer Datei zusammengefahren werden, alle Zeilen, wenn der Wert der 2. Spalte links mit "12345" anfängt.
Geht dies?
Vielen Dank vorab.
Daniel
...
18.08.2008 15:07:01
Thread-ID: 1002621
2 Beiträge
Anzeige
Daten aus einer anderen Mappe auslesen
Uwe

Hallo zusammen, habe mir einen funktionierenden Einsatzplan für 24 MA und 3 Schichten zusammengebastelt welcher die Monate inkl. Feiertage und Wochenenden dynamisch generiert.
Nun möchte ich wenn ich im zum Beispiel den Einsatzplan für die Mitarbeiter für Februar abrechne, das Excel sich...
14.10.2008 22:12:36
Thread-ID: 1016451
5 Beiträge
Leseschutz für Datei, mit VBA aufheben
Iro

Hallo,
folgendes Problem: ich will zwischen zwei Dateien Daten austauschen. Die A-datei soll grundsätzlich PW-geschützt werden, und zwar so, dass der User weder etwas verändern kann noch sie überhaupt öffnen. Nur wenn der User aus der B-datei mit der vorgesehenen Form Daten überträgt, soll...
21.10.2008 14:18:57
Thread-ID: 1017997
4 Beiträge
Anzeige
VBA Code vom anderen xls Datei ausführen
Urmila

Hallo,
besteht die Möglichkeit, ein VBA Code von anderen Datei aus zu starten?
Beispiel:
Datei 01.xls: hier steht der VBA Skript zum Speichern der Tabelle als Html.
Im Datei 02.xls ist ein Button und die Daten die als Html gespeichert werden sollen.
Wenn ich den Button drück...
27.11.2008 10:26:00
Thread-ID: 1028252
8 Beiträge
Zeilen aus anderer datei kopieren
Dieter

Hi,
habe mal wieder ein schweres Problem:
ich möchte aus einer anderen Excel Date ein paar Zeilen kopieren. das Ganze soll folgendermassen funktionieren:
Quelldatei : "IMPORT.XLS
Tabellenblatt : "DATEN" oder "FPC"
Zieldatei : "EXPORT.XLS
Tabelnneblatt : "EINGABE"
so,...
01.12.2008 11:51:16
Thread-ID: 1029203
5 Beiträge
Erzeugung einer bat Datei mittels VBA
Josef

Hallo!
Wie kann ich bitte mittels VBA eine bat Datei erzeugen und diese in einem gewünschten Ordner abspeiichern?
Danke
Josef
04.12.2008 06:51:22
Thread-ID: 1030010
5 Beiträge
im Verzeichnis aus allen Dateien Daten auslesen
walter

Hallo und guten Morgen,
ich habe u.a. Makro in der Anwendung, welches Daten aus allen Blättern EINER Datei im Blatt "Datenzusammenfassung" niederschreibt.
Jetzt würde ich ides gerne soweit verändern, daß alle Dateien ikn einem Verzeichnis (alle mit gleichem Aufbau) so ausgelesen werden...
08.01.2009 00:50:00
Thread-ID: 1037733
18 Beiträge
Daten aus Dateien auslesen
Bark

Ich habe ein Makro geschrieben, der Dateien in einem bestimmten Verzeichnis der Reihe nach öffnet und bestimmte Inhalte in Variablen packt und die Werte dieser Variablen in einer anderen Datei (Gesamtliste) wieder einfügt.
Läuft alles soweit gut. Aber die Laufzeit könnte besser sein. Was ka...
02.02.2009 14:29:21
Thread-ID: 1046247
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
3
4
3
3
7
4
4
17
3
3
2
4
2
6
5
4
2
3
1
2
4
4
2
3