rijen combineren

[jan]

Hallo,
Voor mijn klant, een vervoerbedrijf, heb ik bestand A afkomstig van de
opdrachtgever met bv. 3 rijen waarin 3 pakketjes voor 1 afleveradres staan in
deze vorm: cel b6, inhoud: 1 van 3, cel b7, inhoud: 2 van 3, cel b8, inhoud:
3 van 3.
In bestand B dat geimporteerd moet worden in het logistieke pakket moeten
deze 3 rijen in 1 rij komen, met het totaal aantal pakketjes, dus in dit
voorbeeld 3.
Wie kan me helpen, zelf ben ik niet bedreven in programmeren. Kan dit in een
macro worden geraliseerd?
--
alvast bedankt voor de moeite,
jan.nl

[zonder dit @hotmailpuntcom john philippen]

Jan,
is er een unieke code per klant/aflever adres.
kun je eens een vb mailen.
m.v.g.
john
--
Vragen is nooit dom.
Met een vraag blijven lopen wel.
Want dat lost nooit iets op.

[zonder dit @hotmailpuntcom john philippen]

Jan,

conform e-mail die ik van jou ontvangen heb

is dit de code

Sub unieke_lijst()
Dim rij As Long
rij = 3
Application.ScreenUpdating = False
Application.Calculation = xlManual
While Cells(rij, 22) <> ""
If Cells(rij, 22) = Cells(rij - 1, 22) Then
Rows(rij).Delete
Else
rij = rij + 1
End If
Wend
Application.Calculation = xlAutomatic
Application.ScreenUpdating = True
End Sub

in kolom T komt de formule =F2&G2
in kolom U komt de formule =AANTAL.ALS($T$2:$T$65536;T2)
in kolom V komt de formule =T2&"_"&U2

m.v.g.
john
--
Vragen is nooit dom.
Met een vraag blijven lopen wel.
Want dat lost nooit iets op.