VBA codes beveiliging

[JurS]

ik heb VBA codes in mijn bestand zitten,
alleen als ik de map ga beveiligen dan geeft hij een foutmelding

en als ik dan op beeindigen klik, veranderd de kleur niet, en bij elke cel waar ik op klik krijg ik elke x weer opnieuw die foutmelding,

hoe kan iik dit verhelpen ( Excel 2003 )


Gr. JurS

 

[danny147]

Beste JurS

Wat staat er in de code ?

OF

Plaats een bestandje hier zonder gevoelige informatie.

Groetjes Danny. :thumb:

 

[JurS]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A1:A2500").EntireRow.Interior.ColorIndex = xlNone
ActiveCell.EntireRow.Interior.ColorIndex = 46
End Sub

dit is de code

en dit is de foutmelding:

fout 1004 tijdens uitvoering
eigenschap colorindex van klasse interior kan niet worden ingesteld


Gr. JurS

 

[Warme bakkertje]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
activesheet.unprotect
Range("A1:A2500").EntireRow.Interior.ColorIndex = xlNone
ActiveCell.EntireRow.Interior.ColorIndex = 46
activesheet.protect
End Sub

 

[JurS]

beste Warme bakkertje,

helemaal super,,
hij werkt nu bij beveiliging:thumb:

Super bedankt
danny147 en Warme bakkertje.


Groetjes JurS

 

[danny147]

Beste JurS

Kan je dan de vraag op opgelost zetten, onderaan rechts.

Groetjes danny. :thumb: