daveh

Bucky,

Heel erg bedankt voor je input. Jouw oplossing is aanzienlijk beter dan het spoor waar ik op zat.

Ik heb nog wat aangepast en heb een antwoord op jouw vragen geformuleerd in het tabblad vraag

Dave[ATTACH]28060[/ATTACH]

2013 09 14 Boekhouding ontwerp 2.xlsm

Bucky ,

Ik heb het idee opgevat om inderdaad maar één afdruk te maken: een pdf, die ik dan telkens in dezelfde map opsla, bijvoorbeeld onder het factuurnummer.

C27 klopt inderdaad. ik verwacht enkel 21% nodig te hebben maar kan het dan hier wel wijzigen.

Kan idd dan wel in 1 knoppie.

Ondertussen ben ik al zover:

Sub factuurboeken()

' factuur boeken

' cellen kopieren naar 1 rij (om ze gemakkelijker te kunnen kopiëren en plakken)

Range("F5").Select

Selection.Copy

Range("I7").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("F4").Select

Selection.Copy

Range("J7").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("B11:F11").Select

Selection.Copy

Range("K7").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("F29").Select

Selection.Copy

Range("L7").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Range("C27").Select

Selection.Copy

Range("M7").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

' cellen selecteren en kopieren

Range("I7:M7").Select

Selection.Copy

' naar eerste lege rij gaan in blad verkopen

' lege rij invoegen (op die manier krijg ik geen problemen met het totaal onderaan het werkblad)

' plakken van de cellen

End Sub

Voor de andere acties: afdrukken en leeg maken heb ik nog niets.

Alvast bedankt voor je hulp!

Dag iedereen,

Mijn vriendin start binnenkort met een zelfstandig bijberoep. Ik wil de boekhouding zelf doen en ben bezig met een excell-bestand waarin ik haar verkopen kan bijhouden.

Doel is om een werkblad "factuur" te hebben (zie bijlage) waarin de gegevens worden ingevoerd. Op die pagina zouden dan 3 knoppen komen: factuurboeken, factuurdrukken,factuur leeg maken

Factuurboeken zou er voor moeten zorgen dat de velden F4, F5, B11, F29 en C27 gekopieerd worden naar het werkblad "verkopen".

In dat werkblad zou de eerstvolgende lege rij moeten gezocht worden. Lijkt me het handigst dat er dan een extra rij ingevoerd wordt (dan schuift het totaal steeds mee op). Vervolgens zouden de gekopieerde cellen in de juiste kolom moeten komen (F4 = datum, F5 = factnr, B11 = klant, F29 = totaalbedrag, C27 = BTW-percentage) geplakt moeten worden.

Is dat een haalbare kaart in VBA of met een opgenomen macro?

[ATTACH]28013[/ATTACH]

213 09 08 Boekhouding ontwerp.xlsx