25. september 2006 - 17:06Der er
7 kommentarer og 1 løsning
Tilpas macro
kan nogen hjælpe mig med at rette denne macro til, så den opfylder følgende krav.
1. hvis kolonne I er mindre end kolonne G, kolonne I = rød tekst 2. hvis kolonne I er optil 10% større end kolonne G, kolonne I = greøn tekst 3. hvis kolonne I er mere end 10% større end kolonne G, kolonne I = blå tekst
Range("G2").Select Range(Selection, Selection.End(xlDown)).Select For Each C In Selection.Cells If C.Value > C.Offset(0, 2).Value Then C.Offset(0, 2).Font.ColorIndex = 3 ElseIf (C.Value + (C.Value / 10)) < C.Offset(0, 2).Value Then C.Offset(0, 2).Font.ColorIndex = 5 Else C.Offset(0, 2).Font.ColorIndex = 8 End If Next
Støv, fibre og metalliske partikler kan påvirke både uptime, levetid og driftssikkerhed. Derfor arbejder flere datacentre systematisk med contamination control.
Da der er tale om et filindtræk og kolonne G ændres kan betinget formattering ikke bruges :-( formlerne kommer til at se sådan ud: 1. =I3<#reference! 2. =OG(I3<=(#reference!*1,1);I3>=#reference!) 3. =I3>#reference!*1,1
Ja, nemlig ja. Sammen med en hel del anden formatering og "save as".
Synes godt om
Ny brugerNybegynder
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.