Søg
Avatar billede Slettet bruger
24. januar 2015 - 16:17 Der er 1 kommentar og
1 løsning

Skift farve på celler ud fra ord

Hej Eksperter.

Jeg har en userform der kan oprette text og en farve, som bliver lageret i ark2(Skjult).
Disse data i ark2 kan fks. være med 15 ord eller flere med forskellige farver, med andre ord ubegrænset.

I ark1 kan man skrive fks. F og så skifter den til blå.
Eller S og så skifter den til gul.
Ordene og farverne kan ændres i userform.

Forstiller mig noget med loop i vba kode, men er ikke sikker.

En der kan hjælpe mig på vej eller en der har en kode liggende?
tak på forhånd.
Avatar billede Slettet bruger
25. januar 2015 - 00:20 #1
Kender godt ala denne kode.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Error
If Target = "" Then Target.Interior.ColorIndex = -4142
If Target = "F" Then Target.Interior.ColorIndex = 15
If Target = "FF" Then Target.Interior.ColorIndex = 5
If Target = "S" Then Target.Interior.ColorIndex = 20
Exit Sub
Error:
End Sub

Eller.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Error
If Target = Range("E1").Value Then Target.Interior.ColorIndex = Range("F1").Interior.ColorIndex
If Target = Range("E2").Value Then Target.Interior.ColorIndex = Range("F2").Interior.ColorIndex
If Target = Range("E3").Value Then Target.Interior.ColorIndex = Range("F3").Interior.ColorIndex
If Target = Range("E4").Value Then Target.Interior.ColorIndex = Range("F4").Interior.ColorIndex
Exit Sub
Error:
End Sub

Men som sagt ville koderne blive lange og forvirrende og nok langsomme.
Avatar billede Slettet bruger
07. april 2015 - 14:05 #2
Ej løst - lukker
Avatar billede 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.

Loading billede Opret Preview
Kategori
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
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
Tips til at mestre Excel hurtigt Af MonikaG32 i Excel 4 04/03/202617:11 06/03/202609:37
Båndet i Excel online har ændret størrelse Af Monique i Excel 3 19/02/202614:23 20/02/202608:26
Fjern tekst efter mellemrum Af ABE15 i Excel 2 18/02/202620:41 19/02/202611:30
Udskrift af ark Af boro23 i Excel 4 17/02/202608:38 18/02/202607:46
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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 00:56 3 skærme 27 Af bbm i Skærme
20/0316:18 "gratis" "reklamefri" hjemmeside -næsten --som man kan lave i søvne : Af Novice-1 i Andet software
19/0316:52 Proxy router/server Af joki i Routere & Switches
19/0311:04 Icotera vs Nokia fiberboks Af Uvanga i Routere & Switches
18/0323:30 Outlook send/modtag manuelt Af pwn i Office & Kontorpakker
White papers
Flere white papers »