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

688

    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. Suomalainen tutkimus paljasti oudon asian vasemmistolaisista - he häpeävät itseään

      Kyllä, asia on faktaa. Suomalainen tutkimus osoittaa, että vasemmistolaisina itseään pitävät kansalaiset häpeävät itseää
      Maailman menoa
      138
      3819
    2. Sosialismia Tampereella: Virallinen ilmiantolinja avautuu kaupungissa

      Nyt siis mennään mansessa ihan justiinsa samaan malliin kuin entisessä Neuvostoliitossa, jossa saattoi ilmiantaa naapuri
      Maailman menoa
      336
      2954
    3. Tätä et nähnyt tv:ssä: Frederik paljastaa - Totuus "haisevasta jäynästä" pehtoorille Farmilla

      Frederik veti ns. herneen nenään ja päätti kostaa pehtoorille. Mitäs mieltä olet Frederikin "aamutoimista"? Lue jutt
      Tv-sarjat
      8
      1855
    4. Ellen Jokikunnas paljastaa kyynelehtien Ralph-pojasta: "Apua..."

      Ellen Jokikunnaksen ja hänen puolisonsa Jari Raskin perheestä ja taloprojektista Italiassa kertova Unelmia Italiassa -sa
      Suomalaiset julkkikset
      5
      1588
    5. Oho! Vappu Pimiä teki "röyhkeän" teon - Onko sopivaa paljastaa tämä MasterChef-sarjasta?

      Vappu Pimiä on astunut MasterChef Suomi -keittiöön ja liittynyt ohjelman legendaariseen tuomaristoon Helena Puolakan ja
      Tv-sarjat
      4
      1069
    6. Mun kaikkialta häviäminen

      Ei liity sinuun. Muista se. ❤️ Mua kiusataan enkä mä enää jaksa.
      Ikävä
      71
      914
    7. Kaste tulisi tehdä apostolisella tavalla Ap. t. 2:38 mukaan

      Apostolit eivät kastaneet kolminaisuuden nimellä vaan Jeesuksen alkuperäisen käskyn mukaisesti: Ap. t. 2:38 Niin Pietar
      Kaste
      38
      854
    8. Onko teillä

      minkä tyyppisiä seksifantasioita kaivattunne kanssa?
      Ikävä
      44
      764
    9. Inhottaa ajatus siitä

      Miten monia olet pannut.
      Ikävä
      65
      731
    10. Kuhmossa rallit alkoi ennen aikojaan

      Paettiin polliisia törkeästi? Se tuo rallikiima on näemmä saavuttanu paikalliset tommi mäkiset kiljupäissään auton rat
      Kuhmo
      22
      708
    Aihe