Een actieve cel kleuren

[poom]

Goede middag,

Ik heb een beveiligd werkblad waar een aantal cellen moet worden ingevuld.
Om dit makkelijker te maken voor de gebruiker wil ik de achtergrondkleur van
de actieve cel tijdelijk wijzigen.
Ik heb bij jullie gezocht en een dergelijke vraag ook gevonden (9 aug 2007) in
het voorbeeldbestand "Kleurt actieve cel.xls"). Echter deze code werkt niet bij mij
en geeft: fout 424, Object vereist.
Wie wilt mij helpen deze code aan te passen?
([Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Unprotect
Cells.Interior.ColorIndex = xlNone
Target.Cells.Interior.ColorIndex = 6
ActiveSheet.Protect
End Sub]

Bij voorbaat dank!

 

[pasan]

bij mij werkt het wel
gebruik code tags dat leest makkelijker
waar heb jij de code geplakt? achter de sheet zelf toch?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Unprotect
Cells.Interior.ColorIndex = xlNone
Target.Cells.Interior.ColorIndex = 6
ActiveSheet.Protect
End Sub

 

[poom]

Ik heb de code inderdaad achter de goede sheet gezet.
Het werkt nu wel, maar bij het starten vraagt hij iedere keer om het wachtwoord in te vullen en dat is
niet de bedoeling.
Zal ik het bestand als bijlage meesturen?

 

[pasan]

heb je misschien handmatig een wachtwoord ingevuld een keer? verwijder eerst handmatig het wachtwoord en probeer dan nog een keer op een cel te klikken
Je zegt starten!! wat start je precies? je wil iets in een cel invullen of elke keer als je een cel aanklikt?

 

[poom]

Even een nadere toelichting.
Het bestand is een programma voor het wekelijks verwerken van uitslagen gemaakt in een biljartcompetitie waaraan
29 teams deelnemen. Voor het invoeren van de uitslagen zijn 6 invoercellen waarnaar de curser via de Tab-toets automatisch
naar toe springt. Het programma wordt al via codes beveiligd.
Het bewuste programma zend ik ter verduidelijking als bijlage mee.Bekijk bijlage CompBBCS14-15.xls

 

[pasan]

zo dan

 

[poom]

actieve cel kleuren

Pasan,

Heel hartelijk bedankt voor je kennis, hulp en het supersnel reageren.
Het werkt prima!

poom.