Laskutuspohjan teko

oksapussi

Heippa,

Tarkoitukseni olisi tehdä laskupohja, josta tiedot kopioituisi lähetteeseen ja keräilylaskuun. Lähetteen teko ei sinänsä ongelma vaan tuon valikoivan keräilylaskun.

Mitenkä saisin ohjattua sitä, kenen asiakkaan keräilylaskuun (taulukkoon) kirjoitetun laskun tiedot kopioituisivat. Laskupohjassa asiakas valittaisiin pudotusvalikosta. Jos vaikka jokainen asiakas olisi omana taulukkonaan, ja laskupohja olisi samassa tiedostossa näiden kanssa.

Ja löytyisikö joku systeemi, jolla tuon keräilylaskun "tuotenimiketila" kasvaisi sitä mukaa mitä laskuja tehdään?

Taulukkojen nimet olisivat seuraavat (esimerkiksi):
Laskupohja
Lähete
Keräilylasku Virtanen
Keräilylasku Korhonen
Keräilylasku Heinonen
Keräilylasku Halonen


Ymmärtiköhän kukaan? Kiitos jo etukäteen.

8

980

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ei kummonen juttu...

      muokkaa sopivaksi muuttamalla solualueita

      nyt kopioi aktiivisesta taulukosta (laskupohja) solussa H30 olevaan asiakasnimen nimiseen taulukkoon tiedot A sarakkeeseen ekaan tyhjään soluun

      ...koodia
      Range("A10:K15").Copy Sheets(Range("H30").Text).Range("A65536").End(xlUp).Offset(1, 0)
      ...koodia

      • oksapussi1

        Meni nyt hieman ohi..

        Eli jos kuvitellaan että tuossa H30 solussa (laskupohja-taulukko) on nimi Matti Peräpää, niin seuraavaksi menen taulukkoon jonka nimi on Matti Peräpää ja sen A-sarakkeen ensimmäiseen soluun tehdään tuo makro?

        Vai?...


      • oksapussi1 kirjoitti:

        Meni nyt hieman ohi..

        Eli jos kuvitellaan että tuossa H30 solussa (laskupohja-taulukko) on nimi Matti Peräpää, niin seuraavaksi menen taulukkoon jonka nimi on Matti Peräpää ja sen A-sarakkeen ensimmäiseen soluun tehdään tuo makro?

        Vai?...

        ei todellakaan, vaan jos oot tehnyt napin tai käytät jotakin tapahtumaa niin siihen sitten liität koodinpätkän....

        oletuksenas kopioi nyt laskupohjasta A10:K15 alueen laskupohjassa H30 olevaan asiakkaan nimiseen taulukkoon esim. solusta A13 alaspäin, jos solussa A12 on tietoa jne


    • Wintologi

      Voihan tuon Exelilläkin tehdä, mutta itse lähtisin kyllä tuohon hommaan Accesilla. Käyttö olisi asiakasrekisterin ja tuoterekisterin kera joustavaa. Ja raportoinnista saisit kullanarvoista tietoa myynnistä tuoteryhmittäin, asiakasryhmittäin sekä tietysti asiakaskohtaisesti.

    • oksapussi1

      Noniin, ehkä rupea vähän pääsemään jyvälle, mutta kuitenkin vielä kaukana tavoitteesta :)

      Olen tehnyt nyt painikkeen, johon olen liittänyt makron jonka koodi on

      ...koodia
      Sub Testi()
      Range("A10:K15").Copy
      Sheets(Range("A1").Text).Range("A65536").End(xlUp).Offset(1, 0)
      End Sub
      ...koodia

      nappulaa painaessa rupeaa herjaamaan Cant execute in break mode. A1 solussa lukee Matti ja olen tehnyt taulukon nimeltä Matti.

      missä siis mättää?

      • lisää nappi ohjausobjekteista ja lisää ko.taulukon moduulissa siihen koodi(oletus CommandButton1

        Private Sub CommandButton1_Click()
        Range("A10:K15").Copy Sheets(Range("A1").Text).Range("A65536").End(xlUp).Offset(1, 0)
        End Sub


    • oksapussi1

      Oijoi, sain toimimaan! Kiitos erittäin paljon avusta!

    • oksapussi1

      ..tai en saanutkaan.

      Tämä kopiointi toimii vain yhdelle nimetyistä taulukoista. Jos valitsee jonkun muun niin excel herjaa Runtime error ´9´: Subscript out of range

      Kaikki pitäisi olla kunnossa, mutta jostain syystä tuohon yhteen taulukkoon vain toimii.

      Missä mahtaisi olla vika?

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

    Luetuimmat keskustelut

    1. Useita puukotettu Tampereella

      Mikäs homma tämä nyt taas on? "Useaa henkilöä on puukotettu Tampereen keskustassa kauppakeskus Ratinan lähistöllä." ht
      Tampere
      239
      4613
    2. Kuka rääkkää eläimiä Puolangalla?

      Poliisi ampui toistakymmentä nälkiintynyttä eläintä Puolangalla Tilalta oli ollut karkuteillä lähes viisikymmentä nälkii
      Puolanka
      76
      3055
    3. Leipivaaran päällä on kuoleman hiljaista.

      Suru vai suuri helpotus...
      Puolanka
      47
      2463
    4. Meneeköhän sulla

      oikeasti pinnan alla yhtä huonosti kuin mulla? Tai yhtä huonosti mutta jollain eri tyylillä? Ei olisi pitänyt jättää sua
      Ikävä
      45
      1767
    5. Laitetaas nyt kirjaimet tänne

      kuka kaipaa ja ketä ?
      Ikävä
      28
      1703
    6. Koska näit kaivattusi viimeksi

      Milloin tapasit rakkaasi? Ja etenikö suhde yhtään?
      Ikävä
      79
      1451
    7. Lähetä terveisesi kaipaamallesi henkilölle

      Vauva-palstalta tuttua kaipaamista uudessa ympäristössä. Kaipuu jatkukoon 💘
      Ikävä
      85
      1285
    8. PS uusimman gallupin rakettimainen nousija

      https://yle.fi/a/74-20170641 Aivan ylivoimaisesti suurin kannatuksen nousu PS:lle. Nousu on alkanut ja jatkuu 2 vuoden
      Maailman menoa
      143
      965
    9. Tekiskö nainen mieli tavata...

      Viikonloppuna ja...?
      Ikävä
      69
      948
    10. Sellainen tunne sydämessä

      Että nainen olet kaivannut minua. Tai sanonko että oikeastaan koet sitä samaa nostalgiaa, kaipuuta ja mukavia muistoja,
      Ikävä
      86
      894
    Aihe