Как да премахнете Vba линия

Съдържание:

Как да премахнете Vba линия
Как да премахнете Vba линия

Видео: Как да премахнете Vba линия

Видео: Как да премахнете Vba линия
Видео: -2- VBA Excel. Информационное сообщение в Excel. Функция Msgbox. 2024, Може
Anonim

Изтриването на VBA линия е стандартна и често използвана процедура от разработчиците. За по-малко опитни потребители обаче тази операция може да причини някои трудности.

Как да премахнете vba линия
Как да премахнете vba линия

Инструкции

Етап 1

Уверете се, че разбирате синтаксиса на командата за изтриване на линия, като използвате командата Изтриване. Така че за реда, съдържащ активната клетка, командата ще изглежда като ActiveCell. EntireRow. Delete и необходимостта от изтриване на редица редове ще я промени в Редове ("first_line_number: last_line_number"). Изтриване (за Excel).

Стъпка 2

Използвайте подобен синтаксис за командата за изтриване на избран ред във VBA, но с разширени опции. За да направите това, първо дефинирайте необходимото действие: Private Sub Delete line_Click (). Посочете необходимото приложение Dim ea As Excel. Application и изберете необходимата работна книга Dim ewb As Excel. Workbook. След това посочете страницата на документа Dim Dimes As Excel. Worksheet, който ще се редактира.

Стъпка 3

Пропуснете един ред и въведете Set XLAp = CreateObject (Class: = "Excel. Application"). Задайте точното разположение на следния ред: Задайте XLWb = XLAp. Workbooks. Отваряне ("име на устройство: 1.xls") Използвайте следната стойност: Задайте XLWs = XLWb. ActiveSheet.

Стъпка 4

Пропуснете друг ред и въведете стойността на избраната работа: XLWs. Rows (1). Изтриване. Запазете редактирания документ: XLWb. Save. Затворете приложението с отворен код: XLAp. Quit.

Стъпка 5

Пропуснете следващия ред и заменете променливите с обекти от паметта: Задайте XLWs = Нищо. Повторете същата команда за всяка отворена променлива: Задайте XLWb = Нищо и накрая последната: Задайте XLAp = Нищо. Завършете командата със стандартния End Sub.

Стъпка 6

Използвайте макроси за извършване на по-сложни операции за изтриване на ненужни редове в документ. За целта създайте нова работна книга на Excel и въведете необходимите стойности. Отворете менюто "Service" в горната лента с инструменти на прозореца на програмата и изберете елемента "Macro". Изберете подпункта "Visual Basic Editor" и разгънете менюто "Insert". Изберете елемента "Модул" и поставете създадения документ. Върнете се в менюто "Инструменти" и отново отидете на елемента "Макрос". Използвайте под-елемент "Макроси" и посочете новосъздадения. Стартирайте макроса, като щракнете върху бутона Run.

Препоръчано: