Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema OptionButton
BildScreenshot zu OptionButton OptionButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema ScrollBar
BildScreenshot zu ScrollBar ScrollBar-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema SpinButton
BildScreenshot zu SpinButton SpinButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Button inaktiv schalten

    Betrifft: Button inaktiv schalten von: Korl
    Geschrieben am: 02.09.2003 01:16:02

    Hallo,

    dieses Makro schaltet ein Button inaktiv wenn ich auf das Tabellenblatt "Statistik" springe.
    Diese Funktion hätte ich nun noch für ein 2. Tabellenblatt.

    Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    If Sh.Name = "Statistik" Then
    Application.CommandBars("Holzliste").Controls(4).Enabled = False
     Else
    Application.CommandBars("Holzliste").Controls(4).Enabled = True
    End If
    End Sub
    


    Wie muß ich es schreiben?
    Gruß Korl
      


    Betrifft: AW: Button inaktiv schalten von: PeterW
    Geschrieben am: 02.09.2003 01:34:23

    Hallo Korl,

    wie wäre es mal mit einer Rückmeldung bei den anderen von dir gestellten Fragen. Ist es wirklich zu viel verlangt dem Antworter mitzuteilen, dass das Problem gelöst wurde???
    Private Sub Workbook_SheetActivate(ByVal Sh As Object)
      If Sh.Name = "Statistik" Or Sh.Name = "NameDerZweitenMappe" Then
        Application.CommandBars("Holzliste").Controls(4).Enabled = False
      Else
        Application.CommandBars("Holzliste").Controls(4).Enabled = True
      End If
    End Sub
    

    Gruß
    Peter


      


    Betrifft: AW: Button inaktiv schalten von: Korl
    Geschrieben am: 02.09.2003 07:52:13

    Hallo Peter,

    es ist wirklich nicht von mir beabsichtigt gewesen, jemanden vor den Kopf zu Stoßen.
    Ich habe gestern den ganzen Tag versucht und probiert bis mir in der Nacht die Augen zuvielen. Entschuldige!

    Dein geschriebenes Makro ist genau das, was ich gesucht habe.

    Danke dafür.

    Schöne Grüße Korl


     

    Beiträge aus den Excel-Beispielen zum Thema " Button inaktiv schalten"