Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
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
Inhaltsverzeichnis

VB-Script

VB-Script
07.05.2013 08:29:02
Snewi
Hallo,
ich stoße mein Excel Sheet mit folgendem Script an:

Dim objExcel
Dim objWorkbook
Set objExcel = CreateObject("excel.application")
Set objWorkbook = objExcel.Workbooks.Open("C:\Berichte\Tag_Ber.xlsm")
objExcel.Visible = True
objExcel.DisplayAlerts = False
objWorkbook.Close

Ich möchte nun jetzt wenn das erste Excel-Sheet wieder geschlossen ist ein zweites anstossen! Wie bau ich das hier mit ein?
Gruß

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VB-Script
07.05.2013 08:50:22
EtoPHG
Hallo Snewi,
Ich versteh deine Frage und auch das Konstrukt nicht richtig.
Du öffnest eine Arbeitsmappe in einer eigenen Excel-Instanz, also nicht in der gleichen, wie dieser Code abläuft. Wenn du nach dem .Close (schliesst die Arbeitsmappe) nun wieder eine Mappe öffnen willst, dann wiederholst du einfach den Code ab Set objWorkbook = objExcel.Workbooks.Open("AndereMappe.xlsm".
Gruess Hansueli

AW: VB-Script
07.05.2013 09:16:26
Snewi
Dann bekomm ich aber einen Fehler wenn ich es so mache:

Dim objExcel
Dim objWorkbook
Set objExcel = CreateObject("excel.application")
Set objWorkbook = objExcel.Workbooks.Open("C:\Berichte\Tag_Ber.xlsm")
objExcel.Visible = True
objExcel.DisplayAlerts = False
objWorkbook.Close
Set objWorkbook = objExcel.Workbooks.Open("C:\Berichte\Tag_Ber1.xlsm")
objExcel.Visible = True
objExcel.DisplayAlerts = False
objWorkbook.Close
Gruß

Anzeige
AW: VB-Script
07.05.2013 09:17:59
Snewi
Fehler:
Die Open Eigenschaft des Workbook-Objektes kann nicht zugeordnet werden!
Gruß

Datei 2 existiert nicht! (owT)
07.05.2013 09:23:00
EtoPHG

Ich sehe keinen Fehler auf deinem Compi! (owT)
07.05.2013 09:21:04
EtoPHG

wozu eigentlich ....
07.05.2013 09:46:24
Rudi
Hallo,
1. eine eigene Instanz
2. Displayalerts=False
Gruß
Rudi

Evtl ist Xl ja gar nicht offen - VBSCRIPT! orT
07.05.2013 13:38:58
Luc:-?
Gruß Luc :-?

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige