VBA līnijas dzēšana ir standarta un izstrādātāju parasti izmantotā procedūra. Tomēr mazāk pieredzējušiem lietotājiem šī darbība var sagādāt dažas grūtības.
Instrukcijas
1. solis
Pārliecinieties, vai saprotat komandas Dzēst līnijas sintaksi, izmantojot komandu Dzēst. Tātad rindai, kurā ir aktīvā šūna, komanda izskatīsies kā ActiveCell. EntireRow. Delete, un nepieciešamība izdzēst vairākas rindas to mainīs uz Rows ("first_line_number: last_line_number"). Dzēst (Excel).
2. solis
Izmantojiet līdzīgu sintaksi VBA atlasītās rindas dzēšanai, bet ar papildu opcijām. Lai to izdarītu, vispirms definējiet nepieciešamo darbību: Private Sub Delete line_Click (). Norādiet nepieciešamo lietojumprogrammu Dim ea As Excel. Pieteikums un atlasiet nepieciešamo darbgrāmatu Dim ewb As Excel. Workbook. Pēc tam norādiet rediģējamā Dim ews As Excel. Worksheet dokumenta lapu.
3. solis
Izlaidiet vienu rindu un ievadiet Set XLAp = CreateObject (Class: = "Excel. Application"). Šādā rindā iestatiet precīzu izvietojumu: Iestatiet XLWb = XLAp. Workbooks. Atveriet ("drive_name: 1.xls") Izmantojiet šādu vērtību: Iestatiet XLWs = XLWb. ActiveSheet.
4. solis
Izlaidiet citu rindu un ievadiet atlasītā darba vērtību: XLWs. Rindas (1). Dzēst. Saglabājiet rediģēto dokumentu: XLWb. Save. Aizveriet atvērtā koda lietojumprogrammu: XLAp. Quit.
5. solis
Izlaidiet nākamo rindu un nomainiet mainīgos ar atmiņas objektiem: Iestatiet XLWs = Nothing. Atkārtojiet to pašu komandu katram atvērtajam mainīgajam: Set XLWb = Nothing un visbeidzot pēdējo: Set XLAp = Nothing. Pabeidziet komandu ar standarta End Sub.
6. solis
Izmantojiet makro, lai veiktu sarežģītākas darbības, lai dokumentā izdzēstu nevajadzīgas rindas. Lai to izdarītu, izveidojiet jaunu Excel darbgrāmatu un ievadiet nepieciešamās vērtības. Atveriet programmas loga augšējās rīkjoslas izvēlni "Pakalpojums" un atlasiet vienumu "Makro". Atlasiet apakšpozīciju "Visual Basic Editor" un izvērsiet izvēlni "Ievietot". Atlasiet vienumu "Modulis" un ievietojiet izveidoto dokumentu. Atgriezieties izvēlnē "Rīki" un atkal dodieties uz vienumu "Makro". Izmantojiet apakšpozīciju "Makro" un norādiet jaunizveidoto. Palaidiet makro, noklikšķinot uz pogas Izpildīt.
