Clever-Excel-Forum

Normale Version: Arbeitsmappe nicht mehr sichtbar
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo zusammen,

ich hab leider folgendes Sub ausgeführt:


Code:
Private Sub Workbook_Open()
Windows(Me.Name).Visible = False
Bedieneroberflaeche.Show
End Sub

Nun lässt sich die Datei zwar öffnen aber meine Arbeitsmappe ist unsichtbar und folgende Fehlermeldung kommt:

Laufzeitfehler'1004':

Die Methode "Range" für das Objekt'_Global' ist fehlgeschlagen

Beim drücken auf den Button Debuggen wird folgende Zeile angezeigt:

Code:
Private Sub TextBox1_Change()
Range("F12").Value = TextBox1.Value
End Sub

Jedoch muss das mit dem Oben genannten Sub zusammenhängen da diese Zeile noch nie Probleme bereitet hat.

Kann mir zufällig jemand helfen?

Danke & viele Grüße.
Hallo Pascala,

Du musst das Worksheet mit angeben.

Code:
Private Sub TextBox1_Change()
ThisWorkbook.Worksheets("Blabla").Range("F12").Value = TextBox1.Value
End Sub

Gruß Uwe
(22.07.2020, 08:23)Kuwer schrieb: [ -> ]Hallo Pascala,

Du musst das Worksheet mit angeben.

Code:
Private Sub TextBox1_Change()
ThisWorkbook.Worksheets("Blabla").Range("F12").Value = TextBox1.Value
End Sub

Gruß Uwe

Dankeschön Uwe!


es besteht aber leider noch weiterhin das Problem das ich meine Arbeitsmappe nicht sehe.
Und Weiterer Fehler wird mir nun angezeigt:
Code:
ComboBox1.RowSource = "Parameter!A1:A12"
Hallo Pascala,

Code:
Private Sub Workbook_Open()
Windows(Me.Name).Visible = True
Bedieneroberflaeche.Show
End Sub

Gruß Uwe
(22.07.2020, 09:12)Kuwer schrieb: [ -> ]Hallo Pascala,

Code:
Private Sub Workbook_Open()
Windows(Me.Name).Visible = True
Bedieneroberflaeche.Show
End Sub

Gruß Uwe

Dankeschön!

Jedoch hat das auch nicht zum erfolg verholfen.
Ich habe jetzt nochmal den Code auf eine ganz neue Arbeitsmappe kopiert und die Printvorlage angepasst.
Jetzt geht wieder alles.
Trotzdem Dankeschön. :)

Viele Grüße.