04. september 2009 - 15:31Der er
4 kommentarer og 1 løsning
Hjælp til makro
Hej eksperter. Jeg har lavet en makro som fjerner indholdet af otte Celler, hver gang jeg trykker på en knap Den kan sikkert laves enklere, men det har jeg ikke nok styr på.. Makroen ser således ud.
Public Sub Slet() Range("b2").ClearContents Range("b3").ClearContents Range("b6").ClearContents Range("b10").ClearContents Range("b12").ClearContents Range("b14").ClearContents Range("b16").ClearContents Range("b18").ClearContents End Sub
Jeg ville gerne have at makroen også (hver gang jeg trykker på knappen) kunne springe mellem cellerne E2 til H2 til K2 til N2 osv. og tilbage til E2 og sætte en lys baggrundsfarve i cellen hver gang den stod der. Kan det lade sig gøre? Ib
Hej execelent. Selvfølgelig skulle min formel se sådan ud, men jeg kunne ikke rigtig finde seperatorene. Din formel virker ikke lige som det jeg ønskede. Jeg prøver lige at forklare mig lidt bedre. Første gang jer klikker på min knap skal den resette, som den også gør, og sætte en baggrundsfarve kun i celle E2. Næste klik resetter og baggrundsfarve kun i H2. Osv. og femte klik tilbage til celle E2. Håber det gav mere mening. Ib
For t = 5 To 14 Step 3 If Cells(2, t).Interior.ColorIndex = 37 Then x = t Next Range("E2,H2,K2,N2").Interior.ColorIndex = xlNone x = x + 3 If x < 4 Then x = 5
If x > 14 Then x = 5 Cells(2, x).Interior.ColorIndex = 37
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.
