Bu eğitim size VBA kullanarak tüm Satırları veya Sütunları nasıl kopyalayacağınızı (veya keseceğinizi) öğretecektir. Hücre aralıklarını kopyalayıp yapıştırmayı başka bir makalede ele alıyoruz.
İlk önce size kopyalanan satırları/sütunları nasıl yapıştıracağınızı veya ekleyeceğinizi göstereceğiz ve farklılıkları tartışacağız. Ardından, kopyalarken veya keserken satırlara ve sütunlara başvurmanın tüm farklı yollarını size göstereceğiz.
Satırlar ve Sütunlar - Yapıştır ve Ekleme
Satırları ve sütunları yapıştırırken iki seçeneğiniz vardır: Mevcut satırın (veya sütunun) üzerine yapıştırabilir veya yeni bir satır (veya sütun) ekleyebilirsiniz.
Farka bakalım…

Mevcut Satır / Sütun Üzerine Kopyala ve Yapıştır
Bu, 1. satırı kopyalayacak ve mevcut 5. satıra yapıştıracaktır:
1 | Aralık("1:1").Kopya Aralığı("5:5") |
Bu, C sütununu kopyalayacak ve E sütununa yapıştıracaktır:
1 | Aralık("C:C").Aralığı Kopyala("E:E") |
Satır / Sütun Kopyala ve Ekle
Bunun yerine, kopyalanan satırı veya sütunu ekleyebilir ve yer açmak için mevcut satırları veya sütunları değiştirebilirsiniz.
Bu, 1. satırı kopyalayacak ve mevcut satırları aşağı kaydırarak 5. satıra ekleyecektir:
12 | Aralık("1:1").KopyalaAralık("5:5").Ekle |
Bu, C sütununu kopyalayacak ve mevcut sütunları sağa kaydırarak E sütununa ekleyecektir:
12 | Aralık("C:C").KopyalaAralık("E:E").Ekle |
Tüm Satırı Kopyala
Aşağıda size 1. satırı kopyalayıp 5. satıra yapıştırmanın birkaç yolunu göstereceğiz.
1 | Aralık("1:1").Aralığı Kopyala("5:5") |
1 | Range("A1").EntireRow.Copy Range("A5") |
1 | Satırlar(1).Satırları Kopyala(5) |
Satırları Kes ve Yapıştır
Satırları kesip yapıştırmak için Kopyala yerine Kes'i kullanın:
1 | Satırlar(1).Sıraları Kes(5) |
Birden Çok Satırı Kopyala
Birden çok satırın aynı anda kopyalanmasına ilişkin örnekler:
1 | Aralık("5:7").Aralığı Kopyala("10:13") |
1 | Range("A5:A7").EntireRow.Copy Range("A10:A13") |
1 | Satırlar(5:7).Satırları Kopyala(10:13) |
Tüm Sütunu Kopyala
Tüm satırları kopyalamaya benzer şekilde tüm sütunları kopyalayabilirsiniz:
1 | Aralık("C:C").Aralığı Kopyala("E:E") |
1 | Range("C1").EntireColumn.Copy Range("C1").EntireColumn |
1 | Sütunlar(3).Kopyalama Aralığı(5) |
Sütunları Kes ve Yapıştır
Sütunları kesmek ve yapıştırmak için Kopyala yerine Kes'i kullanmanız yeterlidir:
1 | Aralık("C:C").Kesme Aralığı("E:E") |
Birden Çok Sütunu Kopyala
Birden çok sütunu aynı anda kopyalamanın örnekleri:
1 | Aralık("C:E").Aralığı Kopyala("G:I") |
1 | Range("C1:E1").EntireColumn.Copy Range("G1:I1") |
1 | Sütunlar(3:5). Sütunları Kopyala(7:9) |
Satırları veya Sütunları Başka Bir Sayfaya Kopyalayın
Başka bir sayfaya kopyalamak için Sayfa Nesnesini kullanmanız yeterlidir:
1 | Sheets("sayfa1").Range("C:E").Copy Sheets("sayfa2").Range("G:I") |
Satırları veya Sütunları Başka Bir Sayfaya Kes
Satırları veya sütunları kesip başka bir sayfaya yapıştırmak için tamamen aynı tekniği kullanabilirsiniz.
1 | Sheets("sayfa1").Range("C:E").Cut Sheets("sayfa2").Range("G:I") |