Selectievakje traag werkblad

[JoepG]

Beste allemaal,

Ik heb een excel document met een tablad waar veel selectievakjes op staan.
Nu is de enige functie van het selectievakje dat deze wordt aangevinkt bij wat van toepassing is.
echter reageert excel erg traag.
Er wordt eerst een marco uitgevoerd waarbij regels verborgen worden die niet van toepassing zijn.
Weet iemand wat hier de oorzaak van kan zijn?




Verder zijn er op basis van verschillende keuzes op een ander werkblad, code's die worden uitgevoerd in deze vorm.

If Sheets("Data").Range("F5") >= 10 Then
Rows("95:98").Hidden = False
Rows("101:102").Hidden = True
Rows("143:144").Hidden = False
Rows("195:196").Hidden = False
Else
Rows("95:98").Hidden = True
Rows("101:102").Hidden = False
Rows("143:144").Hidden = True
Rows("195:196").Hidden = True
End If

 

[edmoor]

En je verwacht dat daar iets over gezegd kan worden zonder het document te kunnen inzien en zonder dat je laat zien aan welke gebeurtenis de code die je plaatste hangt?

 

[JoepG]

Ik ga proberen een voorbeeldje te maken, en hier te uploaden.

 

[snb]

1. omdat je werkblad onhandig gestruktureerd is
2. omdat je macro niet handig gerogrammeerd is
3. omdat de macro's onnodig vaak worden uitgevoerd
4. omdat wellicht onnodig vaak Excel berekeningen worden herhaald.
5. omdat vinkjes in een werkblad overbodig zijn
6. omdat er betere alternatieven zijn dan een overdaad aan vinkjes.

 

[JEC.]

In de bijlage een voorbeeld, adhv lettertype en een doubleclick event. Werkt veel beter dan selectievakjes, zoals eerder vermeld.
Dubbel klik in het aangegeven gebied om te testen.

 

[JoepG]

Dank je wel voor de Tip Jveer,
Ik ga kijken of dit werkt,
Een voorbeeld bestand vanuit het origineel is niet echt te doen.
Zal eerst met voorbeeld aan de gang gaan, en anders alsnog een voorbeeld opstellen.

 

[PeterBijns]

Wat een leuke en mooie oplossing, maar ik snap niet hoe het komt dat als je een a invoert er een groen vinkje te zichtbaar wordt.
Is dat iets wat je kunt instellen of doet de macro dit?

Groet, Peter

 

[edmoor]

Kijk eens naar het lettertype van die cel

 

[PeterBijns]

Bedankt voor je snelle reactie, zo simpel kan het dus zijn.

Groet, Peter

 

[PeterBijns]

alvast weer bedankt.
Groet, Peter

 

[PeterBijns]

Vreemd dat de vraag in mijn eerdere post verdwenen is. Mijn vraag is of het ook mogelijk is om in niet aaneen gesloten kolommen ook een vinkje kan ingeven.
Bedankt weer en groet, Peter

 

[AD1957]

Pas de range aan.
Bijvoorbeeld

Range("B2:B8,D2:D8,F2:F8")

 

[PeterBijns]

Alweer zo simpel, het werkt perfect dank je wel.

Groet, Peter