Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Privacywetgeving
Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.
Sub Button3_Click()
With ActiveSheet.Buttons(Application.Caller)
If .Caption = "Verberg F tot K" Then
Range("Tabel1").Columns.Hidden = True
.Caption = "Toon F tot K"
Else
Range("Tabel1").Columns.Hidden = False
.Caption = "Verberg F tot K"
End If
End With
End Sub
Bij de eigenschappen kan je maar 1 achtergrondkleur opgeven en niet per status, wat er ook nog drie kunnen zijn. Dat moet dus in de code.Helemaal goed zo, ik had bij eigenschappen zitten klungelen maar kreeg het niet voor elkaar. Niet verwacht dat het op deze manier moest.
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui"
onLoad="snb_RibbonUI_onLoad">
<ribbon>
<tabs>
<tab id="T_00" label="SNB">
<group id="G_00">
<button id="B_01"
getLabel="getLabel"
size="large"
imageMso="Refresh"
onAction="M_snb"/>
</group>
</tab>
</tabs>
</ribbon>
</customUI>
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.