Opgelost sheetwissel functie

[Melkveehouder]

Beste helpers,

In voorbeeld bestand wil ik met vinkje blad2 en blad3 wisselen, maar het werkt niet met de code, weet iemand hoe dat wel moet?

Alvast dank

 

[AHulpje]

Het is natuurlijk niet handig om je selectievakje op Blad3 te plaatsen en je code achter Blad1. Maar probeer het eens zo:

 

[Melkveehouder]

Dank voor je reactie, dat was idd even een foutje, maar jouw keuzevak werkt bij mij niet, is het wellicht een instelling?

 

[edmoor]

Met je eigen selectievakje in je voorbeeld document, dit in een Module:

Sub Selectievakje1_Klikken()
    Sheets("Blad2").Visible = IIf(Range("C10"), 0, -1)
    Sheets("Blad3").Visible = Range("C10").Value
End Sub

NB:
Het document van AHulpje werkt prima.

 

[Melkveehouder]

Heb het in een module geplaatst, maar krijg het niet werkend, wat gaat er fout?

Het bestand van AHulpje werkt nu wel idd

 

[AHulpje]

Je moet de macro nog wel koppelen aan het selectievakje:
Rechtermuisknop op selectievakje
Macro toewijzen

 

[Melkveehouder]

idd opgelost, allen dank