Bỏ qua nội dung chính

Làm cách nào để chọn mọi cột thứ n trong Excel?

Ví dụ: bạn có một trang tính lớn với hàng trăm cột dữ liệu. Và bây giờ, bạn cần sao chép mọi dữ liệu cột thứ 3 và dán chúng vào một trang tính mới khác. Sẽ tốn thời gian để chọn từng cột thứ n một, và có cách nào dễ dàng để làm điều đó không?

Chọn mọi cột thứ n với VBA

Chọn mọi cột thứ n với Kutools cho Excel


mũi tên màu xanh bong bóng bên phải Chọn mọi cột thứ n với VBA

Có vẻ như không có cách nào đơn giản ngoại trừ mã VBA để giải quyết vấn đề này. Vui lòng làm theo các bước sau:

1. Đánh dấu phạm vi mà bạn muốn chọn mỗi cột thứ n.

2.Click Nhà phát triển > Visual Basic hoặc báo chí Alt + F11, Một mới Microsoft Visual Basic cho các ứng dụng cửa sổ sẽ được hiển thị, nhấp vào Chèn > Mô-đun để nhập mã sau vào Mô-đun:

 

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. Sau đó nhấn vào  để chạy mã và một hộp nhắc sẽ bật ra để nhắc bạn chọn một phạm vi để làm việc. Xem ảnh chụp màn hình:

 

4. nhấp chuột OK, rồi nhập số khoảng thời gian trong hộp thoại bật ra khác. Trong trường hợp này, hãy nhập 3 vào hộp. Xem ảnh chụp màn hình:

5. nhấp chuột OK. Bây giờ nó chọn mọi cột thứ 3 trong vùng chọn. Xem ảnh chụp màn hình:

Chú thích: Bạn có thể chỉ định số trong giây KutoolsforExcel hộp thoại để đáp ứng nhu cầu của bạn.

Nhưng đôi khi, bạn cần chọn hai cột có hai khoảng thời gian. Đoạn mã trên không thể hoạt động, bạn phải làm thế nào?


Chọn mọi cột thứ n với Kutools cho Excel

Kutools cho Excel: với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày. Lấy nó ngay.

Với Kutools cho Excel, bạn có thể chọn số lượng cột cụ thể trong các khoảng thời gian cụ thể. Vui lòng làm theo các bước sau:

1.Click Kutools > Chọn công cụ > Chọn Hàng / Cột Khoảng cách, xem ảnh chụp màn hình:

2. Các Chọn Hàng / Cột Khoảng cách hộp thoại sẽ xuất hiện. Sau đó nhấp vào để chọn phạm vi bạn cần, chọn Cột từ Chọn phầnvà chỉ định số bạn muốn trong Khoảng thời gian củaCột danh sách thả xuống, ở đây chúng tôi chọn hai cột trong mỗi cột 3td. Xem ảnh chụp màn hình:

3.Click OK. Nó sẽ chọn hai cột có hai khoảng trong vùng chọn. Xem ảnh chụp màn hình:

Chú thích: Nếu bạn kiểm tra Chọn toàn bộ cột trong hộp thoại bật lên, nó sẽ chọn toàn bộ các cột trong trang tính. Xem ảnh chụp màn hình:


Các bài báo tương đối:

Công cụ năng suất văn phòng tốt nhất

🤖 Trợ lý AI của Kutools: Cách mạng hóa việc phân tích dữ liệu dựa trên: Thực thi thông minh   |  Tạo mã  |  Tạo công thức tùy chỉnh  |  Phân tích dữ liệu và tạo biểu đồ  |  Gọi các hàm Kutools...
Các tính năng phổ biến: Tìm, đánh dấu hoặc xác định các bản sao   |  Xóa hàng trống   |  Kết hợp các cột hoặc ô mà không làm mất dữ liệu   |   Vòng không có công thức hữu ích. Cảm ơn !
Siêu tra cứu: Nhiều tiêu chí VLookup    VLookup Nhiều Giá Trị  |   VLookup trên nhiều trang tính   |   Tra cứu mờ ....
Danh sách thả xuống nâng cao: Tạo nhanh danh sách thả xuống   |  Danh sách thả xuống phụ thuộc   |  Danh sách thả xuống nhiều lựa chọn ....
Trình quản lý cột: Thêm một số cột cụ thể  |  Di chuyển cột  |  Chuyển đổi trạng thái hiển thị của các cột ẩn  |  So sánh dãy và cột hữu ích. Cảm ơn !
Các tính năng nổi bật: Tiêu điểm lưới   |  Chế độ xem thiết kế   |   Thanh công thức lớn    Trình quản lý sổ làm việc & trang tính   |  Thư viện tài nguyên (Văn bản tự động)   |  Bảng chọn ngày   |  Kết hợp các bảng tính   |  Mã hóa/Giải mã ô    Gửi email theo danh sách   |  Siêu lọc   |   Bộ lọc đặc biệt (lọc in đậm/nghiêng/gạch ngang...) ...
15 bộ công cụ hàng đầu12 bản văn CÔNG CỤ (thêm văn bản, Xóa ký tự,...)   |   50 + Biểu đồ Các loại (Biểu đồ Gantt,...)   |   40+ Thực tế Công thức (Tính tuổi dựa trên ngày sinh,...)   |   19 chèn CÔNG CỤ (Chèn mã QR, Chèn ảnh từ đường dẫn,...)   |   12 Chuyển đổi CÔNG CỤ (Số thành từ, Chuyển đổi tiền tệ,...)   |   7 Hợp nhất & Tách CÔNG CỤ (Các hàng kết hợp nâng cao, Chia ô,...)   |   ... và nhiều hơn nữa

Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian.  Bấm vào đây để có được tính năng bạn cần nhất...

Mô tả


Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!

 

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