KNOP (formulierbesturingselement) van kleur laten veranderen

Status
Niet open voor verdere reacties.
H

harmnaberman

Gebruiker
Lid geworden
31 jan 2019
Berichten
44
Hallo,

Kan ik ook een KNOP (formulierbesturingselement) van kleur laten veranderen.

Rood = als ik nog niet op de knop heb gedrukt (knop is standaard dan altijd rood).
Groen = Als ik op de knop heb gedrukt

Waarom wil ik het doen:
Omdat ik de knoppen op een sheet heb staan en wat de knoppen allemaal uitvoeren komt op een andere sheet te staan.
Met de kleurtjes kan ik dan snel zien welke knoppen ik al heb gedrukt.

Zie de plaatje voor welke KNOP ik bedoel.

Ik hoop dat iemand mij kan helpen.

Groet,
Harm
 

Bijlagen

  • Image 5.jpg
    Image 5.jpg
    110,2 KB · Weergaven: 51
Waarom niet gewoon ActiveX knoppen gebruiken?
Dat is zoveel eenvoudiger.
 
edmoor zei:
Waarom niet gewoon ActiveX knoppen gebruiken?
Dat is zoveel eenvoudiger.
Klik om te vergroten...

Bedankt voor u snelle reactie.
Ik heb dat ook al even bekeken, maar hoe kan ik zien dat een knop is bedient dan?

Dat is mij nog niet helemaal duidelijk.
 
Plaats de code in een module...
Code: 
Sub kleurtje()
 activesheet.Shapes(Application.Caller).Fill.ForeColor.RGB = vbGreen 'of de rgb kleur: RGB(getal,getal,getal) getal is 0 t/m 255.
End Sub

Maak een knop op het werkblad uit Menu Invoegen Vormen.
Rechtermuisklik "macro toewijzen".
 
Ik neem aan dat je wilt dat een eenmaal gebruikte knop groen blijft, ook na het sluiten en opnieuw openen van het document:
Bekijk bijlage harmnaberman.xlsm
Dat kan overigens ook met de methode van HSV.
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan