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

687

Äänestä

    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.

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Virkamiehille tarvitaan tuntuvat palkankorotukset

      Naistenpäivänä on syytä muistuttaa, että virkamiehen euro on vain 80 senttiä. Palkat tulee saattaa samalle tasolle yksi
      Maailman menoa
      56
      4446

    2. Riikka Purran kaudella nousi bensan hinta yli 2 euron

      Muistatteko kuinka edellisen vasemmistohallituksen aikana, ns. Marinin aikakaudella, bensiiniä sai 1,3 euron litrahinnal
      Maailman menoa
      85
      4137

    3. Jäikö meidän välit

      Mielestäsi Kesken?
      Ikävä
      70
      3598

    4. Olisipa saanut sinuun

      Tutustua paremmin. Harmi että aloin lopulta jännittämään kun näytit tunteesi niin voimakkaasti ja lähestyit niin voimaak
      Ikävä
      96
      3520

    5. Mitäs nyt sijoittajat?

      Pörssit laskevat maailmalla Iranin sodan takia ja muutenkin ovat olleet Trumpin vallan alla epävarmat. Ainoa, mikä on no
      Maailman menoa
      110
      2557

    6. Miks tän meidän

      Rakkauden on pitänyt olla näin vaikeaa?
      Ikävä
      35
      2388

    7. Elän vastoin

      Kaikkia arvoja kun en pysy sinusta erossa.
      Ikävä
      37
      2272

    8. muista olla

      VAROVAINEN! m
      Ikävä
      24
      2269

    9. Onneksi on edes yksi kuva

      Susta mitä voin välillä ihastella ja kaipailla sua😔
      Ikävä
      38
      2249

    10. Olisitpa se hellä

      Ja herkkä minkä kuvan sain sinusta irl. Haluaisin että elämässäni olisi sellainen joka arvostaa minua juuri sellaisena k
      Ikävä
      23
      2134
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt