Hei!
Tietääkö kukaan, saako "autofilteröintiflägin" värin muutettua? Nyt se on sininen ja vaikea havaita, mikä sarake on suodatettu ja mikä ei.
Kiitos, jos joku tietää mitä tarkoitan ja osaa sanoa voiko värin muuttaa vai ei.
Auto filter
asiasta tietämätön
2
293
Vastaukset
- googlaili
niin vastaus tuntuu olevan ettei sitä voi vaihtaa...
mutta voihan suodatettavan kentän otsikkorivin vaihtaa helposti...
alla oleva koodi vaatii jonkun excelin VOLATILE funktion käyttämistä ko taulukossa
jaa, että mitä ne VOLATILE funktiot on? Jääköön se lukijan selvitettäväksi, mutta lisää taulukkoosi johonkin soluun kaavaksi esim lontoonkielellä =TODAY tai suomiversiossa =TÄMÄ.PÄIVÄ() niin allaoleva koodi toimii...
eli koodi muuttaa suodatetun kentän taustavärin nyt keltaiseksi, joten sen ainakin huomaa
taulukon moduuliin...
Private Sub Worksheet_Calculate()
Dim SuodatusRivi As Integer
Dim laskuri As Integer
Dim Kentat As Integer
On Error Resume Next
Application.EnableEvents = False
SuodatusRivi = Me.AutoFilter.Range.Row
Kentat = Me.AutoFilter.Filters.Count
Range(Cells(SuodatusRivi, 1), Cells(SuodatusRivi, Kentat)).Interior.ColorIndex = xlNone
If ActiveSheet.FilterMode = True Then
For laskuri = 1 To Kentat
If ActiveSheet.AutoFilter.Filters.Item(laskuri).On Then
'nyt keltainen muuta allaolevaa numeroa
Cells(SuodatusRivi, laskuri).Interior.ColorIndex = 6
End If
Next laskuri
End If
Application.EnableEvents = True
On Error GoTo 0
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Putin lähti takki auki sotaan....
Luuli, että kolmessa päivässä hoidetaan, nyt on mennyt 3,5 vuotta eikä voitosta tietoakaan. Kaiken lisäksi putin luuli,1053565Näitä venäjä-faneja tuntuu edelleen vaan riittävän - kummallista
ja lähinnä siis ihan suomalaisia. Mitä hienoa ja hyvää he näkevät maassa joka on diktatuuri, maassa jossa ei ole sananv2302333Ulkoistin makuaistini Yleisradiolle
Nyt voimme luottaa siihen, että Virallinen Totuus tekee maistelutyön puolestamme. Me persulandiassa arvostamme priimaa,02130Sanna on pakottaja, domina
Pakotti sadistisessti työttömät hakemaan töitä, josta seurasi hirmuinen työttömyys. Näin on asia, jos uskomme Hesarin k381869Skodan hankintaan painostaminen toi potkut
Kylläpä on kovat keinot käytössä, kun on yritetty pakottaa hankkimaan Skoda painostuskeinoilla. Kyllä valinnan pitää oll91669- 951128
No onneks ei tartte sit olla
Mustis ku se ootki sinä itte 😂😂 Oon pelännyt että ehkä teille kehkeytyy jotain enemmän ku niin paljon yhteistä mut....5920- 51892
Lahden kolarisuma ja automaattinen hätäjarrutusjärjestelmä
Olisiko uudehkojen autojen automaattinen hätäjarrutusjärjestelmä vähentänyt kolareiden määrää tuolla Lahden tiellä? Sumu70860Sinkkuihmisten suppea kuva maailmasta.
Siskoni on jo vannoutunut sinkku. Hän ei haaveile mitään suhdejuttuja. Mutta välillä mietin, miten vähän ja suppeasti130822