Програми MS Office розроблені дужерозумно, і я не говорю це лише тому, що вони роблять мою роботу нескінченно легшою. Я говорю це тому, що це правда. Кілька днів тому ми написали публікацію про вставку відео YouTube в Office 2013 і відзначили, що цей варіант відсутній у MS Excel просто тому, що він там не потрібен. Це тип інтелекту, про який я говорю; знаючи, які функції потрібні певному типу додатка. Це гарантує, що нічого нерелевантного не перетворює на остаточну пропозицію. З цього приводу мене здивувало те, що там, де Excel дозволяє вставити більше рядків у робочий аркуш, це не дозволяє вибрати кількість рядків, які потрібно додати. Для цього ви також можете виконати інші завдання, такі як вибір кількості рядків, які ви хочете додати з існуючих, а потім за допомогою функції вставки. Або ви можете повторити крок рядка вставки протягом стільки рядків, скільки вам потрібно. Це повторюється, але якщо ви готові заощадити п'ять хвилин, цей маленький макрос може подбати про роботу за вас.
Оскільки для цього потрібен макрос, вам потрібно будезбережіть свій файл у форматі Excel з підтримкою макросу. Для цього натисніть спадне меню "Зберегти як тип" у вікні збереження як та виберіть "Роботу книжку Excel Marco Enabled" (* xlsm).
Далі настав час написати Макрос. Перейдіть на вкладку Вид і натисніть Макроси, щоб створити нову. Назвіть його, що вам заманеться, і натисніть «Створити». Наступне вікно відкриється автоматично.
Тут важливо "Sub" і "End Sub"лінії. Підрядковий рядок буде містити ім'я вашого макросу, тоді як Кінцевий підрозділ позначає кінець коду в цьому макросі. Оскільки ви тільки що створили його, між цими рядками не повинно бути нічого, як на скріншоті вище. Вставте наступне між цими двома рядками.
Dim CurrentSheet As Object
" Loop through all selected sheets.
For Each CurrentSheet In ActiveWindow.SelectedSheets
" Insert 5 rows at top of each sheet.
CurrentSheet.Range("a1:a5").EntireRow.Insert
Next CurrentSheet
Цей код буде вставляти п'ять рядків із самої верхівки. На нього в коді посилається як А1: А5. Щоб відредагувати його відповідно до ваших потреб, потрібно відредагувати цей діапазон. Перше значення служить посиланням на те, куди будуть вставлені рядки. Якщо змінити його на A100, рядки будуть вставлені після перших дев'яносто дев'яти рядків. Після встановлення опорної точки потрібно ввести кількість рядків.
Номери рядків визначаються діапазоном комірок A1: A5. У цей діапазон буде вставлено 5 рядів. Щоб знайти правильний діапазон для вашої кількості рядків, наприклад, ви хочете вставити 25 рядків від A99, ви додасте 25 до опорної точки, так що це A99 і мінус одна комірка від неї. І.е. A100 + 99 - 1 = A198. Ви додаєте рядки, а не стовпці, щоб змінилася лише цифра, а не літера стовпця. Макрос потрібно оновлювати щоразу, коли потрібно вставляти рядки, але це лише невелика редакція, і він працює дуже добре, тому варто витратити час.
Макрос через підтримку Microsoft
Коментарі