Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
Screenshot zu CommandButton	CommandButton-Seite mit Beispielarbeitsmappe aufrufen

Informationen und Beispiele zum Thema TextBox
Screenshot zu TextBox	TextBox-Seite mit Beispielarbeitsmappe aufrufen

Suchen nach Tabellenblatt über Textbox

• Suchen nach Tabellenblatt über Textbox von Sandra vom 17.08.2004 10:18:51
• AW: Suchen nach Tabellenblatt über Textbox - von Nike am 17.08.2004 10:24:44
  • Ja, so! - von sandra am 17.08.2004 10:26:49
• AW: Suchen nach Tabellenblatt über Textbox - von Rudi am 17.08.2004 10:26:36

Betrifft: Suchen nach Tabellenblatt über Textbox von: Sandra
Geschrieben am: 17.08.2004 10:18:51

Morgen,

warum funktioniert folgender Code nicht??

Private Sub CommandButton1_Click()
'suchen nach Tab.blatt
Application.ScreenUpdating = False
On Error Resume Next
Dim wks As Worksheet
Dim strWKS As String
strWKS = TextBox1.Value
For Each wks In Worksheets
    If strWKS = "" Then Exit Sub
        If InStr(UCase(wks.Name), UCase(strWKS)) > 0 Then
        'wks.Visible = True
        wks.Select
        Exit Sub
        End If
Next wks
Application.ScreenUpdating = True
End Sub

Ich möchte ein Tabellenblatt über eine Textbox suchen.
Wer kann helfen.

Gruß Sandra


Betrifft: AW: Suchen nach Tabellenblatt über Textbox von: Nike
Geschrieben am: 17.08.2004 10:24:44

Hi,
so?

Private Sub CommandButton1_Click()
'suchen nach Tab.blatt
Application.ScreenUpdating = False
On Error Resume Next
Dim wks As Worksheet
Dim strWKS As String
strWKS = TextBox1.Value
For Each wks In Worksheets
    If strWKS = "" Then Exit Sub
        If InStr(UCase(wks.Name), UCase(strWKS)) > 0 Then
        'wks.Visible = True
        wks.Activate
        Exit For
        End If
Next wks
Application.ScreenUpdating = True

End Sub

Bye

Nike




Betrifft: Ja, so! von: sandra
Geschrieben am: 17.08.2004 10:26:49

Danke.




Betrifft: AW: Suchen nach Tabellenblatt über Textbox von: Rudi
Geschrieben am: 17.08.2004 10:26:36

Hallo Sandra

Du musst den Code über eine Ereignisprozedur der TextBox (z.B. TextBox_Change) aufrufen, d.h. das Aktualisieren der TextBox ist das auslösende Ereignis.

Gruss Rudi

Beiträge aus den Excel-Beispielen zum Thema "Suchen nach Tabellenblatt über Textbox"