KutoolsforOffice — Tek çözüm, beş güçlü araç.Daha az çabayla daha fazlasını başarmak.

Excel'de her n'inci sütunu nasıl seçersiniz?

YazarXiaoyang Değiştirme Tarihi

Örneğin, yüzlerce veri sütunundan oluşan büyük bir çalışma sayfanız var ve her 3. sütundaki verileri kopyalayıp yeni bir çalışma sayfasına yapıştırmanız gerekiyor. Her n’inci sütunu tek tek seçmek oldukça zaman alıcı—bunu yapmanın daha kolay bir yolu var mı?

Her n'inci sütunu VBA ile seçin

Her n'inci sütunu Kutools for Excel ile seçin


Her n'inci sütunu VBA ile seçin

Bu sorunu çözmek için VBA kodu dışında basit bir çözüm bulunmamaktadır. Lütfen aşağıdaki adımları uygulayın:

1. Her n'inci sütunu seçmek istediğiniz aralığı belirleyin.

2. Geliştirici > Visual Basic öğesine tıklayın ya da Alt+F11 tuşlarına basın. Yeni bir Microsoft Visual Basic for Applications penceresi açılacak; burada Ekle > Modül seçeneğine tıklayarak aşağıdaki kodu Modül’e girin:

Sub EveryOtherColumn()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range
Dim OutRng As Range
Dim xInterval As Integer
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
xInterval = Application.InputBox("Enter column interval", xTitleId, Type:=1)
For i = 1 To InputRng.Columns.Count Step xInterval + 1
    Set rng = InputRng.Cells(1, i)
    If OutRng Is Nothing Then
        Set OutRng = rng
    Else
        Set OutRng = Application.Union(OutRng, rng)
    End If
Next
OutRng.EntireColumn.Select
End Sub

3. Ardından kodu çalıştırmak için VBA çalıştırma düğmesiyle her n. sütunu seçmenin ekran görüntüsüdüğmesine tıklayın; size çalışmak için bir aralık seçmenizi hatırlatan bir uyarı kutusu açılacak. Ekran görüntüsüne bakın:

VBA seçili iletişim kutusuyla her n. sütunu seçmenin ekran görüntüsü

4. Tamam öğesine tıklayın; ardından açılan iletişim kutusuna aralık sayısını girin. Bu örnekte, kutuya 3 girin. Ekran görüntüsüne bakın:

VBA ile her n. sütunu seçerken sayı aralığını girme ekran görüntüsü

5. Tamam öğesine tıklayın. Artık seçimde her 3. sütun seçili olacak. Ekran görüntüsüne bakın:

VBA ile her n. sütunu seçmenin sonucunun ekran görüntüsü

Not: İkinci Kutools for Excel iletişim kutusunda ihtiyacınıza göre sayıyı belirleyebilirsiniz.

Ancak bazen iki sütunu ayrı aralıklar halinde seçmeniz gerekir. Yukarıdaki kod bu durumda işe yaramaz; ne yapmalısınız?


Her n'inci sütunu Kutools for Excel ile seçin

Kutools for Excel: 30 gün boyunca sınırsız olarak ücretsiz deneyebileceğiniz, 300'den fazla kullanışlı Excel eklentisiyle.Şimdi Edinin.

Kutools for Excel ile belirli aralıklarla ve belirli sayıda sütun seçebilirsiniz. Lütfen aşağıdaki adımları izleyin:

1. Kutools > Seç > Satırları/Sütunları Seç öğesine tıklayın.

2. Bir Satırları/Sütunları Seç iletişim kutusu görünecek. Ardından gerekli aralığı seçmek için VBA ile her n. sütunu seçerken Kutools for Excel seçim düğmesinin ekran görüntüsü düğmesine tıklayın, Sütunlar seçeneğine ve ardından Seçim bölümüne tıklayın. Son olarak, Aralığı ve Sütunlar açılır listesinden istediğiniz sayıyı belirtin; burada her 3. sütundan iki sütun seçiyoruz. Ekran görüntüsüne bakın:

Kutools for Excel iletişim kutusuyla her n. sütunu seçmenin ekran görüntüsü

