Перейти к основному содержанию

Как выбрать каждый n-й столбец в Excel?

Например, у вас есть большой рабочий лист с сотнями столбцов данных. А теперь вам нужно скопировать данные каждого третьего столбца и вставить их на другой новый лист. Выбор каждого n-го столбца один за другим займет много времени, и есть ли простой способ сделать это?

Выберите каждый n-й столбец с помощью VBA

Выберите каждый n-й столбец с помощью Kutools for Excel


стрелка синий правый пузырь Выберите каждый n-й столбец с помощью VBA

Кажется, нет простого способа, кроме кода VBA, решить эту проблему. Пожалуйста, сделайте следующие шаги:

1. Выделите диапазон, который вы хотите выбрать в каждом n-м столбце.

2.Click Застройщик > Визуальный Бейсик или нажмите Alt + F11, Новый Microsoft Visual Basic для приложений появится окно, щелкните Вставить > Модули для ввода в модуль следующего кода:

 

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. Затем нажмите  Нажмите кнопку для запуска кода, и появится окно с подсказкой, напоминающее вам о выборе диапазона для работы. Смотрите скриншот:

 

4. Нажмите OK, а затем введите количество интервалов в другом всплывающем диалоговом окне. В этом случае введите 3 в поле. Смотрите скриншот:

5. Нажмите OK. Теперь он выбирает каждый третий столбец в выборке. Смотрите скриншот:

Внимание: Вы можете указать число во втором KutoolsforExcel диалог для удовлетворения ваших потребностей.

Но иногда нужно выбрать два столбца с двумя интервалами. Приведенный выше код не может работать, что делать?


Выберите каждый n-й столбец с помощью Kutools for Excel

Kutools for Excel: с более чем 300 удобными надстройками Excel, которые можно попробовать бесплатно без ограничений в течение 30 дней. Получи это сейчас.

Доступно Kutools for Excel, вы можете выбрать определенное количество столбцов через определенные интервалы. Пожалуйста, сделайте следующие шаги:

1.Click Кутулс > Выберите Инструменты > Выберите интервальные строки / столбцы, см. снимок экрана:

2. Выберите интервальные строки / столбцы появится диалоговое окно. Затем нажмите кнопку для выбора нужного вам диапазона, выберите Колонки от Выбрать раздел, и укажите желаемое число в Интервал и Колонки раскрывающийся список, здесь мы выбираем два столбца в каждом столбце 3td. Смотрите скриншот:

3.Click OK. Он выберет два столбца с двумя интервалами в выборе. Смотрите скриншот:

Внимание: Если вы проверите Выбрать целые столбцы во всплывающем диалоговом окне он выберет все столбцы на листе. Смотрите скриншот:


Относительные статьи:

Лучшие инструменты для офисной работы

🤖 Kutools AI Помощник: Революционный анализ данных на основе: Интеллектуальное исполнение   |  Генерировать код  |  Создание пользовательских формул  |  Анализ данных и создание диаграмм  |  Вызов функций Kutools...
Популярные опции: Найдите, выделите или определите дубликаты   |  Удалить пустые строки   |  Объедините столбцы или ячейки без потери данных   |   Раунд без формулы ...
Супер поиск: Множественный критерий VLookup    VLookup с несколькими значениями  |   VLookup по нескольким листам   |   Нечеткий поиск ....
Расширенный раскрывающийся список: Быстрое создание раскрывающегося списка   |  Зависимый раскрывающийся список   |  Выпадающий список с множественным выбором ....
Менеджер столбцов: Добавить определенное количество столбцов  |  Переместить столбцы  |  Переключить статус видимости скрытых столбцов  |  Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка Фокус   |  Просмотр дизайна   |   Большой Формулный Бар    Менеджер книг и листов   |  Библиотека ресурсов (Авто текст)   |  Выбор даты   |  Комбинировать листы   |  Шифровать/дешифровать ячейки    Отправлять электронные письма по списку   |  Суперфильтр   |   Специальный фильтр (фильтровать жирным шрифтом/курсивом/зачеркиванием...) ...
15 лучших наборов инструментов12 Текст Инструменты (Добавить текст, Удалить символы, ...)   |   50+ График Тип (Диаграмма Ганта, ...)   |   40+ Практических Формулы (Рассчитать возраст по дню рождения, ...)   |   19 Вносимые Инструменты (Вставить QR-код, Вставить изображение из пути, ...)   |   12 Конверсия Инструменты (Числа в слова, Конверсия валюты, ...)   |   7 Слияние и разделение Инструменты (Расширенные ряды комбинирования, Разделить клетки, ...)   |   ... и более

Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени.  Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...

Описание


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

 

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