Auto filter

asiasta tietämätön

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.

2

288

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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

    1. Kaipaatko sinä

      Yhtään meidän katseita
      Ikävä
      170
      2071
    2. Törkeä eläinsuojelurikos Sonkajärvellä

      Pohjois-Savossa Sonkajärvellä noin 40 kissaa ja reilut 10 koiraa on jouduttu lopettamaan kaltoinkohtelun vuoksi, kertoo
      Sonkajärvi
      37
      1455
    3. Jotkut ihmiset pelkäävät syöpää sairastavaa

      On hauskaa, kun kertoo jollekin, että "minulla on syöpä". Jotkut käyttäytyvät kuin se olisi tarttuva tauti. Eivät uskall
      Sinkut
      132
      1154
    4. Se ei ihan oikeasti vaatisi kuin yhden

      Tekstiviestin... Jos rakastat minua vielä toivoisin että laittaisit minulle viestiä. Rakastatko? Oletko oikeasti niin pe
      Ikävä
      56
      892
    5. olisit voinut mies edes

      Pyytää anteeksi 🙏🫶
      Ikävä
      55
      846
    6. Lavrov suivaantui Stubbille perustellusti.

      Lavrov perusteli suivaantumistaan tosiasioilla Suomen tarinasta sotiemme jälkeen, tutkija Tynkkynen ja pankkihenkilö Sol
      Maailman menoa
      250
      804
    7. Kääminsä polttanut taksi suomussalmella

      Vieläkö sillä hermonsa menettäneellä hulluja ylinopeuksia ajavalla asiakkaansa haukkuvalla( jos ajat paska kyydin hänen
      Suomussalmi
      20
      782
    8. Jorma Uotinen avaa sanaisen arkkunsa TTK-miesparista ja koko uudistuksesta: "Sehän on..."

      Tanssii Tähtien Kanssa -parketilla nähdään ensimmäistä kertaa Suomessa tanssiparina miespari kauden alusta asti. Mikko S
      Tanssii tähtien kanssa
      17
      732
    9. Aina ku nään sun kuvan

      Tekis mieli kirjoittaa viesti: Moi kulta, on ikävä❣️🤗 ihan noin vain, lyhyt ja ytimekäs 😁🤭
      Ikävä
      58
      713
    10. Sukupuolia on vain kaksi- kohukassista tuli kova tuomio perheenisälle oikeudessa.

      https://www.iltalehti.fi/kotimaa/a/4d4db0d9-4dda-4ba6-a699-25d725683ad6 Miten näin normaalista kassissa olevasta tekstis
      Maailman menoa
      197
      631
    Aihe