Disse websidene oppdateres ikke lengre og er kun tilgjengelig for historikken sin skyld.

Klikk her for å gå til den oppdaterte informasjonen.

Endre tilstanden til verktøylinjeknapp

Makroen nedenfor viser hvordan man kan endre utseendet på en egendefinert verktøylinjeknapp slik at den vises som om den er nedtrykket eller ikke.

Sub ToggleButtonState()
Dim m As CommandBarControl
    Set m = CommandBars("CommandBarName").Controls(1)
    If m.State = msoButtonDown Then
        m.State = msoButtonUp
    Else
        m.State = msoButtonDown
    End If
    Set m = Nothing
End Sub

Dokumentet er sist oppdatert 2000-02-05 22:10:37