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

959

    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. Zelenskyi ei suostunut nöyrtymään Trumpin ja Vancen edessä, siksi meni pieleen

      Trumppia täytyy imarrella, silloin homma toimii aina. Tähän Zelenskyi ei suostunut.
      Maailman menoa
      656
      5340
    2. Harmi että

      Pidät niin vastenmielisenä. Olen minäkin välissä ollut ihan kamala sinulle ja ihmetellyt miten voit minusta tykätä. Se o
      Ikävä
      21
      2367
    3. Ajattele miten

      Paljon ottajia sinulla olisi
      Ikävä
      113
      1592
    4. Trump näytti slipoveri-ukolle kaapin paikan!

      Slipoveri-ukko Ukrainan presidentti Volodimir Selenskyi meni tapaamaan valkoiseen taloon Trumppia ilman kunnon tuliaisia
      Kajaani
      231
      1550
    5. Tekisitkö jotain toisin

      Kaivattusi kanssa alusta alkaen? 😍
      Ikävä
      93
      1477
    6. En rehellisesti usko et oisit

      Sekuntiakaan oikeasti mua kaivannut. Tai edes miettinyt miten mulla menee. Jotenkin todennäköisesti hyödyt tästäkin jos
      Ikävä
      23
      1416
    7. Nainen, olet jotenkin lumoava

      Katselen kauneuttasi kuin kuuta, sen loistoa pimeässä. Sen kaunis valo on kaunista sekä herkkää ja lumoavaa. Olet naisel
      Ikävä
      68
      1175
    8. Näin sinusta taas unta!

      Unessa olin pakahtuneesti rakastunut sinuun. Olimme vanhassa talossa jossa oli yläkerran huoneissa pyöreät ikkunat. Pöly
      Ikävä
      9
      1143
    9. Kun Zele jenkeissä kävi

      Enää ei Zele saanutkaan miljardeja ilmaista rahaa niin helposti. Läksyttivät oikein kunnolla pientä miestä ja joutui poi
      Maailman menoa
      302
      1105
    10. Tulee ikävä

      Ja toivon että saan anteeksi ❤️
      Ikävä
      72
      1047
    Aihe