selectievakje andere waarde geven

[RobertHak]

Beste forum leden,

In een werkblad heb ik diverse selectievakjes staan.
Deze vakjes kunnen dmv het muisklikken op aan of uit gezet worden.
Ik wil ze echter ook afhankelijk van een bepaalde handeling in een bepaalde sub op true of false kunnen zetten.
Met de ActiveX selectie vakjes lukt me dit.

In dit geval gebruik ik de formulier besturingselementen en lukt het helaas niet.
Nu gebruik ik de code:

If ...........then
Range(“sv_209”).Value = True
End With
End Sub

( sv_209) is de naam die ik het selectievakje heb gegeven in het naamvak)

De Active X besturingselementen leveren bij mij de volgende probelemen op:
Iedere keer als ik deze activeer (klik) wordt hij groter en groter, ik krijg dit niet opgelost helaas
Weet iemand hier toevallig ook een oplossing voor, of is dit een Bug zoals ik volgens mij op enkele engels talige forums lees.

Alvast bedankt voor de reacties

Gr
Robert

 

[Niels28]

Bij deze.

sheets(1).sv_209 = True

Als je door blijft gaan met vragen te stellen zonder te reageren op andere vragen die nog open staan haken er helpers af.

Niels

 

[RobertHak]

Niels,
Bedankt voor de reactie.
Ik heb 2 berichten op opgelost gezet, je hebt gelijk dat ik dit al had moeten doen.
1 bericht staat nog open in afwachting op een reactie.


Jouw voorstel mbt het selectievakje werkt helaas niet omdat ik wellicht iets mis.

Ik krijg nu FOUT 438, Deze eigenschap of methode wordt niet ondersteund door dit opject.

Alvast bedankt,

Robert Hak

 

[Niels28]

Dan heeft jouw checkbox die naam niet.
Zet ontwerpmodus aan. klik Rmuis op de checkbox => eigenschappen.
Bij name staat de juist naam van de checkbox.


zie bijlage

Bekijk bijlage checkbox.xlsm


Niels

 

[RobertHak]

Bedankt voor het voorbeeld.

In het voorbeeld is een checkbox gebruikt uit de active X besturingsobjecten gebruikt.
Hier heb ik problemen mee. ( het probleem heb ik ook in deze vraag aan gegeven en ook een keer in een aparte vraag op het forum geplaatst). na een keer of 4 is de check box enorm van formaat veranderd.

Om dit te omzeilen zoek ik een oplossing met een selectievakje uit de formulier besturingsobjecten.

Lukt het om daar ook dmv de code het vinkje aan of uit te zetten?

Alvast bedankt

 

[Niels28]

Gebeurt dat ook in mijn voorbeeld bestand?

Volgens mij kun je de formulier selectievakje niet aan/uit zetten via VBA.

Niels

 

[RobertHak]

Ja helaas ook in jouw bestand.

zie bijlage. gebruik je excel 2007 of 2010


Bekijk bijlage checkbox.xlsm

 

[Niels28]

Ik gebruik excel 2007.

Maar je vakje is niet groter geworden maar kleiner ik kan hem nog net zien.
Bij blijft hij dezelfde grote.

Misschien toch verstandig je excel opnieuw te installeren

Niels

 

[RobertHak]

Helaas mag de nieuwe installatie niet baten.
Mogelijk komt er in de toekomst een oplossing.

in ieder geval bedankt