Makro ile yeni excel

[istavrit]

Merhaba,

Macro ile var olan bir excel sayfasındaki belirlediğm sütunları bir diğer excel e taşımak istiyorum.

örneğin a b c başlıklı sütunlardan sadece b sütunu diğer excele alabilir miyiz? (diğer bir sheet e de alabiliriz)

Konuyla ilgili bir başlık önerebilirseniz veya çözümü iletebilirseniz sevinirim. Çok teşekkürler.

 

[metinozlu]

Sub Makro1()
'
Sheets("Sayfa1").Select
Columns("B:B").Select
Selection.Copy
Sheets("Sayfa2").Select
Columns("B:B").Select
ActiveSheet.Paste
Range("B5").Select

End Sub

makro 1 sayfa 1 b sütünundaki veriyi sayfa2 b sütününa taşır.

 

[istavrit]

Çok teşekkür ederim.sondaki Range("B5").Select ne işe yarıyor?
bir de bu işlemi satır isimlerini belirterek yapabilir miyim?

örnek sadece Başlığı AD; SOYAD; olan sütunları taşı. Dersek kod ne şekilde değişecek?

Tekrar teşekkür ederim.

 

[metinozlu]

b5 bir işe yaramıyor sadece sütün seçimini kaldırıyor. ad soyad sütün adresi ne ise koddda onu yazarsanız mesela c:c gibi o sütünu taşır.

ayrıca yapılmasını istediğiniz seyi makro kaydet yöntemi ile yapıp sonra butona atarsanız hangi kodun ne işe yaradığınıda görmüş olursunuz.

 

[istavrit]

çokteşekkür ederim ellerinize sağlık.