VBA-rivin poistaminen on kehittäjien tavanomainen ja yleisesti käytetty menettely. Vähemmän kokeneille käyttäjille tämä toiminto voi kuitenkin aiheuttaa vaikeuksia.
Ohjeet
Vaihe 1
Varmista, että ymmärrät poistorivikomennon syntaksin Poista-komennolla. Joten rivillä, joka sisältää aktiivisen solun, komento näyttää ActiveCell. EntireRow. Delete, ja tarve poistaa useita rivejä muuttaa sen riviksi ("first_line_number: last_line_number"). Poista (for Excel).
Vaihe 2
Käytä samanlaista syntaksia valitun rivikomennon poistamiseen VBA: ssa, mutta lisäasetuksilla. Voit tehdä tämän määrittämällä ensin vaaditun toiminnon: Yksityinen alipoisto line_Click (). Määritä vaadittu sovellus Dim ea As Excel. Application ja valitse vaadittu työkirja Dim ewb As Excel. Workbook. Määritä sitten muokattavan Dim ews As Excel. Worksheet -asiakirjan sivu.
Vaihe 3
Ohita yksi rivi ja kirjoita Set XLAp = CreateObject (Class: = "Excel. Application"). Aseta tarkka sijoitus seuraavalle riville: Aseta XLWb = XLAp. Työkirjat. Avaa ("aseman_nimi: 1.xls") Käytä seuraavaa arvoa: Aseta XLWs = XLWb. ActiveSheet.
Vaihe 4
Ohita toinen rivi ja kirjoita valitun työn arvo: XLWs. Rows (1). Poista. Tallenna muokattu asiakirja: XLWb. Save. Sulje avoimen lähdekoodin sovellus: XLAp. Quit.
Vaihe 5
Ohita seuraava rivi ja korvaa muuttujat muistikohteilla: Aseta XLWs = Ei mitään. Toista sama komento jokaiselle avoimelle muuttujalle: Aseta XLWb = Ei mitään ja lopuksi viimeinen: Aseta XLAp = Ei mitään. Viimeistele komento lopullisella lopetusalalla.
Vaihe 6
Käytä makroja monimutkaisempien toimintojen poistamiseen tarpeettomien rivien poistamiseksi asiakirjassa. Voit tehdä tämän luomalla uuden Excel-työkirjan ja kirjoittamalla vaaditut arvot. Avaa ohjelmaikkunan ylemmän työkalurivin "Palvelu" -valikko ja valitse kohta "Makro". Valitse alakohta "Visual Basic Editor" ja laajenna "Lisää" -valikko. Valitse "Moduuli" -kohde ja lisää luotu asiakirja. Palaa Työkalut-valikkoon ja siirry jälleen Makro-kohtaan. Käytä "Makrot" -alakohtaa ja määritä uusi luomasi. Suorita makro napsauttamalla Suorita-painiketta.