İkinci sütundaki verileri birinci sütunun başına ekleme

[adrescec]

Merhaba, benim A, B ve C sütunlarında verilerim var. Örneğin;
A B C (id ler)
Opel Araba 1
Renault Araba 1
Mazda Araba 1
Mercedes Araba 1
Rezidans Ev 2
Villa Ev 2
Daire Ev 2
Yalı Ev 2

Bu B sütunundakileri A sütunlarının başlarına makro ile ekleyebilirmiyiz id leri lazım olabilir diye yazdım
yani;
A
Araba - Opel
Araba - Renault
Araba - Mazda
Villa - Ev
Yalı - Ev
gibi
teşekkür ederim şimdiden.

 

[Huseyinkis]

Merhaba, benim A, B ve C sütunlarında verilerim var. Örneğin;
A B C (id ler)
Opel Araba 1
Renault Araba 1
Mazda Araba 1
Mercedes Araba 1
Rezidans Ev 2
Villa Ev 2
Daire Ev 2
Yalı Ev 2

Bu B sütunundakileri A sütunlarının başlarına makro ile ekleyebilirmiyiz id leri lazım olabilir diye yazdım
yani;
A
Araba - Opel
Araba - Renault
Araba - Mazda
Villa - Ev
Yalı - Ev
gibi
teşekkür ederim şimdiden.

Ekteki Kod Denermisiniz

Sub Degiş()
For X = 1 To [A65536].End(3).Row
Range("A" & X).Value = Range("B" & X).Value & "-" & Range("A" & X).Value
Next
End Sub

 

[adrescec]

Çok teşekkür ederim yardımınız için tamamdır.