Excel VBA - ändra cellfärg vid musklick

Permalänk
Medlem

Excel VBA - ändra cellfärg vid musklick

Hej
Jag försöker att få celler inom ett visst intervall att byta fär när jag klickar på dem (eller använder eftersom de äe hyperlänkar till andra blad i samma dokument)

Jag har använt koden

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Range("A3:E7"), Target) Is Nothing Then Target.Interior.ColorIndex = 4 End If End Sub

Jag fick det att fungera, men när jag sparat dokumentet och öppnar det igen fungerar inte "ändra färg vid musklick" längre. Koden står kvar men verkar inte fungera. Några lösningsförslag eller förslag på andra angreppssätt för att ändra färg på klickade celler?

Jag har själv väldigt liten kunskap i programmering och har googlat mig fram till ovanstående och sen ändrat intervall och färg.

Tack på förhand
Marklar

Visa signatur

"Imagination is more important than knowledge"

Permalänk
Medlem

Det fungerar för mig.
Vilken version av Excel har du? Har du sparat den som macroversion av excelfil?

Permalänk
Avstängd
Skrivet av Marklar:

Hej
Jag försöker att få celler inom ett visst intervall att byta fär när jag klickar på dem (eller använder eftersom de äe hyperlänkar till andra blad i samma dokument)

Jag har använt koden

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Range("A3:E7"), Target) Is Nothing Then Target.Interior.ColorIndex = 4 End If End Sub

Programmets inställningar för makrosäkerhet kanske hindrar koden från att köras?

Lite info om detta:
Excel 2003:
Om makrosäkerhet - Excel - Microsoft Office
Excel 2007:
Ändra säkerhetsinställningar för makron i Excel - Excel - Microsoft Office
Excel 2010:
Ändra makroinställningar för säkerhet i Excel - Excel - Microsoft Office

Visa signatur

Tysta datorer är bäst!

Permalänk
Medlem

Tack så mycket för hjälpen. Antagligen var det något med säkerhetsinställningarna. Det fungerade inte när jag startade om Excel, men det fungerade vid omstart av datorn (fick då ändra excel-inställningarna igen). Nu fungerar det iaf.

Tack så mycket båda två

Visa signatur

"Imagination is more important than knowledge"