Exceliin nappi joka suorittaa laskun?

Apuja kaivataan

Miten saan taulukkoon laitettua napin tai checkboxin joka painettuna saa arvon 1 ja suorittaa haluamani laskun ja un-chekattuna palautuu 0?

4

684

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • apuja kaivataan

      Haluan siis että
      kaava m5=B5*$B$2 b5 on joko 1 tai 0 jota haluan napilla ohjata. ettei tarvi aina laittaa numeroa ruutuun.

      • askeltaja

        Lomakkeet > Askellin. Piirrä "Askellin". 2*klikkaa sitä. "Muotoile ohjausobjektia" Ohjaus-välilehdellä annat tarvittavat arvot ja OK. Nyt nuolia painamalla vaihdat 1 tai 0.


      • apuja kaivataan
        askeltaja kirjoitti:

        Lomakkeet > Askellin. Piirrä "Askellin". 2*klikkaa sitä. "Muotoile ohjausobjektia" Ohjaus-välilehdellä annat tarvittavat arvot ja OK. Nyt nuolia painamalla vaihdat 1 tai 0.

        Taas on tullut opittua jotain uutta, kiitos.
        Mutta valitettavasti ongelmani ei ratkennut täysin.
        Minun on nähtävä kokoajan mikä ruutu on chekattuna (arvo1 tai 0), eli
        a5:k23 välille tulee joka ruutuun näitä "nappeja".

        Siksi haluaisin joko napin tai checkboxin. Jos nappi niin napissa tulisi olla teksti 1 kun painettuna ja täysin harmaa ilman tekstiä jos ei painettuna eli 0.


      • apuja kaivataan kirjoitti:

        Taas on tullut opittua jotain uutta, kiitos.
        Mutta valitettavasti ongelmani ei ratkennut täysin.
        Minun on nähtävä kokoajan mikä ruutu on chekattuna (arvo1 tai 0), eli
        a5:k23 välille tulee joka ruutuun näitä "nappeja".

        Siksi haluaisin joko napin tai checkboxin. Jos nappi niin napissa tulisi olla teksti 1 kun painettuna ja täysin harmaa ilman tekstiä jos ei painettuna eli 0.

        valintaruudulle ja vaihto nppulalalle koodit...

        Private Sub CheckBox1_Click()
        If CheckBox1 Then
        CheckBox1.Caption = 1
        Range("B5") = 1
        Else
        CheckBox1.Caption = 0
        Range("B5") = 0
        End If
        End Sub

        Private Sub ToggleButton1_Click()
        If ToggleButton1 Then
        ToggleButton1.Caption = ""
        Range("B5") = 0
        Else
        ToggleButton1.Caption = 1
        Range("B5") = 1
        End If
        End Sub


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

    Luetuimmat keskustelut

    1. Nyt tuli Suomen somaleista todella ikävää faktaa

      sillä osa somalivanhemmista lähettää lapsiaan kotimaahansa kurinpitolaitoksiin, joissa heitä pahoinpidellään. Illan MOT
      Maailman menoa
      329
      3912
    2. Häirintäkohun keskellä olevalta kansanedustajalta Jani Kokolta (sd) rajua tekstiä somessa.

      https://www.is.fi/politiikka/art-2000011772322.html Ajaakohan tämä SDP:n kansanedustaja Jani Kokko oikein täysillä valoi
      Maailman menoa
      128
      3590
    3. Kommentti: oikeuslaitos korvattava SDP:n johdolla

      Näkisin että Suomessa tuomiovalta pitäisi olla demareiden johtoportaalla. Koska porvarimedia säestettynä persujen kirku
      Maailman menoa
      5
      2302
    4. Onko kaivattusi spesiaali?

      Millä tavalla ja miten?
      Ikävä
      112
      1704
    5. Huono päivä

      Tänään on ollut tosi raskas päivä töissä. Tekis mieli itkeä ja huutaa. En jaksa just nyt mitään. Minä niin haluaisin ja
      Ikävä
      18
      1628
    6. Typeryyttä

      Se on kummallista, kun kaksi ihmistä tuntee selittämätöntä vetoa toisiinsa, mutta eivät vain pääse toistensa luokse. Mik
      Ikävä
      124
      1349
    7. Martina mukana erikoisjoukossa

      Huippurankka Erikoisjoukot-ohjelma jatkuu, Martina mukana. Kerrankin Martinalle hyvä ohjelma, hänellä on voimaa, sisua j
      Kotimaiset julkkisjuorut
      144
      973
    8. Lindtman haluaa leikata Kela-korvauksista...oho!

      Antti Lindtman sanoo Kauppalehdessä, että vuodesta 2028 voi tulla erittäin hankala, mikäli nykyinen hallitus ei tee riit
      Maailman menoa
      101
      949
    9. Häneen rakastuminen oli sellaista

      että aina uskoi ja luotti että kyllä tästä vielä edetään jotenkin. Se olikin vain rakastuneen toiveajattelua kaikki. Ta
      Ikävä
      79
      875
    10. Huonosti.

      Oletko kohdellut kaivattuasi huonosti? Miksi?
      Ikävä
      86
      791
    Aihe