Macro om kolom B en C samentevoegen

[Tweety1]

Hi,

Ik zoek een macro om kolom B en C samentevoegen (of inhoud van kolom B te kopiëren in C) met de opmaak van kolom C.

Zie voorbeeld hieronder

Bekijk bijlage 186666

mvg

Kasper

 

[popipipo]

Sub Macro1()
    Columns("B:B").Copy
    Columns("C:C").PasteSpecial Paste:=xlPasteValues, SkipBlanks:=True
End Sub

 

[Tweety1]

Bedankt voor de hulp