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


 

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



Інструкція

  1. Переконайтеся в тому, що зрозумілий синтаксис команди видалення рядка з використанням команди Delete. Так для рядка, що містить активну клітинку, команда буде виглядати як ActiveCell.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 = CreateObject (Class: = «Excel.Application»). Задайте точне розміщення в наступному рядку: Set XLWb = XLAp.Workbooks. Open («ім’я_диска: 1.xls»).

    Скористайтеся наступним значенням: Set XLWs = XLWb.ActiveSheet.


  4. Пропустіть ще один рядок і введіть значення вибраного завдання: XLWs.Rows (1). Delete.

    Збережіть редагування документа: XLWb.Save. Завершіть роботу програмно відкритого програми: XLAp.Quit.


  5. Пропустіть наступний рядок і замініть змінні на об’єкти з пам’яті: Set XLWs = Nothing.

    Повторіть цю ж команду для кожної відкритої змінної: Set XLWb = Nothing
    і, нарешті, останньою: Set XLAp = Nothing.

    Завершіть команду введенням стандартного End Sub.


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