Miten saan tehtyä VBA:lla conditional formating -muotoilun, jossa sääntönä käytetään FormulaR1C1-muotoista kaavaa? esim. jos solu RC[-2]:n arvo on 0 niin solun taustaväri punaiseksi, tms.
Nyt kun nauhoitan makron jossa teen haluamani conditional formatingin soluun E2, on tulos muotoa
Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=IF(C2=TODAY();1;0)"
...eli absoluuttisen referenssin (C2) tilalle pitäisi saada suhteellinen referenssi (RC[-2]), niin että kaava toimii. Miten?
Conditional formatting VBA:lla
...
1
276
Vastaukset
With ActiveCell
.FormatConditions.Delete
.FormatConditions.Add Type:=xlExpression, Formula1:="=IF(RC[-2]=TODAY();1;0)"
.FormatConditions(1).Interior.ColorIndex = 3
End With
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 1261710
- 1051195
Postimerkki kirjeeseen ja kortiin maksaa jo 3 euroa!
https://yle.fi/a/74-20229241 Kyllä tämä on järjetön hinta, Posti tuhoaa itsensä tällä hinnalla, täytyyhän Postin "Herro1381071- 49979
- 128877
Keitä oli kunnanjohtajan erottajat?
Kouluja ei ole varaa ylläpitää mutta johtajasopimukseen palaa 100000 euroa ja uuden johtajan hakuprosessi maksaa kymmeni51870Atte Harjanne usuttaa eläkeläisvihaan
Karmeeta kuultavaa aamun uutislähetyksessä, kun Atte Harjanne, tunnettu eläkeläisvihaaja, suitsii sukupolvien välistä v240838Helsingin Mäntymäki muuttui Kultajuhlan jälkeen kaatopaikaksi.
Mitä se kertoo jääkiokosta ja lätkäfaneista? Saikkua huomenna huusi fani yöllä?70745Pridekulkue kiellettävä?
Näin täällä suoraan vaaditaan. Perusteina mitä mielikuvituksellisimmat tarinat. No, miksi ihmeessä kukaan ei ole samalla178719Mä oon tyytyväinen, että ei ole enää tunteita.
Samalla tajusin, että sun kohdalla tykkäsin enemmän niistä tunteista kuin sinusta persoonana. Halusin väkisin nähdä sinu55709