Sütunu Kesme Kopyalama ve Yapıştırma isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Hazır Kodlar
Bu işlem için farklı kod örnekleri bulunmaktadır.Sütunu Kesme ve Yapıştırma
Bu VBA kodu, belirli bir sütunu kesip başka bir sütuna yapıştırır.
VBA:
Sub SütunuKesVeYapistir()
Dim kaynakSütun As Range
Dim hedefSütun As Range
' Kesilecek sütunu belirleyin (Örneğin, A sütunu)
Set kaynakSütun = Columns("A")
' Yapıştırılacak sütunu belirleyin (Örneğin, B sütunu)
Set hedefSütun = Columns("B")
' Sütunu kes ve yapıştır
kaynakSütun.Cut Destination:=hedefSütun
End Sub
Sütunu Kopyalama ve Yapıştırma
Bu VBA kodu, belirli bir sütunu kopyalayıp başka bir sütuna yapıştırır.
VBA:
Sub SütunuKopyalaVeYapistir()
Dim kaynakSütun As Range
Dim hedefSütun As Range
' Kopyalanacak sütunu belirleyin (Örneğin, A sütunu)
Set kaynakSütun = Columns("A")
' Yapıştırılacak sütunu belirleyin (Örneğin, B sütunu)
Set hedefSütun = Columns("B")
' Sütunu kopyala ve yapıştır
kaynakSütun.Copy Destination:=hedefSütun
End Sub
Açıklamalar
- Columns("A") ve Columns("B"): "A" sütunu kesilir veya kopyalanır ve "B" sütununa yapıştırılır. İhtiyaçlarınıza göre sütun referanslarını değiştirebilirsiniz.
- .Cut ve .Copy: Sırasıyla kesme ve kopyalama işlemlerini gerçekleştirir.
Kullanım:
- Bu kodları Excel'de bir modüle ekleyin.
- Kesme ve yapıştırma işlemi için SütunuKesVeYapistir, kopyalama ve yapıştırma işlemi için SütunuKopyalaVeYapistir makrosunu çalıştırabilirsiniz.