Endre verktøylinjen knapper med VBA

Det er visse verktøyknapper at når du trykker på dem, endrer de å ha et annerledes utseende. For eksempel, hvis du trykker på Fet verktøy, tar verktøyet på et annet utseende, som om det er deprimert. Dette gjøres ved Word ved hjelp av to forskjellige knappe grafikk. Den første er "umerket" utseende, og den andre vises når knappen har blitt klikket.

Du kan bruke en lignende triks med tilpassede verktøyknapper. Som et eksempel på hvordan dette kan fungere, la oss si at du har en verktøylinje som du bruker mye. Du har kalt denne verktøylinjen "sampler". Du ønsker denne verktøylinjen skal vises når du klikker på en knapp på en annen verktøylinje. Først må du opprette den nye verktøylinjen som skal inneholde enkelt knapp som veksler mellom "sampler" verktøylinjen. I dette eksempelet, vil den nye verktøylinjen bli kalt "switcher". Følgende VBA-makro kan tildeles en knapp på "switcher" verktøylinje:

Sub SwitchTools ()
Første sjekk om verktøylinjen skal vises eller skjules
Hvis Commandbars ("sampler"). Synlig Deretter
'Skjul verktøylinjen og endre knappbildet til "normal"
Commandbars ("sampler"). Synlig = False
Commandbars ("switcher"). Controls (1) .State. = MsoButtonUp
Else
'Vis på knappen og endre knappen bilde til "valgt"
Commandbars ("sampler"). Synlig = Sant
Commandbars ("switcher"). Controls (1) .State = msoButtonDown
End If
End Sub

Denne makroen veksler tilstanden i knappen (ved bruk msoButtonUp og msoButtonDown) for å gjøre det har den ønskede utseende.

WordTips er din kilde for kostnadseffektiv Microsoft Word trening. (Microsoft Word er den mest populære tekstbehandlingsprogrammet i verden.) Dette tipset (1122) gjelder for Microsoft Word 97, 2000, 2002, og 2003.