Gå til innhold
🎄🎅❄️God Jul og Godt Nyttår fra alle oss i Diskusjon.no ×

Endre farge å en hel rad i Excel basert på en celleverdi


ilpostino

Anbefalte innlegg

Jeg har et stort regneark i Excel og har sett på betinget formatering for å endre fyllfargen på en rad hvis cellen i kolonne C har en gitt tekstverdi. Jeg mistenker jeg kan bruke formelen =SØK() men jeg har ikke helt fått det til. Noen tips?

 

edit: sitter med norsk Excel 2013 og den norske varianten av formelen over er SØK

Endret av ilpostino
Lenke til kommentar
Videoannonse
Annonse

Har du prøvd å bruke en macro? Jeg bruker en macro for å gjøre det. Se spolier.

I ditt tilfelle blir det:

Select Case Cells(Target.Row, "C").Value

Så legger du inn "range" for eks. "A1:AA80" eller den rangen du vil fylle ut med farge. Jeg bruker engelsk Excel 2010, har aldri brukt norsk Excel.

 

Koden legger du inn i selve arket, høyreklikk på ark fanen of velg "Se Kode" (regner med det heter dette på norsk. Lim så inn koden min og forandrer på det du vil, slett den delen av koden du ikke trenger.

 

 

 

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A5:CW75")) Is Nothing Then Exit Sub
Select Case Cells(Target.Row, "D").Value
Case "EOSP"
Range(Cells(Target.Row, "A"), Cells(Target.Row, "CW")).Interior.ColorIndex = 19
Case "SOSP"
Range(Cells(Target.Row, "A"), Cells(Target.Row, "CW")).Interior.ColorIndex = 40
Case "HFO"
Range(Cells(Target.Row, "A"), Cells(Target.Row, "CW")).Interior.ColorIndex = 34
Case "ULSFO"
Range(Cells(Target.Row, "A"), Cells(Target.Row, "CW")).Interior.ColorIndex = 33
Case "ALL FAST"
Range(Cells(Target.Row, "A"), Cells(Target.Row, "CW")).Interior.ColorIndex = 20
Case "ALL CLEAR"
Range(Cells(Target.Row, "A"), Cells(Target.Row, "CW")).Interior.ColorIndex = 42
Case "LSMGO"
Range(Cells(Target.Row, "A"), Cells(Target.Row, "CW")).Interior.ColorIndex = 37
Case ""
Range(Cells(Target.Row, "A"), Cells(Target.Row, "CW")).Interior.ColorIndex = xlNone
Case Else
Range(Cells(Target.Row, "A"), Cells(Target.Row, "CW")).Interior.ColorIndex = xlNone
End Select
End Sub

 

 

Endret av Chavalito
Lenke til kommentar

Betinget formatering er nok det beste. Som Horge viser til over her.

Her kan du velge at

 

JA blir grønn i enten teksten eller hele cellen.

NEI blir rød i enten teksten eller hele cellen.

 

Du kan lage betinget formatering på det meste av tall osv. Ingen vanskelig formler for dette.

Lenke til kommentar

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
  • Hvem er aktive   0 medlemmer

    • Ingen innloggede medlemmer aktive
×
×
  • Opprett ny...