Vba: değerler yalnızca biçimlendirme olmadan nasıl yapıştırılır

Belirli bir hücre aralığını kopyalamak ve değerleri biçimlendirmeden yalnızca yeni bir konuma yapıştırmak için VBA’da aşağıdaki sözdizimini kullanabilirsiniz:

 Sub PasteNoFormatting()

Range(" A1:D9 ").Copy
Range(" A12 ").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

End Sub

Bu özel makro, A1:D9 aralığındaki hücreleri kopyalayacak ve hücre değerlerini herhangi bir biçimlendirme olmadan A12 hücresinden başlayan aralığa yapıştıracaktır.

Not : Application.CutCopyMode = False satırı, makro yürütüldükten sonra kesme ve kopyalama modunun devre dışı bırakılması gerektiğini belirtir.

Aşağıdaki örnek, bu sözdiziminin pratikte nasıl kullanılacağını gösterir.

Örnek: Değerleri yalnızca VBA kullanarak biçimlendirmeden yapıştırma

Diyelim ki Excel’de çeşitli basketbol oyuncuları hakkında bilgiler içeren aşağıdaki veri kümesine sahibiz:

Diyelim ki A1:D9 aralığındaki tüm değerleri formatlamadan kopyalayıp yeni bir konuma yapıştırmak istiyoruz.

Bunun için aşağıdaki makroyu oluşturabiliriz:

 Sub PasteNoFormatting()

Range(" A1:D9 ").Copy
Range(" A12 ").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Orijinal hücre değerlerinin herhangi bir biçimlendirme yapılmadan yeni bir konuma yapıştırıldığını unutmayın.

Not : VBA PasteSpecial yönteminin tam belgelerini burada bulabilirsiniz.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA: Son kullanılan satırı nasıl bulabilirim?
VBA: Aralıktaki satır sayısı nasıl sayılır?
VBA: Kullanılan sütunların sayısı nasıl sayılır?