Як вилучити рядок vba

Як вилучити рядок vba

Вилучення рядка VBA є стандартною і часто використовуваною розробниками процедурою. Тим не менш, у менш досвідчених користувачів виконання даної операції може викликати деякі труднощі.

Інструкція

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


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

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

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

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

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