Як видалити рядок vba

Переконайтеся в тому, що зрозумілий синтаксис команди видалення рядки з використанням команди Delete. Так для рядка, що містить активний осередок, команда буде виглядати як ActiveCell.EntireRow.Delete, а необхідність видалення певної кількості рядків змінить її на Rows ( "номер_первой_строкі: номер_последней_строкі"). Delete (для Excel).

Використовуйте подібний синтаксис команди, щоб видалити вибрані рядки і в VBA, але з розширеними параметрами. Для цього перш за все визначте необхідну дію: Private Sub Видалення строкі_Click (). Вкажіть потрібну програму Dim ea As Excel.Application і виберіть необхідну робочу книгу Dim ewb As Excel.Workbook. Потім вкажіть підлягає редагуванню сторінці документа Dim ews As Excel.Worksheet.

Пропустіть одну сходинку і введіть значення Set XLAp = CreateObject (Class: = "Excel.Application"). Задайте точне розміщення в наступному рядку: Set XLWb = XLAp.Workbooks. Open ( "drive: 1.xls"). Скористайтеся наступним значенням: Set XLWs = XLWb.ActiveSheet.

Пропустіть ще одну рядок і введіть значення обраного завдання: XLWs.Rows (1). Delete.Сохраніте редагування документа: XLWb.Save. Завершіть роботу програмно відкритої програми: XLAp.Quit.

пропустіть наступну рядок і замініть змінні на об`єкти з пам`яті: Set XLWs = Nothing.Повторіте цю ж команду для кожної відкритої змінної: Set XLWb = Nothingі, нарешті, останньою: Set XLAp = Nothing.Завершіте команду введенням стандартного End Sub.

Використовуйте макроси для виконання і більш складних операцій з видалення непотрібних рядків документа. Для цього створіть нову книгу додатки Excel і введіть необхідні значення. Розкрийте меню «Сервис» верхній панелі інструментів вікна програми і вкажіть пункт «Макрос». Виберіть підпункт «Редактор Visual Basic» і розкрийте меню «Вставка». Вкажіть пункт «Модуль» і вставте створений документ. Поверніться в меню «Сервис» і знову перейдіть в пункт «Макрос». Скористайтеся підпунктом «Макрос» і вкажіть щойно створений. Запустіть макрос натисканням кнопки «Виконати».