Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 18:04:29
Formel fehler Wert#
18.04.2024 17:45:21
Shellkommando ausführen, stderr auslesen
18.04.2024 17:41:41
Summe: Bestimmter Bereich mit sverweis
18.04.2024 16:33:24
Worksheets variable
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1544to1548
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
1544to1548
1544to1548
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Weitere Dateien per VBA oder Makro autom. öffnen

Weitere Dateien per VBA oder Makro autom. öffnen
07.03.2017 19:08:08
sk
Guten Abend,
ich habe folgende Ausgangssituation mit vier Dateien.
Alle.xlsx, Datei1.xlsx, Datei2.xlsx und Datei3.xlsx
In der Datei Alle.xlsx greife ich per SVERWEIS und INDIREKT aud die anderen drei genannten Dateien zu. Durch INDIREKT müssen diese drei zwingend geöffnet sein. Soweit klar für mich.
Kann ich in der Alle.xlsx diese drei Dateien per VBA oder Makro automatisch mit öffnen lassen (gerne auch versteckt)? Beim Beenden von Alle.xlsx sollten diese jedoch auch beendet werden.
Es wäre sehr nett, falls so etwas möglich ist, mir mitzuteilen, wo ich das einstellen müsste und vor allem mit welchem Befehl.
Ich bedanke mich im Voraus!
Gruß Stefan

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Weitere Dateien per VBA oder Makro autom. öffnen
07.03.2017 19:14:21
Hajo_Zi
Hallo Stefan,
NEIN, da XLSX kein Makro enthalten kann.

AW: Weitere Dateien per VBA oder Makro autom. öffnen
07.03.2017 19:21:29
sk
Und wenn ich die Alle.xlsx als Alle.xlsm speichere? Wie sieht es dann bitte aus?
Weitere Dateien per VBA oder Makro autom. öffnen
07.03.2017 19:34:03
Hajo_Zi
es muss nur die erste als XLSm gespeichert werden.
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, Doppelklick auf Deine Datei, Doppelklick auf DieseArbeitsmappe, Code ins rechte Fenster kopieren, VBA Editor schließen.
Das Makro wird automatisch gestartet.
Der Code wirkt in der gesamten Datei.
Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Workbooks("mappe1.xlsx").Close False
Workbooks("mappe2.xlsx").Close False
Workbooks("mappe3.xlsx").Close False
Workbooks("mappe4.xlsx").Close False
End Sub
Private Sub Workbook_Open()
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe1.xlsx"
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe2.xlsx"
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe2.xlsx"
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe2.xlsx"
End Sub

Anzeige
AW: Weitere Dateien per VBA autom. öffnen
08.03.2017 08:54:29
sk
Hallo Hajo,
habe das heute mal ausprobiert und es funktioniert bestens.
Gibt es per Befehl auch eine Möglichkeit, dass die zusätzlich zu öffnenden Dateien versteckt im Hintergrund sind, so dass diese nicht zu sehen sind?
Danke vorab!
Gruß Stefan
AW: Weitere Dateien per VBA autom. öffnen
08.03.2017 17:29:08
Hajo_Zi
Hallo Stefan,
nach jedem öffnen
Windows(ActiveWorkbook.Name).Visible = False
Bei schließen vorher einblenden. Oder es soll ausgeblendet bleiben. Dann blende alle von Hand aus.
Gruß Hajo
AW: Weitere Dateien per VBA autom. öffnen
08.03.2017 19:59:25
sk
Hallo Hajo,
wo muss ich den von dir genannten Befehl denn bitte eintragen?
Irgendwo hier einfügen?
Option Explicit

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Workbooks("mappe1.xlsx").Close False
Workbooks("mappe2.xlsx").Close False
Workbooks("mappe3.xlsx").Close False
Workbooks("mappe4.xlsx").Close False
End Sub



Private Sub Workbook_Open()
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe1.xlsx"
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe2.xlsx"
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe2.xlsx"
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe2.xlsx"
End Sub

Anzeige
AW: Weitere Dateien per VBA autom. öffnen
08.03.2017 20:15:32
Hajo_Zi
öffnen ist open und vor Close
Gruß Hajo
AW: Weitere Dateien per VBA autom. öffnen
08.03.2017 20:58:09
sk
Sorry Hajo,
wäre es zu viel verlangt, mir bitte die genauen Befehle zu nennen? Ich bin eine Niete, was diese VBA Befehle betrifft.
Gruß Stefan
AW: Weitere Dateien per VBA autom. öffnen
09.03.2017 05:50:05
Hajo_Zi
Hallo Stefan,
mir scheint Du kannst nicht lesen. Den genauen Befehl habe ich schon genannt.
Ich bin aus o.G. dann raus.
Gruß Hajo
AW: Weitere Dateien per VBA autom. öffnen
09.03.2017 07:48:25
sk
Hallo Hajo,
der Schein trügt. Außerdem finde ich die Bemerkung unangebracht. Das hast du doch gar nicht nötig.
Ich habe etwas vernünftig, nicht fordernd nachgefragt. Ich kenne mich nun mal mit VBA nicht aus und habe daher deine Antwort nicht umsetzen können.
"Hallo Stefan,
nach jedem öffnen
Windows(ActiveWorkbook.Name).Visible = False
Bei schließen vorher einblenden. Oder es soll ausgeblendet bleiben. Dann blende alle von Hand aus.
Gruß Hajo"
Ich weiß nicht, wo ich Windows(ActiveWorkbook.Name).Visible = False eintragen muss. Genauso wenig weiß ich hiermit etwas anzufangen.
"Bei schließen vorher einblenden. Oder es soll ausgeblendet bleiben. Dann blende alle von Hand aus."
So?
Private Sub Workbook_Open()
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe1.xlsx"
Windows(ActiveWorkbook.Name).Visible = False
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe2.xlsx"
Windows(ActiveWorkbook.Name).Visible = False
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe2.xlsx"
Windows(ActiveWorkbook.Name).Visible = False
Workbooks.Open "W:\Eigene Dateien\Hajo\Internet\Test\2017\mappe2.xlsx"
End Sub

Ich kann nachvollziehen, dass diese Nachfragen einen Profi stören.
Gruß Stefan
Anzeige

305 Forumthreads zu ähnlichen Themen

Inputbox Schriftart oder Farbe verändern
Gunter

Hallo Zusammen,
ich habe eine Inputbox, über die eine Passwortabfrage gesteuert wird. Leider ist das Passwort im Eingabefeld zu sehen. Ist es möglich den Text z.B. in der Schriftart "Wingdings" zu formatieren, oder
die Schriftfarbe in weiss, damit das Passwort nicht mehr zu sehen ist?
28.08.2008 15:32:00
Thread-ID: 1005474
7 Beiträge
Anzeige
SVerweis mit zwei Suchkriterien
Josef

Hallo1
Ich habe in Tabelle1
in der Spalte A und B Werte stehen.
In der Tabelle2 stehen ebenfalls in der Spalte A und B die gleichen Werte, jedoch in anderer Reihenfolge in der Spalte C stehen die dazugehörenden Texte.
Ich möchte nun die Werte in der Spalte C in der Tabelle 2 in...
01.09.2008 18:57:22
Thread-ID: 1006581
6 Beiträge
Zugriff auf Access-DB über DAO oder ADO
Armin

Hallo,
ich hätte eine allgemeine Frage zum Zugriff auf Access-Datenbanken.
Welche Zugriffsmethode auf eine Access-DB würdet Ihr generell empfehlen: ADO oder DAO?
Gibt es in der Praxis Vor- oder Nachteile für die eine oder andere Zugriffsweise?
Vielen Dank für Euere Meinungen und...
03.09.2008 14:28:55
Thread-ID: 1007110
2 Beiträge
Anzeige
PIVOTDATENZUORDNEN mit zwei Kriterien
Andi

Hallo Experten,
Ich versuch zurzeit eine Auswertung aus einer Pivot Tabelle zu erstellen, komm jedoch nicht weiter da ich zwei Kriterien in der X-achse und eins in der Y-achse berücksichtigen muss. Das heisst ich kann nicht einfach X-Achse und Y-achse mit der Pivot-tabelle abgleichen, sonde...
14.10.2008 12:16:00
Thread-ID: 1016295
5 Beiträge
LZF 1004 Anwendungs- oder objektdefinierter Fehler
Himmelsbach

Hallo zusammen,
Ich habe ein kleines Problem beim Einfügen eines Kommentars in ein Zelle.
Der Code lautet:
Sub vergleichen () dim icolmax as integer dim irowmax as integer dim icol as integer dim irow as integer dim kommentar$ icolmax = 16 irowmax = thisworkbook.worksheets("IASEK...
20.10.2008 20:20:00
Thread-ID: 1017794
6 Beiträge
Bedingte Formatierung oder VBA?
maruseru

Hallo werte Profis
Irgendwie raff ich es heute nicht
Habe eine Spalte mit Artikel Nummern. Jeweils das erste Zeichen ist = Produkte Typ.
A976164
A980602
B181645
B491942
F199587
F215047
F224410
G224410
F232634
Ich möchte nun anhand des ersten Zeich...
27.11.2008 14:09:45
Thread-ID: 1028367
7 Beiträge
Schaltflächen oder Image Beispiele
Walter

Hallo Zusammen,
erst mal ALLEN ein gesundes neues Jahr !!!
Ich such Schaltflächen oder Image Beispiele, hatte mal in Google gesucht, leider
nichts gefunden,
vielleicht hat jemand eine Beispielmappe,
mfg Walter
01.01.2009 13:10:00
Thread-ID: 1036231
9 Beiträge
Excel-Bug oder was?
Andreas

Hallo,
Haben seit gestern folgendes Problem, welches auch schon zu
"Schäden" geführt hat. Sonst hätte ich es ja auch nicht bemerkt.
Excel-Problem nach Update von MS Office Kompatibilitätspack 2007
Wenn eine Exceldatei *.xls (2003) über Extras - Schutz - Arbeitsmappe schützen
...
16.01.2009 12:09:00
Thread-ID: 1040524
3 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
6
5
5
1
5
4
5
6
8
2
11
2
2
3
8
4
7
3
15
3
16
5
4
2
1