bir shetten diğer sheete hücredeki veriyi kopyala yapıştır yapma hk

[u.L.a.s]

merhabalar

aşağıdaki gibi bir kod düzeneğinde

Bulunduğum sheette A hücresine çift tıklayınca o çift tıkladığım hücredeki satırdaki B hücresindeki yazılı olan veriyi kopyalayıp Sheet2 de A hücresine yapıştırıyor.

bu noktaya kadar sorun yok. ben şimdi bir ekleme yapmak istiyorum ve A hücresine çift tıklayınca sheet2 de A hücresinin içine B hücresindeki veriyi yazıyordu ya ben A hücresindekinide beraberinde yazdırmak istiyorum arada boşluk bırakarak.

Örnek verirsek
Sheet1 de a25 te xxx verisi var b25 te yyy verisi var
ben a25 e çift tıklayınca sheet2 de A sütununda ilk boş hücreye ki oda zaten A2 oluyor şu şekilde veriyi yapıştırmış olacak "xxx yyy"

Yani aşağıdaki kodda bir nevi bir revize gerekiyor ama bir kaç şey denedim hep hata verdi. yardımcı olabilirseniz sevinirim

Range("B" & Target.Row).Copy
Sheet2.Range("A" & Son).PasteSpecial

 

[mancubus]

hücrelerde olan verileri başka hücrelere aktarmak için copy paste kullanmayın.

bu ilk hali

Sheet2.Range("A" & Son).Value = Range("B" & Target.Row).Value

bu da istenilen hali

Sheet2.Range("A" & Son).Value = Sheet2.Range("A" & Son).Value & " " & Range("B" & Target.Row).Value