Excel 2 kolommen samenvoegen

[jbaselier]

Beste forumgebruikers,

Ik probeer 2 kolommen samen te voegen waarbij de waarde uit kolom 2 toegevoegd moet worden aan elke waarde uit kolom 1. Dus:

Kolom 1
1
2
3
4
5

Kolom 2
A
B
C

Het gewenste resultaat moet dan worden:
1A
1B
1C
2A
2B
2C
3A
3B
3C
4A
4B
4C
5A
5B
5C

Ik krijg het gewenste resultaat niet gegenereerd. Weten jullie hoe ik dit kan regelen?

Alvast ontzettend bedankt!


M.v.g,

JBaselier

 

[Cobbe]

Of zo?

Sub cobbe()
i = 1
Dim cl As Variant, ct As Variant
For Each cl In Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
 For Each ct In Range("B1:B" & Range("B" & Rows.Count).End(xlUp).Row)
  Cells(i, 3) = cl & ct
   i = i + 1
 Next
Next
End Sub

 

[jbaselier]

Beste Cobbe,

BUITENGEWOON!!!! Dit is exact wat ik wilde.

Ontzettend bedankt! Echt fantastisch!


Groetjes,

Jarno