ON/OFF-nappi

Anonyymi

Tarkoituksena on luoda valintaruutu, josta saa tiettyjen solujen tekstin näkyviin ja pois näkyvistä.

Olen luonut kaksi makroa, joista toinen piilottaa tekstin muuttamalla fontin värin valkoiseksi ja toinen muuttaa värin takaisin mustaksi.

Miten saan yhdistettyä nämä kaksi makroa? Vai miten tuo olisi paras/helpoin tapa toteuttaa?

Tällä hetkellä valintaruutu toimii vain yhdellä makrolla, eli muuttaa tekstin joko valkoiseksi tai mustaksi, kun se on TOSI/EPÄTOSI-tilassa, mutta ei tee molempia.

VBA:lla tämän kai saisi jotenkin toiminaan, mutta minulla ei ole sen käytöstä tarpeeksi kokemusta.

1

874

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Anonyymi

      Onnistuu ilman makrojakin.

      Käytä solua A1 valintaruutuna. Kaikkiin niihin soluihin, jotka haluat päälle ja pois, tulee kaava =IF(A1="x"; "tekstiä"; "") Voit käyttää piilottamiseen kaavan sijasta myös tekstin valkoiseksi muuttavaa ehdollista muotoilua ja siinä ehtona =($A$1="x")

      Toinen vaihtoehto on käyttää CheckBoxia, jonka linkität soluun A1. Piilotettaviin tekstisoluihin kaava =IF(A1; "tekstiä"; "")

      Jos haluat käyttää nappia, makrossa tulee olla seuraava koodi ja muu, kuten edellisessä esimerkissä:
      Range("A1") = Not (Range("A1")).

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Olet taitava

      monessa asiassa. Myös siinä, miten veit sydämeni. Äkkiarvaamatta, pikkuhiljaa. Yhtäkkiä huomasin että minusta puuttuu jo
      Ikävä
      74
      7314
    2. Sinällään hauska miten jostakin

      jaksetaan juoruta vaikka mitä. Jakorasia yms. Raukkamaista toimintaa. Annetaan jokaisen elää rauhassa eikä levitellä per
      Ikävä
      58
      3143
    3. Mikä ihme sai sut käyttäytymään

      Niin helvetin törkeästi mua kohtaan, jos kerta olet ihastunut?
      Ikävä
      34
      2390
    4. Osuuspankki Kuhmo!

      Ei pysty pitämään yhtä Otto pankkiautomaattia toiminnassa Ksupermarketin kanssa,20 vuotta sitten Kuhmossa oli neljä auto
      Kuhmo
      27
      1938
    5. Voi helvetti

      Mihin olet mut ajanut.
      Ikävä
      20
      1908
    6. Tiedät etten tiedä

      Mitä pitäisi tehdä.
      Ikävä
      13
      1877
    7. Rakkaalleni!

      Halusin tulla kertomaan, että sinua ajattelen ja ikävöin vaikka olen sukuloimassa. Meinasin herkistyä, kun tykkään sinus
      Tunteet
      13
      1612
    8. hyvää yötä.

      toivottavasti sulla oli kiva jouluaatto. 🤍
      Ikävä
      18
      1569
    9. Hyvää joulua!

      Naiselle. Tänä vuonna tutustuttiin ❤️
      Ikävä
      10
      1569
    10. Työttömyys kasvaa

      Onneksi persujen kannatus ei kasva.
      Perussuomalaiset
      52
      1568
    Aihe