3. Tamam öğesine tıklayın. Seçimde iki sütun, ikişer aralıklı olarak seçilecektir. Ekran görüntüsüne bakın:

Kutools for Excel ile her n. sütunu seçmenin sonucunun ekran görüntüsü

Not: Açılır iletişim kutusunda Tüm Sütunu Seç seçeneğini işaretlerseniz, sayfadaki tüm sütunlar sıralanacaktır. Ekran görüntüsüne bakın:

Kutools for Excel ile her n. sütunu seçmenin sonuç 2 ekran görüntüsü


İlgili makaleler:

En İyi Office Üretkenlik Araçları

🤖KUTOOLS AI Yardımcısı: Şunu temel alarak Veri Analizi'i devrimleştirin:Akıllı Yürütme   |  Kod Oluştur|  özel formüller Oluştur  |  Verileri Analiz Et ve Grafikler Oluştur|  Geliştirilmiş İşlevler Çağır…
Popüler Özellikler:Bul, Vurgula veya Yinelenenleri İşaretle   |  Boş Satırları Sil   |  Veri Kaybetmeden Sütunları Birleştir veya Hücreleri   |   Formül kullanmadan yuvarlama…
Süper ARA:Çoklu Kriterli Düşey Arama (VLookup)  |  Çoklu Değerli Düşey Arama (VLookup)  |   Birden Fazla Sayfada Düşey Arama (VLookup)   |   Bulanık Eşleme…
Gelişmiş Açılır Liste:Açılır Liste Hızlıca Oluştur   |  Bağımlı Açılır Liste   |  Çoklu Seçimli Açılır Liste…
Sütun Yöneticisi:Belirli Sayıda Sütun Ekle|Sütunları Taşı|Gizli Sütunların Görünürlük Durumunu Aç/Kapat|Aralıkları ve Sütunları Karşılaştır…
Öne Çıkan Özellikler:Izgara Odaklama   |  Tasarım Görünümü   |Gelişmiş formül çubuğu   | Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynaklar(Otomatik Metin)|  Tarih Seçici   |  Çalışma Sayfalarını Birleştir  |  Şifrele/Hücreleri Şifre Çöz   | Listeye Göre E-posta Gönder   |  Süper Filtre   |   Özel Filtre(Kalın Yazılı Hücreleri Filtrele/italik/üstü çizili…) …
En İyi 15 Araç Setleri:12 MetinAraçları(Metin Ekle,Belirli Karakterleri Sil, …)|   50+GrafikTürleri(Gantt Grafiği, …)|   40+ Pratik Formüller(Doğum tarihine dayanarak yaş hesapla, …)|   19 EklemeAraçları(QR Kodu Ekle,Yoldan Resim Ekle, …)|   12 DönüştürmeAraçları(Kelimeye Dönüştür,Döviz Kuru Dönüşümü, …)|   7 Birleştir ve AyırAraçları(Gelişmiş Satırları Birleştir,Hücreleri Böl, …)|… ve daha fazlası
Kutools'u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve 40+ diğer dillerde desteklenir!

Kutools for Excel ile Excel becerilerinizi üst seviyeye taşıyın ve verimlilikten önce hiç tecrübe etmediğiniz kadar faydalanın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300'den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…


Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.

  • Word, Excel, PowerPoint, Publisher, Access, Visio ve Project’te sekmeli düzenleme ve okumayı etkinleştirin.
  • Birden fazla belgeyi yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açın ve oluşturun.
  • Günlük üretkenliğinizi %50 artırır ve size her gün yüzlerce fare tıklamasından tasarruf sağlar!

Tüm Kutools eklentileri — tek bir yükleyiciyle!

Kutools for Office paketi; Excel, Word, Outlook ve PowerPoint için eklentileriyle birlikte Office Tab Pro'yu da içerir ve Office uygulamalarında çalışan ekipler için idealdir.

ExcelWordOutlookTabsPowerPoint
  • Hepsi-bir-arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
  • Tek yükleyici, tek lisans— birkaç dakikada kurulum (MSI uyumlu)
  • Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
  • 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
  • En iyi fiyat performans— tek tek eklenti satın almaya göre tasarruf edin