VBA TextBox1 Überprufen
lima-city → Forum → Programmiersprachen → Basic
-
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage
-
Dim g As Object For Each g In ThisWorkbook.Sheets If g.Name = TextBox1.Value Then MsgBox "Tabelle bereits vorhanden" End If Next g
Ist denke ich soweit selbsterklärend.
Wir definieren am Anfang alle Sheets als Object und lassen dann eine Schleife durch all diese definierten Werte laufen.
In dieser Schleife wird überprüft ob gerade durchlaufende Sheet-Name mit dem aus der Textbox übereinstimmt.
Falls ja, MsgBox.
-
Hab dazu ne Frage:
Ich hab VB6, da ist der Inhalt einer Textbox in Textbox.Text (Textbox.value gibts da nicht) wurde das geändert? -
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage