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

1010

Äänestä

    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ä.

    Takaisin ylös

    Luetuimmat keskustelut

    1. Persujen vaalilupaus oli euron bensa

      Nyt puhutaan jo kolmen euron bensasta. Kyseessä on Suomen historian törkein vaalipetos.
      Maailman menoa
      89
      2088

    2. Vain vasemmistohallitus saa minut menemään töihin

      Änkyräkapitalistien sortaessa kansaa en laita rikkaakaan ristiin. Elän mielummin Kelan tuilla, ja jos niitä leikataan, n
      Maailman menoa
      33
      2050

    3. Maataloustuet perittävä korkojen kera takaisin

      Yrittäjiltä jotka ovat myyneet tuotantoaan ulkomaille. Veronmaksajan kustantama tuki on tarkoitettu elintarvikkeiden hi
      Maataloustuki
      50
      1815

    4. Topi osti Askon

      Hieno mies. Pelastaa työpaikkoja. Kiitokset myös emännälleen, joka pitää isännän virkeänä. https://www.is.fi/taloussan
      Maailman menoa
      75
      1350

    5. Mitä kirjainta kaipaat?

      Pitkästä aikaa tämmöistä. Onko kirjain muuttunut edellisestä. ☺️
      Ikävä
      86
      1221

    6. Kastaa ja upottaa on eri sanat

      Kastaa ja upottaa on eri sanat ja niillä on eri merkitys. Eikä Jeesusta haudattu upottamalla maahan kaivettuun kuoppaan
      Kaste
      219
      1131

    7. Uskomatonta touhua!

      Ei olis uskonut että kateus yrittäjää kohtaan menee noin pitkälle. TTP:ssa irrotettu sähköjohto jäätelöaltaasta. Kaikki
      Haapavesi
      31
      1019

    8. Miten hän sinua katsoi?

      😊😊😊😊😊😊
      Ikävä
      67
      916

    9. Oliko se oikeasti epäselvää

      sinulle että olin ihastunut sinuun? (Ymmärrän että siitä on aikaa, eikä voi olettaa että kaikkea muistaisi tai että men
      Ikävä
      48
      902

    10. Miksi eduskuntatalon portaille sytyttään tänään 8 645 kynttilää?

      Oikeus elämään ry järjestää lauantaina 21.3.2026 tapahtuman, jossa Eduskuntatalon portaille sytytetään 8 645 kynttilää.
      Luterilaisuus
      278
      864
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt