lijst printen met vert.zoeken

[Touw]

Uit een lijst in Excel met meer kolommen moet ik facturen printen. In de 1e kolom staan de relatienummers met daarachter de producten die op de factuur moeten komen en het aantal bestelde producten. Dit aantal verschilt per product. Ook het aantal te printen producten per relatie is verschillend. Wel wordt door de relaties vaak hetzelfde product besteld. Ik heb met verticaal zoeken geprobeerd per relatie een factuur te printen uit de matrix. Excel pakt echter per relatie het laatste product waar het relatienummer voor staat, zodat ik per relatie slechts 1 product op de factuur krijg.

 

Dus horizontaal gezien:

1e kolom rel. nummers (op elke regel)

2e kolom naam relaties

3e kolom naam producten

4e kolom aantal bestelde producten 

 

Weet iemand hoe ik dit probleem kan oplossen. Ik werk wel met VBA maar ben er niet zo'n ster in.

 

Alvast bedankt voor de moeite.

 

[iEscape]

Topic is verplaatst naar Microsoft Office - Excel.

[emielDS]

er zijn er hier veel die dat kunnen oplossen maar niet zonder voorbeeldbestand voorzien van fictieve gegevens.

[Touw]

Voorbeeld	voor factuur    printen uit lijst met vert.zoeken	Voorbeeld.xlsm
Rel.nr.	Rel.naam	Product	Aantal	Locatie
1314	aaaaaaaaaaaa	Krakelingn	25	Zolder
1314	aaaaaaaaaaaa	Poffertjes	30	A4
1314	aaaaaaaaaaaa	Kletsmajoors	35	G5
1314	aaaaaaaaaaaa	Drukkemakers	40	Kelder
9380	bbbbbbbbbbbbbbb	Praatgraag	45	Beneden
9380	bbbbbbbbbbbbbbb	Donkertjes	50	Achter
9380	bbbbbbbbbbbbbbb	Denkers	55	Voor
9380	bbbbbbbbbbbbbbb	Krakelingn	60	Zolder
1512	cccccccccccc	Poffertjes	65	A4
20015	ddddddddddd	Kletsmajoors	70	G5
20015	ddddddddddd	Drukkemakers	75	Kelder
20015	ddddddddddd	Praatgraag	80	Beneden
20015	ddddddddddd	Donkertjes	85	Achter
1413	eeeeee	Denkers	90	Voor
1413	eeeeee	Krakelingn	95	Zolder
1413	eeeeee	Poffertjes	100	A4
1413	eeeeee	Kletsmajoors	105	G5
1413	eeeeee	Drukkemakers	110	Kelder
1413	eeeeee	Praatgraag	115	Beneden
1413	eeeeee	Donkertjes	120	Achter
1413	eeeeee	Denkers	125	Voor

[Touw]

 

Bijgaand het bestand waaruit ik facturen wil printen met verticaal zoeken op rel.nummer. Ik gebruik Excel 365

[Haije]

En hoe moet de factuur er dan uit komen te zien?

[emielDS]

zoiets ?

Waar de gegevens moeten komen staat nergens vermeld dus zal je zelf de code moeten aanpassen.

Voorbeeld factuur.xlsm

[alpha]

Op een factuur voor 1 en dezelfde klant ga je toch zeker niet een x aantal keer dezelfde klantnaam en hetzelfde relatienr. herhalen? Die gegevens 1 x vermelden is voldoende.

[bakerman]

Hiervoor heeft XL AutoFilter en Uitgebreid Filter ontworpen.

 

In bijgaand voorbeeld wordt gebruik gemaakt van Uitgebreid Filter.

 

Sub Knop1_Klikken()
    Sheets("Blad2").Cells(1).CurrentRegion.Offset(1).ClearContents
    With Sheets("Blad1")
        .Cells(3, 1).CurrentRegion.AdvancedFilter 2, .Range("J1:J2"), Sheets("Blad2").Range("A1:D1")
    End With
End Sub

 

Voorbeeld factuur ba.xlsm

[Touw]

Reactie op emielDS

Je opzet voor de factuur werkt perfect. Omdat er veel bestellingen komen zou het, bij nader inzien wel handig zijn om de facturen in serie te maken en daarna in een keer te printen met een factuur per blad van 40 regels vanaf e4 en 8 kolommen. A4:L4 is voor het door mij in te vullen briefhoofd. Per dag kunnen er wel 50 a 60 bestellingen met elk diverse artikelen komen. Dan is het handig om in serie te kunnen werken .In de eerste opzet had ik 5 kolommen. De drie extra kolommen zijn dan voor soort etiket, transporteur en team dat de artikelen moet klaar maken voor transport (zie ook hierna).  In de A kolom op het 1e blad zouden dan de relatienummers in een keer kunnen worden vermeld met daarna klikken voor het invullen van de facturen voor die relaties. 

Omdat verschillende personen (teams) de bestelde artikelen moeten klaarzetten per locatie moet ik ook een lijst kunnen printen per locaties van de verschillende locaties uit de lijst die in eerder opgaf. Dus een lijst met bestelde artikelen voor beneden, voor boven etc. Dus alle gegevens die ook op de factuur komen maar dan per locatie. In een later stadium worden de artikelen samengevoegd per bestelling.

Als dit te realiseren is zou ik geweldig geholpen zijn. Alvast hartelijk dank voor de moeite.

Touw