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

631

    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. Anna minulle anteeksi

      Anna minulle anteeksi. Minä pyydän.
      Ikävä
      158
      1941
    2. Kun viimeksi kohtasitte/näitte

      Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...
      Ikävä
      131
      1754
    3. Olet kyllä vaarallisen himokas

      Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.
      Ikävä
      102
      1527
    4. Anna vielä vähän vihreää valoa

      Teen sitten siirtoni, nainen. Tiedän, että olet jo varovaisesti yrittänyt lähestyä, mutta siitä on jo aikaa. Jos tunnet
      Ikävä
      17
      1223
    5. Mikä on hän on ammatiltaan?

      Vai tiedätkö mitä kaivattusi tekee työkseen?
      Ikävä
      71
      1218
    6. Mitä ajattelit silloin kun

      Löysit hänet?
      Ikävä
      68
      1181
    7. Syksyinen aamuketju suden

      Hyvää huomenta ja kaunista syyspäivää. 🌞🍁🍂☕
      Ikävä
      220
      978
    8. Oletko tutustunut muihin

      Samalla tavalla kuin häneen?
      Ikävä
      70
      805
    9. Uskotko että kohdataan vielä?

      Kysymys otsikossa, aloitukseen ei muuta lisättävää.
      Ikävä
      45
      740
    10. Miksi homous puhuttaa konservatiiveja vuodesta toiseen?

      Kysymykseen on vastattukin Kansanlähetyksen osalta: "Miksi sukupuoleen ja seksuaalisuuteen liittyvät asiat ovat konserv
      Luterilaisuus
      194
      723
    Aihe