Office 360 Excel

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Dim WBopen As Workbook 'Datei im Hintergrund öffnen Application.ScreenUpdating = False Set WBopen = Workbooks.Open("C:\...\...\...\Dateiname.xlsx") ActiveWindow.Visible = False '...dein weiterer Code 'unsichtbare Datei ohne speichern wieder schließen Workbooks("Dateiname.xlsx").Close False

Hallo Werner,
vielen Dank für Deine Antwort.
Leider funktioniert es nur teilweise.
open funktioniert prima, nichts poppt auf
Bei dem close Befehl wird die Haupttabelle wieder sichtbar
Anbei mal mein Code (auszugsweise), habe ich irgendetwas übersehen ?
Vom Ablauf:
Msgbox x:\ wird sichtbar
Daten werden geladen
Msgbox close wird sichtbar
Dann poppt Excel mit der Haupttabelle (nicht die die hier geladen wurde) auf
Msgbox Done taucht auf


Application.ScreenUpdating = False
Application.DisplayAlerts = False
'Server Suchliste ?ffnen
MsgBox "X:\Reparaturen\RepaDB\Suchliste.xlsx"
Dim WBopen As Workbook
Set WBopen = Workbooks.Open("X:\Reparaturen\RepaDB\Suchliste.xlsx")
ActiveWindow.Visible = False
'Datenverarbeitung
'Server Datenliste schliessen
MsgBox "Close Suchliste.xlsx"
Workbooks("Suchliste.xlsx").Close False
Application.DisplayAlerts = True
MsgBox "Done"

Ideen ?

Application.ScreenUpdating = False Application.DisplayAlerts = False 'Server Suchliste ?ffnen MsgBox "X:\Reparaturen\RepaDB\Suchliste.xlsx" Dim WBopen As Workbook Set WBopen = Workbooks.Open("X:\Reparaturen\RepaDB\Suchliste.xlsx") ActiveWindow.Visible = False 'Datenverarbeitung 'Server Datenliste schliessen MsgBox "Close Suchliste.xlsx" Workbooks("Suchliste.xlsx").Close False ActiveWindow.Visible = False Application.DisplayAlerts = True MsgBox "Done"

Hallo Werner,
das funktioniert leider nicht.
Es gibt einen Error:
Objektvariable oder with-Block nicht definiert
P.S.: Ich habe nun einen workaround gefunden.
Suchliste.xlsx manuell öffnen und dann per "Ansicht - Fenster ausblenden" unsichtbar machen, schliessen und beim schliessen speichern
Das verhindert beim workbook.close das aufpoppen der Haupttabelle.
Man muss allerdings "ActiveWindow.Visible = False" auch beim ".open" rausnehmen, sonst wirft es den oben genannten Error.
Das ist jetzt nicht wirklich eine schöne Lösung, aber funktioniert erstmal. Falls jemand eine elegantere und praktikablere Lösung anbieten kann wäre das Klasse. Vielen Dank im voraus.
Nächste Frage: Bei workbook.add taucht excel auch im Hintergrund auf.
Kann man hier von vorneherein die "Fenster ausblendn" Option beim .add setzen ?

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Office 360 Excel

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

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread