25. august 2011 - 20:41Der er
6 kommentarer og 1 løsning
Betinget formatering
Hej!
Jeg har prøvet og indspille en makro når der oprettes en betinget formatering på et excelark, men det kan ikke lade sig gøre.
Spørgsmål: Er der nogen som kan hjælpe med et VBA forslag til hvordan en VBA-makro som opretter en betinget formatering skal laves, - eller kan dette ikke lade sig gøre ????
I dette særtema om aspekter af AI ser vi på skiftet fra sprogmodeller til AI-agenter, og hvordan virksomheder kan navigere i spændet mellem teknologisk hastighed og behovet for menneskelig kontrol.
With Worksheets(1).Range("e1:e10").FormatConditions _ .Add(xlCellValue, xlGreater, "=$a$1") With .Borders .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = 6 End With With .Font .Bold = True .ColorIndex = 3 End With End With
Til Thor_Østergaard, Dit forslag er udmærket jeg tænkte bare ikke lige i den retning. Jeg ville gerne have en VBA-kode som kunne oprette en betinget formatering for et område på mit ark, hvorefter det kunne ses under betinget formatering.
Jeg havde vist ikke set mig rigtig omkring. Dit forslag er helt korrekt, det var lige det jeg manglede, og det kan også ses under betinget formatering, tak. Men hvordan eller hvor finder man den korrekte værdi for Corlerindex ?
Dit første svar var lige det jeg skulle bruge, læg et svar til point.
Du kan bruge denne lille snut kode for se de forskellige værdier af colorindex
Sub colorindex() Dim i As Integer Range("A1").Select For i = 1 To 56 With ActiveCell .Value = i .Interior.colorindex = i .Offset(1, 0).Select End With Next End Sub
Tak for hjælpen, det med colorindex har jeg funderet over længe hvordan jeg fandt ud af det, - tak for hjælpen.
Point er sat til dig.
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.
Slettet bruger
Ny bruger
Nybegynder
Opret
Preview
