Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1740to1744
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
1740to1744
1740to1744
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA, neue Datei erstellen Inhalt kopiere

VBA, neue Datei erstellen Inhalt kopiere
03.03.2020 10:09:10
Gehard
Guten Morgen zusammen,
meine VBA-Kenntnisse sind sehr beschränkt und ich komme alleine einfach nicht weiter.
Simpel gesagt, möchte ich ein Makro erstellen, dass aus der Datei in der ich bin eine neue Excel-Datei erstellt und Inhalte der aktuellen Datei in die neue kopiert. Es geht hier nur darum, die nötigsten Informationen aus der Ausgangsdatei in dem richtigen Format und an der richtigen Stelle in der neuen Datei darzustellen.
Weder die Datei, aus der die Daten kopiert werden, noch die Datei in die die Daten kopiert werden, werden gespeichert.
Die Datei (Exceldatei) in der das Makro ausgeführt wird, wird aus einer anderen Software erstellt und der Name variiert (Der Name setzt sich wie folgt zusammen: "export"JJJJMMTThhmmss").
Also wenn ich diese eine Datei aus der Software am 02.03.2020 um 09:53:31 erstellen würde, wäre der Dateiname "export20200302095331".
Mein Problem sind vor allen die Dateinamen. Da ich dem Makro angeben muss aus welcher Datei Informationen geholt und in welcher Datei Informationen kopiert werden sollen.
Um zu sehen ob das Makro, dass macht was es soll, wäre es toll, wenn es z.B. den Inhalt der Zelle A1 aus der Ursprungsdatei auch gleich in die Zelle A1 der Zieldatei kopieren würde.
Ich hoffe ich habe das alles nicht zu kompliziert geschrieben und würde über Hilfe bei meinem Problem freuen.
Vielen Dank.

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA, neue Datei erstellen Inhalt kopiere
03.03.2020 10:23:59
Werner
Hallo,
der Name der Datei in dem das Makro ist, ist egal. Du kannst diese Datei über ThisWorkbook ansprechen. 
Public Sub aaa()
Dim wbNeu As Workbook, wsNeu As Worksheet
Application.ScreenUpdating = False
Set wbNeu = Workbooks.Add
Set wsNeu = wbNeu.Worksheets("Tabelle1")
With ThisWorkbook.Worksheets("Tabelle1")
.Range("A1").Copy wsNeu.Range("A1")
End With
Set wbNeu = Nothing: Set wsNeu = Nothing
End Sub
Gruß Werner
AW: VBA, neue Datei erstellen Inhalt kopiere
03.03.2020 11:00:07
Gehard
Hallo Werner,
vielen Dank.
Ich habe noch folgendes Problem. In der Ursprungsdatei heißt die Tabelle1 nicht Tabelle1 sondern genau wie die Datei ("export"JJJJMMTThhmmss").
Wenn ich folgende passage aus deinem Makro ändere:
With ThisWorkbook.Worksheets("Tabelle1")
und aus Tabelle1 den entsprechenden Dateinamen mache funktioniert es.
Jetzt müsste ich nur noch wissen wie ich dem Makro sage, der Tabellennamen der aktuellen Tabelle ist gleich dem variierenden Dateinamen.
Danke nochmals.
Anzeige
AW: VBA, neue Datei erstellen Inhalt kopiere
03.03.2020 11:15:00
Werner
Hallo,
so: 
Public Sub aaa()
Dim wbNeu As Workbook, wsNeu As Worksheet
Dim strBlatt As String
Application.ScreenUpdating = False
strBlatt = Replace(ThisWorkbook.Name, ".xlsm", "")
Set wbNeu = Workbooks.Add
Set wsNeu = wbNeu.Worksheets("Tabelle1")
With ThisWorkbook.Worksheets(strBlatt)
.Range("A1").Copy wsNeu.Range("A1")
End With
Set wbNeu = Nothing: Set wsNeu = Nothing
End Sub
Gruß Werner
AW: VBA, neue Datei erstellen Inhalt kopiere
04.03.2020 11:24:14
Gehard
Hallo Werner,
vielen Dank.
Funktioniert so wie es soll und ich habe wieder etwas dazu gelernt.
Gerne u. Danke für die Rückmeldung. o.w.T.
04.03.2020 13:43:57
Werner

78 Forumthreads zu ähnlichen Themen

VBA Ausgabe in neue Datei
MarkusL

Hallo,
ich habe folgendes Problem:
In einer Datei befinden sich nachfolgende Datensätze
Jahr Monat Feld_1 Feld_2 Feld_3 Feld_4 Feld_5 usw.
es sollen nun per VBA nach Abfrage von Jahr und Monat ein neuer Datensatz in einer neuen Datei erzeugt werden, der allerdings nur noch die F...
08.08.2008 17:42:00
Thread-ID: 1000377
3 Beiträge
Anzeige
neue Datei erstellen und beschreiben
Toby


Hmm, wahrscheinlich für euch ein kleines Problem
habe aber im archiv nichts gefunden!
ich erstelle ein neues file und möchte dann die neue Datei mit Daten beschreiben.
aber leider schreibt er mir immer ins file in dem ich das makro starte!
ich hatte schon mol so ein Proble...
29.10.2008 13:07:00
Thread-ID: 1020251
9 Beiträge
Makro in neuer Datei erstellen
Kurt

Guten Morgen Allerseits,
ich hoffe mir kann jemand weiterhelfen.
Problem:
Ich erstellt eine TXT Datei per Makro, nun möchte ich das
zusätzlich ein Commandbutton erstellt wird, mit folgendem Inhalt:
Private Sub CommandButton1_Click() Dim z As Long z = Range("a6").End(xlDo...
13.11.2008 10:47:23
Thread-ID: 1024104
7 Beiträge
Anzeige
Makro per VBA in Datei erstellen
Marko

Hallo zusammen,
folgendes Problem:
ich habe eine Datei mir mehreren Tabellenblätter die Formeln enthalten.
Per VBA exportiere ich die Datei und enferne dabei die vorhandenen Makros sowie ersetzte die Formeln durch Werte.
Nun würde ich abschließend in den Export ein neues Makro i...
01.07.2009 17:22:37
Thread-ID: 1085801
3 Beiträge
Tabellenblätter autom. erstellen und ausfüllen
Robert

Hallo Leute
ich habe hier eine Mappe in der ich eine Vorlage für die Prüfung von Maschinen hab.
Ich brauch pro Maschine ein Tabellenblatt und daher würde ich diese gerne automatisch erstellen wenn in der Geräteliste ein Gerät eingetragen wird.
Des Weiteren soll in den automatisch er...
07.07.2009 20:30:38
Thread-ID: 1086950
7 Beiträge
Neue Datei erstellen
Stefanglander

Hallo Forum,
ich habe eine Datei in der auf Blatt 1 im Bereich C2:C27 Namen stehen.
Ich möchte nun mit einem Makro ausgelößt durch einen CMB das für Zelle im Bereich C2:C27 die nicht leer ist eine neue Datei mit dem Namen der jeweiligen Zelle angelegt wird.
Als Vorlage soll das Bla...
02.08.2009 19:37:22
Thread-ID: 1093084
3 Beiträge
VBA beim anlegen neuer Datei mit kopieren
Stefanglander

Mal wieder ich,
Hallo Leute
ich habe ein Code von Hajo in meiner Datei eingebaut.
Es geht um den Kalender der sich beim betreten der Zelle einblendet ( ein super Teil, kann ich nur empfehlen).
Nun lege ich mittels folgendem Code eine neue Mappe an:
Sub Tab2() Dim strFile As...
16.08.2009 19:31:38
Thread-ID: 1096268
4 Beiträge
neue Exceldatei incl. Makro automatisch erstellen
skaddy

Hallo zusammen
Ich erstelle mit einen Makro aus dem Excel heraus ein Wordfile, welches ich wiederum mit Teilinhalte aus Excel beschreibe. Nun möchte ich dem neu erstellten Wordfile noch gerne ein Makro (also im .doc) mitgeben mit welchem ich dann im Word mit einem Hotkey noch ein WordMakro...
17.09.2009 23:02:47
Thread-ID: 1103727
11 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
2
2
8
6
4
2
6
2
3
10
13
4
6
1
6
2
12
1
5
6
2
5
4
1
1