Print side | Luk vindue

Farvelægning

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Generelt
Forum beskrivelse: Hjælp til generel daglig brug af programmet Excel
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=625
Udskrevet den: 17.Maj.2024 kl. 05:48


Emne: Farvelægning
Besked fra: Mons
Emne: Farvelægning
Posteringsdato: 26.Jan.2012 kl. 15:56
Hej derinde!
 
Er der nogen der ved hvordan man får hele rækken som curseren står i, til at skifte til en bestemt farve.
 



Svar:
Besked fra: excelent
Posteringsdato: 26.Jan.2012 kl. 17:05
Du kan fx anvende følgende kode i arkets kodemodul
 
Dim adr As String
Dim farve
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If adr <> "" Then Rows(adr).Interior.ColorIndex = xlNone
farve = Target.Interior.ColorIndex
Rows(Target.Row).Interior.ColorIndex = 35
adr = Target.Row
End Sub
 
Problemet er blot at evt. bestående farver slettes
 
En løsning med Betinget format kan du finde i kategorien Formater


Besked fra: kbno
Posteringsdato: 27.Jan.2012 kl. 07:56
1000 Tak - den låner jeg lige  Wink

-------------
Hygge - Kim
Excel 365 DK user



Print side | Luk vindue