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

313

    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. Kuka oli töllöntyön tekijä?

      Ketä on nyt pidätetty? Oliko syy mustasukkaisuus tyttöystävästä tai oliko muita lieventäviä seikkoja? Katuuko tekijä nyt
      Pieksämäki
      37
      4481
    2. Kotikasvatus siitä se lähtee eli missä meni vikaan että lapsesta tuli puukottaja

      Ottakaa muut oppia, normaali kotielämä. Ei liikaa edes hengellisyyttä.
      Pieksämäki
      52
      2399
    3. Kun kohtaat jotain ainutlaatuista

      ja upeaa, johon rakastut ehkä ensimmäistä kertaa ihan tosissaan. Sitten sähläät kaiken omien epävarmuuksien vuoksi. Eikö
      Ikävä
      48
      1452
    4. Minkälaisessa asunnossa

      haluaisit kaivattusi kanssa asua?
      Ikävä
      93
      1288
    5. Ei tämä enää tervettä oo

      Sydän pamppaillen oon jo tunnin meinannu laittaa sulle viestiä... Sormi tärisee lähetä kuvakkeen kohdalla.
      Ikävä
      28
      1247
    6. Mua ahdistaa

      Tämä juttu. Miksi nainen torjuit minut vaikka kiinnostuksen merkkejä oli? Eihän tämän jutun olisi tarvinut johtaa sen pi
      Ikävä
      38
      1188
    7. Perämoottoreiden huolto melkoisen kallista

      Minulla on tuollainen keskikokoinen perämoottori ja yleistä merkkiä. Kyselin sille keväthuoltoa paikallisista liikkeistä
      Savonlinna
      54
      1159
    8. Jenkkilahkojen kastekaava

      Jenkkilahkojen yhteinen kastekaava on kirjoitettuna Mormonin Kirjaan, Moroni, luku-8 Pienten lapsien vanhempia uhataan
      Kaste
      139
      994
    9. Pasi Turunen: Ensimmäisenä Helluntaina ei kastettu sylivauvoja!

      Tänään 31.5.2026 Pasi Turunen noin vastasi soittajan kysymykseen! Raamattu EI KERRO ketä kastettiin
      Kaste
      161
      965
    10. Mikä siinä on että sinkku yrittää varattua?

      Siis ihan aina yrittävät muiden puolisoita.
      Sinkut
      60
      931
    Aihe