Notifikationer

Markér alle som læst Log ud

OGN Nybegynder

16. august 2011 - 20:18 Der er 7 kommentarer

Excel 2003 - Formatering på baggrund af celle værdi...igen...

Er klar over at der er MANGE spørgsmål og svar ang. dette, men synes ikke jeg har fundet det jeg søger.

I et ark har jeg 10 værdier,f.eks. "møde". Alle felter hvor der tastes "møde" skal være grønne. næste værdi en anden farve, osv.

Betinget formattering kan håndtere 3 betingelser.
Hvordan gør jeg når jeg har brug for flere ?

Jeg er analfabet hvad angår VB...

Synes godt om

vejmand Juniormester

16. august 2011 - 20:38 #1

Jeg er også analfabet hvad angår VBA, men måske du kan få noget ud af dette:
http://www.ezz.dk/478371-betinget-formattering

Ellers kommer der sikkert én forbi, som kan forklare koden. :-)

Synes godt om

store-morten Ekspert

16. august 2011 - 21:21 #2

Prøv:
Kopier koden
Højreklik på ark1 vælg "Vis programkode"
Tryk ctrl + v
Luk på det røde kryds

Skriv "møde" i celle B1 og cellen bliver grøn.
Skriv 1 til 10 i celle B1 og cellen bliver farvet.
Slet og alt andet = ingen farve.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("B1:B10"), Target) Is Nothing Then
With Target
Select Case Target.Value
Case "møde"
.Interior.ColorIndex = 4
Case 1
.Interior.ColorIndex = 5
Case 2
.Interior.ColorIndex = 6
Case 3
.Interior.ColorIndex = 7
Case 4
.Interior.ColorIndex = 8
Case 5
.Interior.ColorIndex = 9
Case 6
.Interior.ColorIndex = 10
Case 7
.Interior.ColorIndex = 11
Case 8
.Interior.ColorIndex = 12
Case 9
.Interior.ColorIndex = 13
Case 10
.Interior.ColorIndex = 14
' Tom celle, ingen farve
Case Else
.Interior.ColorIndex = xlNone
.Font.ColorIndex = 1
End Select
End With
End If
End Sub
'Farvekoder til Interior.Colorindex
'0 = Tom 1 = Sort
'2 = Hvid 3 = Rød
'4 = KnaldGrøn 5 = Blå
'6 = Gul 7 = Pink
'8 = Turkis 9 = Rødbrun
'10 = Grøn 11 = Mørkeblå
'12 = Olivengul 13 = Violet
'14 = Blågrøn 15 = Grå 25%
'16 = Grå 50% 17 = Støvet Blå
'18 = Blomme 19 = Støvet Lys Gul
'20 = Blegturkis 21 = Støvet Violet
'22 = Støvet Lyserød

Synes godt om

OGN Nybegynder

17. august 2011 - 08:01 #3

Hej Store-Morten,

Fungerer perfekt!.. super fedt. Tak for hutig udrykning :-)

/Ole

Synes godt om

store-morten Ekspert

17. august 2011 - 08:53 #4

Velbekomme.

Synes godt om

store-morten Ekspert

13. oktober 2011 - 19:02 #5

Respons ønskes ;-)

Synes godt om

vejmand Juniormester

13. oktober 2011 - 19:06 #6

OGN >> Sådan lukker du spørgsmålet:
http://www.youtube.com/watch?v=s26DGiuvXBo

Synes godt om

store-morten Ekspert

25. marts 2012 - 15:47 #7

http://www.youtube.com/watch?v=s26DGiuvXBo

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Excel kurser

Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Samle data fra flere kolonner i 1 Af FinnLauridsen i Excel	4	17/04/202616:11	18/04/202608:16
Træk data fra ny lokation ved måneds skift Af Hezo i Excel	6	13/04/202614:32	15/04/202611:04
Makro der gemmer vedhæftet fil fra Msg og omdøber filen Af lokesa i Excel	2	31/03/202610:22	31/03/202611:47
Stempel ur start og stop Af lurup i Excel	2	23/03/202613:24	31/03/202610:27
Hvordan bruges indeks & sammenlign når der skal søges over flere kolonner? Af Laugesen1 i Excel	4	08/03/202611:56	08/03/202613:57

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS