Print side | Luk vindue

"Highlight" aktiv celle

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=1861
Udskrevet den: 20.Maj.2024 kl. 14:01


Emne: "Highlight" aktiv celle
Besked fra: HAUGAARD
Emne: "Highlight" aktiv celle
Posteringsdato: 07.Nov.2014 kl. 09:02
Hej
Jeg har nedenstående VBAkode placeret i "ThisWorkbook". Koden "highligter" (ændrer baggrundsfarve fra INGEN FARVE til min VALGTE FARVE) i den aktuelle aktive celle og ændrer baggrundsfarven tilbage til INGEN FARVE, når en ny celle aktiveres.
 
Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)
Static OldRange As Range
On Error Resume Next
Target.Interior.ColorIndex = 36 ' lysegul farve
OldRange.Interior.ColorIndex = xlColorIndexNone
Set OldRange = Target
End Sub
 
Jeg vil gerne ændre koden således, at den ikke længere aktive celle, skifter tilbage til den baggrundsfarve den havde FØR aktiveringen, istedet for som nu, at skifte til INGEN FARVE.
 
mvh
Haugaard


Svar:
Besked fra: HAUGAARD
Posteringsdato: 07.Nov.2014 kl. 09:07
Jeg skrev forkert ovenfor:
Jeg har nedenstående VBAkode placeret i "ThisWorkbook". Koden "highligter" (ændrer baggrundsfarve fra AKTUEL FARVE til min VALGTE FARVE) i den aktuelle aktive celle og ændrer baggrundsfarven tilbage til INGEN FARVE, når en ny celle aktiveres.
 
Haugaard


Print side | Luk vindue