Beste allemaal.
Ik kopieer nu telkens vanuit een formulier gegevens naar een rij op een tabblad. Diezelfde gegevens zie ik ook weer terug in het formulier op een soort pre-vieuw in labels. Elke rij kent 7 labels. Totaal zijn er 8 regels die ik kan invoeren. Het invoeren van de gegevens per rij gebeurd in een ander frame van het formulier. Telkens als ik dan op de knop: "Invoeren" klik, worden de gegevens op de vrije regel van de "previeuw" geplaats en op het betreffende tabblad waar de gegevens uiteindelijk op moeten staan, wordt de eerste rij ingevuld. Het moge duidelijk zijn dat bij het invoeren van de 2e regel op het formulier deze gegevens weer worden doorgeschreven naar de 2e rij op het tabblad enzovoort.
Op zich leuk, maar ik wil dit anders hebben. Ik wil eerst alle regels invoeren die ik nodig heb in het formulier en pas zodra dit klaar is wil ik middels een knop alle regels in 1 keer naar het tabblad wegschrijven.
Wat ik nu heb is:
Deze code moet dus worden aangepast zodat alle 8 regels van het formulier in 1 keer wordt weggeschreven naar het tabblad.
Is dit mogelijk? En zo ja is daar een simpele code voor die ik in 1 keer kan overnemen en plaatsen en aanpassen in VBA, of moet ik hier echt een apart bestandje voor gaan zitten puzzelen en hier plaatsen. In het laatste geval ben ik wel even zoet daar het bestand te groot is om hier te plaatsen.
Ik kopieer nu telkens vanuit een formulier gegevens naar een rij op een tabblad. Diezelfde gegevens zie ik ook weer terug in het formulier op een soort pre-vieuw in labels. Elke rij kent 7 labels. Totaal zijn er 8 regels die ik kan invoeren. Het invoeren van de gegevens per rij gebeurd in een ander frame van het formulier. Telkens als ik dan op de knop: "Invoeren" klik, worden de gegevens op de vrije regel van de "previeuw" geplaats en op het betreffende tabblad waar de gegevens uiteindelijk op moeten staan, wordt de eerste rij ingevuld. Het moge duidelijk zijn dat bij het invoeren van de 2e regel op het formulier deze gegevens weer worden doorgeschreven naar de 2e rij op het tabblad enzovoort.
Op zich leuk, maar ik wil dit anders hebben. Ik wil eerst alle regels invoeren die ik nodig heb in het formulier en pas zodra dit klaar is wil ik middels een knop alle regels in 1 keer naar het tabblad wegschrijven.
Wat ik nu heb is:
Code:
Sheets("Blad1").Cells(Rows.Count, 1).End(xlUp).Offset(1).Resize(, 7) = Array(Cmb_Omschrijving, CDbl(Tb_Aantal), CDbl(Tb_Prijs), CDbl(Tb_SubTotaal), Cmb_BTW, CDbl(Tb_BTW), CDbl(Tb_Factuurregel))Deze code moet dus worden aangepast zodat alle 8 regels van het formulier in 1 keer wordt weggeschreven naar het tabblad.
Is dit mogelijk? En zo ja is daar een simpele code voor die ik in 1 keer kan overnemen en plaatsen en aanpassen in VBA, of moet ik hier echt een apart bestandje voor gaan zitten puzzelen en hier plaatsen. In het laatste geval ben ik wel even zoet daar het bestand te groot is om hier te plaatsen.
