Ich hoffe das geht überhaupt so wie ich es meine.
Aktuell steht halt da:
Private Sub Workbook_Open()
UserForm.Show
End Sub
Und Im betreffenden Tabellenblatt steht:
Private Sub Worksheet_Activate()
UserForm4.Show
End Sub
Vg Marco
Private Sub Workbook_Open()
UserForm.Show
End Sub
Private Sub Worksheet_Activate()
UserForm4.Show
End Sub
Vg Marco
Private Sub Worksheet_Activate()
With UserForm1
.StartUpPosition = 0
.Top = 150
.Left = 20
.Show vbModeless
End With
End Sub
Gruß
Um dein UserForm im Tabellenblatt einzubinden und gleichzeitig die Möglichkeit zu haben, mit der Tabelle weiterzuarbeiten, kannst du die folgenden Schritte befolgen:
Öffne deinen VBA-Editor (Alt + F11).
Füge ein UserForm hinzu, falls du das noch nicht gemacht hast.
Füge den folgenden Code in das Modul "DieseArbeitsmappe" ein:
Private Sub Workbook_Open()
UserForm1.Show vbModeless
End Sub
Füge diesen Code in das Modul des entsprechenden Tabellenblatts ein:
Private Sub Worksheet_Activate()
With UserForm1
.StartUpPosition = 0
.Top = 150
.Left = 20
.Show vbModeless
End With
End Sub
Testen: Speichere deine Arbeit und öffne die Excel-Datei erneut, um zu sehen, ob das UserForm wie gewünscht angezeigt wird.
Fehler: Das UserForm erscheint nicht an der richtigen Stelle.
.StartUpPosition
auf 0 gesetzt ist. Ansonsten hat der Code keine Auswirkung auf .Top
und .Left
.Fehler: Das UserForm kann verschoben werden.
vbModeless
verwenden. Das UserForm bleibt dann geöffnet, erlaubt aber das Arbeiten mit dem Tabellenblatt.Falls das oben genannte Vorgehen nicht deinen Anforderungen entspricht, kannst du auch die folgende Methode ausprobieren:
Hier ist ein Beispiel, wie du das UserForm in einer bestimmten Position im Tabellenblatt anzeigen kannst:
Private Sub Worksheet_Activate()
With UserForm1
.StartUpPosition = 0
.Top = Application.Top + 100
.Left = Application.Left + 50
.Show vbModeless
End With
End Sub
Mit diesem Code wird das UserForm immer 100 Pixel unter dem oberen Rand und 50 Pixel vom linken Rand des Bildschirms angezeigt.
UserForm1
: Stelle sicher, dass der Name deines UserForms korrekt ist und anstelle von UserForm1
wird der tatsächliche Name verwendet.1. Warum erscheint das UserForm nicht, wenn ich die Excel-Datei öffne?
Überprüfe, ob der Code im Modul "DieseArbeitsmappe" korrekt eingefügt wurde und ob die Makros in deiner Excel-Version aktiviert sind.
2. Kann ich mehrere UserForms gleichzeitig öffnen?
Ja, du kannst mehrere UserForms öffnen, solange du sie mit vbModeless
zeigst. Beachte jedoch die Benutzerfreundlichkeit, da zu viele offene Fenster verwirrend sein können.
3. Wie kann ich das UserForm schließen, ohne die Excel-Datei zu schließen?
Füge einen Schließen-Button im UserForm ein, der den Befehl Unload Me
ausführt, um das UserForm zu schließen.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen