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

926

    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. Ikävöin sinua kokoyön!

      En halua odottaa, että voisin näyttää sinulle kuinka paljon rakastan sinua. Toivon, että uskot, että olen varsin hullun
      Ikävä
      44
      3126
    2. Kova karman laki

      Karman lain kautta pahantekijä tehdessään pahaa toteuttaa koston ja rangaistuksen sille jolle pahaa on tehty. Tämä tarko
      Hindulaisuus
      508
      1917
    3. Päivieni piristys, missä olet?

      Toit iloa ja valoa mun elämään ☀️ Nyt mennyt kohta viikko ettei ole nähty. Kaipaan nähdä sua silti ja pelkään vaikka tei
      Ikävä
      17
      1900
    4. Näen jatkuvasti Sompasaunalla alastomia miehiä ja naisia

      jotka menevät siihen viereiseen rantaan myös uimaan alasti. Sompasaunat on siis Mustikkamaalla Helsingissä, ja kuljen si
      Maailman menoa
      78
      1680
    5. Älä mahdollisesti ota itseesi

      En voinut tietää. Sitäpaitsi.. niin
      Ikävä
      18
      1502
    6. Jos sinä olisit pyrkimässä elämääni takaisin

      Arvelisin sen johtuvan siitä, että olisit taas polttanut jonkun sillan takanasi. Ei taida löytyä enää kyliltä naista, jo
      Tunteet
      43
      1388
    7. Ota nainen yhteyttä ja tee Tikusta asiaa?

      Niin sitten minä teen Takusta asiaa.
      Ikävä
      26
      1322
    8. Millainen kaivattusi luonne on?

      Millaisia luonteenpiirteitä arvostat kaivatussa? Oletteko samanlaisia luonteeltanne?
      Ikävä
      90
      1319
    9. Helena ja Mikko Koivun ero jatkuu edelleen ja loppua ei näy.

      Voi eikä, miksi menee noin vaikeaksi avioero ja sopua ei tää ex- pari vaan saa.
      Kotimaiset julkkisjuorut
      114
      1147
    10. UPM suunnittelee paperintuotannon lopettamista LPR:ssa

      Ilta-Sanomissa oli uutinen. Metsäyhtiö UPM suunnittelee paperintuotannon lopettamista Kaukaan-tehtaalla Lappeenrannassa
      Lappeenranta
      110
      1123
    Aihe