Helppo kysymys!

ernoP

Miten saan laskulomakkeessa excelin laittamaan automaattisesti laskunumeron?
Eli jos kirjoitan laskun ja numeroksi vaikka nyt 1, millä funktiolla ohjelman saisi laittamaan seuraavaan laskuun numeroksi 2 jne...

6

371

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • riippuu miten haluat automatisoida
      esim. seuraavilla tapahtumilla
      kun avaat työkirjan
      kun suljet työkirjan
      kun tallennat työkirjan
      kun tulostat työkirjan
      kun solussa oleva tieto muuttuu esim.asiakas
      tuplaklikkaamalla taulukossa
      hiiren oikealla klikkaamalla taulukossa
      napilla

      eiköhän tossa ollut tarpeeksi vaihtoehtoja ja sitten vaan tapahtumaan koodi esim
      Sub Auto_Open()
      Range("A1") = Range("A1") 1
      End Sub

    • ernoP

      Esimerkiksi painike-makrolla, joka lisäisi ko soluun aina yhden... ?
      Miten?

      • Private Sub CommandButton1_Click()
        Range("A1") = Range("A1") 1
        End Sub


      • ernoP
        kunde kirjoitti:

        Private Sub CommandButton1_Click()
        Range("A1") = Range("A1") 1
        End Sub

        Kiitos!

        Mitenkäs saan nappiin toiminnon joka avaa toisen "välilehden" samasta työkirjasta? ja siihen vastaavan joka sulkee sen?


      • ernoP kirjoitti:

        Kiitos!

        Mitenkäs saan nappiin toiminnon joka avaa toisen "välilehden" samasta työkirjasta? ja siihen vastaavan joka sulkee sen?

        käsitteet hiukan hukassa.
        Työkirjan sisällä ei voi avata tai sulkea taulukoita ("välilehtiä")- vain aktivoida
        mutta mai pen rai...
        napin koodi...
        Private Sub CommandButton1_Click()
        Worksheets("Taul1").Activate
        End Sub

        Private Sub CommandButton2_Click()
        Worksheets("Taul2").Activate
        End Sub


      • ernoP
        kunde kirjoitti:

        käsitteet hiukan hukassa.
        Työkirjan sisällä ei voi avata tai sulkea taulukoita ("välilehtiä")- vain aktivoida
        mutta mai pen rai...
        napin koodi...
        Private Sub CommandButton1_Click()
        Worksheets("Taul1").Activate
        End Sub

        Private Sub CommandButton2_Click()
        Worksheets("Taul2").Activate
        End Sub

        juu hukassa on mutta vähitellen... ;-) kiitos ohjeista!!


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

    Luetuimmat keskustelut

    1. Vihamielisyys naisia kohtaan on jo yllättävän suuri ongelma

      Esiintyy laajemmassa mittakaavassa, mitä vain tällä palstalla. Mistä tuo ilmiö nyt oikein johtuu, ja saa alkuvoimansa?
      Sinkut
      632
      2902
    2. Muistatko kaivattusi

      Syntymäpäivän? Päivämäärä riittää. 🌹
      Ikävä
      107
      1522
    3. Odotan sitä hetkeä

      kun nähdään taas. Tiedän, että sinäkin odotat. Kun se päivä koittaa, katseesi hakee minua. Ehkä arkailemme toisiamme väh
      Ikävä
      69
      1498
    4. Olen melko vakuuttunut

      etten tule olemaan koskaan täysin onnellinen ilman sinua. En uskonut, että näin kävisi kenenkään kanssa. Kunnes sain kok
      Ikävä
      83
      1390
    5. Minkälaisessa asennossa

      Haluaisit kaivattusi kanssa olla?
      Ikävä
      114
      1284
    6. Leijonat Maailmanmestareita!

      Ihanaa Leijonat, ihanaa!!!
      Maailman menoa
      138
      1276
    7. 104
      1125
    8. Postimerkki kirjeeseen ja kortiin maksaa jo 3 euroa!

      https://yle.fi/a/74-20229241 Kyllä tämä on järjetön hinta, Posti tuhoaa itsensä tällä hinnalla, täytyyhän Postin "Herro
      Maailman menoa
      138
      1051
    9. Sinä siellä lähistöllä

      Tahtoisin tutustua paremmin 💫
      Ikävä
      48
      960
    10. Mulla on ikävä

      sua nainen ja niitä katseita ❤️ Lupaatko, että katseemme kohtaa taas?
      Ikävä
      49
      929
    Aihe