Як видалити рядок 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.

Схожі статті