07. januar 2021 - 12:44Der er
10 kommentarer og 2 løsninger
Makro, skifte tekst farve i en celle i den eller de markerede rækker
Hejsa,
Prøver at få nedenstående til at virke, men den driller. Det er en knap jeg har tildelt en makro. Den skal i den eller de markerede rækker sætte NEJ i celle B og Ja i celle M, den skal ligeledes ændre farven på teksten i celle D.
Dem virker ikke med hensyn til farven og heller ikke ved markering af flere rækker.
Hvad mangler jeg, ud over mere viden til programmering?
Sub Estm_Knap() ' ' Estm_Knap Makro ' Sætter celle B til NEJ og M til JA, tekst i celle D grønlig, i den markerede række(r) '
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Sub Estm_Knap() ' ' Estm_Knap Makro ' Sætter celle B til NEJ og M til JA, tekst i celle D grønlig, i den markerede række(r) ' Dim R1, RT R1 = Selection.Rows(1).Row RT = Selection.Rows.Count For x = R1 To R1 + RT Range(Cells(x, 2), Cells(x, 2)) = "Nej" Range(Cells(x, 13), Cells(x, 13)) = "Ja" Range(Cells(x, 4), Cells(x, 4)).Font.Color = RGB(131, 200, 130) Next End Sub
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.
