Exceldatei ausblenden/ unsichtbar - Userform anzei

Hallo liebe Community,
ich bin ein Neuling und mit großem Eifer dabei VBA kennenzulernen. Jetzt komme ich nicht mehr weiter und benötige Hilfe von wahren Fachleuten..also von EUCH.
Ich hoffe sehr das mir jemand helfen kann.
Folgendes Problem:
Wenn ich eine Exceldatei öffne soll diese "unsichtbar" geöffnet werden und eine Userform wird angezeigt, aber die Exceldatei ist nicht zu sehen.
Habe mit application.visible die Datei unsichtbar bekommen, ABER nun kann ich paralell geöffnete Exceldateien nicht mehr sehen bzw. ich kann keine weiteren Exceldatein öffnen.
Ich möchte, dass nur diese eine spezielle Exceldatei unsichtbar geöffnet wird und alle weiteren Exceldatein sollen sichtbar bleiben bzw. ich möchte weitere Exceldatein geöffnet bekommen.
Folgende beispielhafte Programmierung habe ich verwendet:

Private Sub Workbook_Open()
Application.ScreenUpdating = False
Application.Visible = False
Application.ScreenUpdating = True
Bedieneroberflaeche.Show
End Sub

Wie bekomme ich den selben Effekt, aber nur ausschließlich für diese Exceldatei.
Ungefähr so stelle ich mir das vor:
Bsp.

Private Sub Workbook_Open()
Application.ScreenUpdating = False
Exceldatei("Testdateiname").Visible = False
Application.ScreenUpdating = True
Bedieneroberflaeche.Show
End Sub

Für Eure Hilfe bedanke ich mich im Voraus.
Viele Grüße
Sebastian

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Ich bin auch nur Anfänger und hab mal bissi im Internet rumgesucht.
Wichtig ist das du in den Userform-Eigenschaften "ShowModal" auf "False" hast, damit man auch in anderen Sachen was tun kann.
Die Lösung arbeitet nach dem Prinzip das du eine extra Datei zum öffnen benutzt. Da muss der Code ganz unten rein und mit nem Button gestartet werden. Zum leichteren bearbeiten der Zieldatei wird die neue Instanz mit dem untenstehenden Code ausgeblendet. So kannst du die eigentliche Tabelle öffnen ohne das sie direkt unsichtbar wird. Wenn alles fertig ist, kannst du auch das unsichtbar schalten in das workbook open makro in der eigentlichen Tabelle schreiben.
Es wird eine neue Instanz gestartet in der deine eigentliche Tabelle mit Userform geöffnet wird.
Da nur diese Instanz unsichtbar ist sind offene und neue Instanzen davon nicht betroffen.
Da bei der Methode die Userform nicht angezeigt wurde musste da so kryptisches Zeug rein das sich das Fenster selbst sucht und in den Vordergrund bringt. (im internet gefunden ;-) )
Das habe ich in der Datei gelassen. (siehe Userform Code)
https://www.herber.de/bbs/user/83258.xlsm
Makro zum öffnen der Datei
Pfadname anpassen fürs öffnen

Sub excel_unsichtbar_userform()
Dim exapp As New Application
Set exapp = New Excel.Application       'Neue Excel Instanz eröffnen
'schalte die Sichtbarkeit hier aus, damit man ohne Probs an der anderen Datei arbeiten kann
'hat man alles fertig, kann man in der anderen Datei Application.visible = false ins open macro  _
setzen.
exapp.Visible = False
exapp.Workbooks.Open "Pfad wo deine Datei mit der userform liegt"
'Wenn die öffnen Datei die einzige ist wird diese Excel-Instanz geschlossen
'Wenn noch andere offen sind wird nur die Datei geschlossen
If Workbooks.Count = 1 Then
ThisWorkbook.Saved = True
Application.Quit
Else
ThisWorkbook.Saved = True
ThisWorkbook.Close
End If
End Sub

Beliebteste Forumthreads (12 Monate)

Exceldatei ausblenden/ unsichtbar - Userform anzei

9
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

11 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Exceldatei ausblenden/ unsichtbar - Userform anzei

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

11 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

9
Beiträge zum Forumthread

Beiträge zu diesem Forumthread