Оглавление
В этой статье рассматривается, как добавлять новые столбцы в Excel. Читайте дальше, чтобы узнать сочетания клавиш для вставки одного или нескольких столбцов, включая несмежные. Получите и поделитесь специальным макросом VBA для автоматизации добавления каждого второго столбца.
В поисках хорошего способа вставить новые столбцы в таблицу Excel вы, скорее всего, найдете множество различных советов и подсказок. В этой статье я попытался собрать самые быстрые и эффективные способы добавления одного или нескольких смежных или несмежных столбцов.
Когда ваш отчет в Excel почти готов, но вы понимаете, что в нем не хватает колонки для ввода важных данных, воспользуйтесь приведенными ниже приемами, позволяющими сэкономить время. От ярлыков вставки колонок до добавления каждой второй колонки - щелкните нужную ссылку, чтобы перейти прямо к делу.
Ярлык для вставки столбца
Если ваша задача - быстро вставить один столбец, эти шаги, безусловно, самые быстрые и простые.
1. Нажмите на кнопка письма столбца, расположенного непосредственно справа от того места, куда вы хотите вставить новый столбец.
Совет. Вы также можете выбрать весь столбец, выделив любую ячейку и нажав сочетание клавиш Ctrl + Пробел.
2. Теперь просто нажмите Ctrl + Shift + + (плюс на основной клавиатуре).
Совет. Если вы не очень любите ярлыки, вы можете щелкнуть правой кнопкой мыши на выбранном столбце и выбрать команду Вставка опцию из списка меню.
На самом деле, чтобы вставить новую строку в Excel, требуется всего два простых шага. Читайте дальше, чтобы узнать, как добавить в список несколько пустых столбцов.
Совет. Больше полезных сочетаний клавиш можно найти в статье 30 самых полезных сочетаний клавиш Excel.
Вставка нескольких новых столбцов в Excel
Вам может понадобиться добавить несколько новых столбцов в рабочий лист. Это не значит, что вам нужно выделять столбцы по одному и каждый раз нажимать сочетание клавиш "Вставить столбец" в Excel. К счастью, можно вставить несколько пустых столбцов за один раз.
1. Выделите столько столбцов, сколько новых столбцов вы хотите получить, выбирая кнопки столбцов. Новые столбцы появятся сразу слева.
Совет. То же самое можно сделать, если выделить несколько соседних ячеек в одном ряду и нажать Ctrl + Пробел .
2. Нажмите Ctrl + Shift + + (плюс на основной клавиатуре), чтобы увидеть несколько новых вставленных колонок.
Совет. Нажмите F4, чтобы повторить последнее действие, или Ctrl + Y, чтобы вставить новые столбцы.
Вот как можно без особых усилий добавить несколько новых столбцов в таблицу в Excel. Если вам нужно добавить несколько несмежных столбцов, смотрите шаги ниже.
Сложение нескольких несмежных столбцов
Excel позволяет выделить несколько непересекающихся столбцов и использовать сочетание клавиш "Вставить столбец", чтобы новые столбцы появлялись слева от них.
1. Выберите несколько несмежных столбцов, щелкнув на их письмо кнопки и сохраняя Ctrl Нажмите клавишу . Слева появятся новые вставленные столбцы.
2. Нажмите Ctrl + Shift + + (плюс на основной клавиатуре), чтобы увидеть массовую вставку нескольких новых колонок.
Добавление столбца в список, отформатированный как таблица Excel
Если ваша электронная таблица отформатирована как Таблица Excel вы можете выбрать опцию Вставка столбцов таблицы справа если это последняя колонка. Вы также можете выбрать опцию Вставка столбцов таблицы слева для любого столбца вашей таблицы.
1. Чтобы вставить колонку, нужно выделить нужную и щелкнуть по ней правой кнопкой мыши.
2. Затем выберите Вставка -> Столбцы таблицы вправо для последнего столбца или Столбцы таблицы слева .
По умолчанию новый столбец будет называться Column1.
Специальный макрос VBA для вставки каждого второго столбца
Многие пользователи Excel стараются сэкономить как можно больше времени, автоматизируя частые задачи работы с таблицами. Поэтому я не мог оставить этот пост без макроса. Возьмите этот простой фрагмент кода, если вам нужно раздвинуть столбцы.
Sub InsertEveryOtherColumn() Dim colNo, colStart, colFinish, colStep As Long Dim rng2Insert As Range colStep = 2 colStart = Application.Selection.Cells(1, 1).Column + 1 colFinish = (ActiveSheet.UsedRange.SpecialCells( _ xlCellTypeLastCell).Column * 2) - colStart Application.ScreenUpdating = False Application.Calculation = xlCalculationManual For colNo = colStart To colFinish Step colStepActiveSheet.Cells(1, colNo).EntireColumn.Insert Next Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End SubНадеюсь, эти советы помогут вам в работе с электронными таблицами. Если вы часто работаете с Excel на уровне строк и столбцов, посмотрите связанные посты по ссылкам ниже, которые могут упростить вам некоторые задачи. Я всегда рад вашим комментариям и вопросам. Будьте счастливы и преуспевайте в Excel!