Loncat ke daftar isi utama

Bagaimana cara memilih setiap kolom ke-n di Excel?

Misalnya, Anda memiliki lembar kerja besar dengan ratusan kolom data. Dan sekarang, Anda perlu menyalin setiap data kolom ketiga dan menempelkannya ke lembar kerja baru lainnya. Akan memakan waktu untuk memilih setiap kolom ke-n satu per satu, dan adakah cara mudah untuk melakukannya?

Pilih setiap kolom ke-n dengan VBA

Pilih setiap kolom ke-n dengan Kutools for Excel


panah gelembung kanan biru Pilih setiap kolom ke-n dengan VBA

Sepertinya tidak ada cara sederhana kecuali kode VBA untuk mengatasi masalah ini. Silakan lakukan langkah-langkah berikut:

1. Sorot kisaran yang ingin Anda pilih setiap kolom ke-n.

2.Click Pengembang > Visual Basic atau tekan Alt + F11, Baru Microsoft Visual Basic untuk aplikasi jendela akan ditampilkan, klik Menyisipkan > Modul untuk memasukkan kode berikut ke dalam Modul:

 

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. Lalu klik  untuk menjalankan kode, dan kotak prompt akan muncul untuk mengingatkan Anda untuk memilih rentang untuk dikerjakan. Lihat tangkapan layar:

 

4. klik OK, lalu masukkan jumlah interval di dialog munculan lainnya. Dalam kasus ini, masukkan 3 ke dalam kotak. Lihat tangkapan layar:

5. klik OK. Sekarang ini memilih setiap kolom ke-3 dalam pemilihan. Lihat tangkapan layar:

Note: Anda dapat menentukan nomor di detik KutoolsforExcel dialog untuk memenuhi kebutuhan Anda.

Namun terkadang, Anda perlu memilih dua kolom dengan dua interval. Kode di atas tidak dapat berfungsi, bagaimana yang harus Anda lakukan?


Pilih setiap kolom ke-n dengan Kutools for Excel

Kutools untuk Excel: dengan lebih dari 300 add-in Excel yang praktis, gratis untuk dicoba tanpa batasan dalam 30 hari. Dapatkan Sekarang.

Dengan Kutools untuk Excel, Anda dapat memilih jumlah kolom tertentu pada interval tertentu. Silakan lakukan langkah-langkah berikut:

1.Click Kutools > Pilih Alat > Pilih Baris / Kolom Interval, lihat tangkapan layar:

2. Itu Pilih Baris / Kolom Interval kotak dialog akan muncul. Lalu klik tombol untuk memilih rentang yang Anda butuhkan, pilih Kolom dari Pilih bagian, dan tentukan nomor yang Anda inginkan di Interval dari dan Kolom daftar dropdown, di sini kita memilih dua kolom di setiap kolom 3td. Lihat tangkapan layar:

3.Click OK. Ini akan memilih dua kolom dengan dua interval dalam pemilihan. Lihat tangkapan layar:

Note: Jika Anda memeriksa Pilih seluruh kolom di dialog popup, ini akan memilih seluruh kolom di lembar. Lihat tangkapan layar:


Artikel relatif:

Alat Produktivitas Kantor Terbaik

Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu.  Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...

tab kte 201905


Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!

 

Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I have one issue in excel, for example, in a row first five sells are numbered as 1,2,3, 4,5. in the second row also numbered as 1,2,3,4,5 in each sell. then to the third row need to paste the values of above two rows alternatively. means i need answer in each sells in third row 1,1,2,2,3,3,4,4,5,5. how can I do easily in excel? I am waiting for your response because I need to complete big datasheet.
This comment was minimized by the moderator on the site
i need to copy from f18 to h19, then f21 to h22, and it goes on till 500 values and before the value in h column need to add text also

like f18 = 345

in h19 I should get = tdg 345

for 500 values in h column.

please help me someone
This comment was minimized by the moderator on the site
This macro sucks dont waste your time
This comment was minimized by the moderator on the site
For some reason this does not work if only one row is selected.
This comment was minimized by the moderator on the site
Excel 2010 - Select interval column command does not work. There is no any raction after clicking - ok
This comment was minimized by the moderator on the site
I always get an error: invalid procedure... How can I solve it. I want to select every 4th column in my dataset
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations