Šī apmācība parādīs, kā VBA atlasīt un strādāt ar visām rindām vai kolonnām.
Vispirms mēs apskatīsim, kā atlasīt visas rindas un kolonnas, pēc tam parādīsim, kā manipulēt ar rindām un kolonnām.
Atlasiet Visas rindas vai kolonnas
Atlasiet vienrindu
Jūs varat izvēlēties visu rindu ar Rindas objekts kā šis:
1 | Rindas (5). Atlasiet |
Vai arī jūs varat izmantot Visa rinda kopā ar Diapazons vai Šūnu objekti:
1 | Diapazons ("B5"). Visa rinda. Atlasiet |
vai
1 | Šūnas (5,1). Visa rinda. Atlasiet |
Varat arī izmantot Diapazona objekts īpaši atsaukties uz rindu:
1 | Diapazons ("5: 5"). Atlasiet |
Atlasiet vienu kolonnu
Tā vietā Rindas objekts, izmantojiet Kolonnas Objekts lai atlasītu kolonnas. Šeit jūs varat atsaukties uz kolonnas numuru 3:
1 | Kolonnas (3). Atlasiet |
vai burts “C”, ko ieskauj citāti:
1 | Kolonnas ("C"). Atlasiet |
Tā vietā Visa rinda, izmantot Visa kolonna kopā ar Diapazons vai Šūnu objekti lai atlasītu visas kolonnas:
1 | Diapazons ("C5"). Visa kolonna. Atlasiet |
vai
1 | Šūnas (5,3). Visa kolonna. Atlasiet |
Varat arī izmantot Diapazona objekts īpaši atsaukties uz kolonnu:
1 | Diapazons ("B: B"). Atlasiet |
Atlasiet vairākas rindas vai kolonnas
Vairāku rindu vai kolonnu atlase darbojas vienādi, ja izmantojat EntireRow vai EntireColumn:
1 | Diapazons ("B5: D10"). Visa rinda. Atlasiet |
vai
1 | Diapazons ("B5: B10"). Visa kolonna. Atlasiet |
Tomēr, lietojot rindu vai kolonnu objektus, rindu numuri vai kolonnu burti jāievada pēdiņās:
1 | Rindas ("1: 3"). Atlasiet |
vai
1 | Kolonnas ("B: C"). Atlasiet |
Atlasiet ActiveCell rindu vai kolonnu
Lai atlasītu ActiveCell rindu vai kolonnu, varat izmantot vienu no šīm koda rindām:
1 | ActiveCell.EntireRow.Select |
vai
1 | ActiveCell.EntireColumn.Select |
Citas darblapas atlasiet rindas un kolonnas
Lai citās darblapās atlasītu rindas vai kolonnas, vispirms jāizvēlas darblapa.
12 | Izklājlapas ("Sheet2"). AtlasietRindas (3). Atlasiet |
Tas pats attiecas uz citu darbgrāmatu rindu vai kolonnu atlasi.
123 | Darbgrāmatas ("Book6.xlsm"). AktivizētIzklājlapas ("Sheet2"). AtlasietRindas (3). Atlasiet |
Piezīme: Jums ir Aktivizēt vēlamo darbgrāmatu. Atšķirībā no Loksnes objekts, Darbgrāmatas objekts nav a Izvēlieties metodi.
Vai ir jāatlasa rindas un kolonnas?
Tomēr (gandrīz?) Nekad nav nepieciešams faktiski atlasīt rindas vai slejas. Lai ar tiem mijiedarbotos, nav jāatlasa rinda vai kolonna. Tā vietā metodes vai rekvizītus varat lietot tieši rindās vai kolonnās. Nākamās vairākas sadaļas parādīs dažādas metodes un rekvizītus, kurus var izmantot.
Lai izmantotu rindas vai kolonnas, varat izmantot jebkuru iepriekš uzskaitīto metodi.
Rindu un kolonnu metodes un īpašības
Dzēsiet visas rindas vai kolonnas
Lai dzēstu rindas vai kolonnas, izmantojiet Dzēšanas metode:
1 | Rindas ("1: 4"). Dzēst |
vai:
1 | Kolonnas ("A: D"). Dzēst |
Ievietojiet rindas vai kolonnas
Izmantojiet Ievietošanas metode lai ievietotu rindas vai kolonnas:
1 | Rindas ("1: 4"). Ievietot |
vai:
1 | Kolonnas ("A: D"). Ievietot |
Kopēt un ielīmēt visas rindas vai kolonnas
Ielīmēt esošajā rindā vai kolonnā
Kopējot un ielīmējot visas rindas vai kolonnas, jums jāizlemj, vai ielīmēt virs esošas rindas / kolonnas vai ievietot jaunu rindu / kolonnu, lai ielīmētu savus datus.
Šie pirmie piemēri tiks kopēti un ielīmēti esošā rindā vai kolonnā:
1 | Diapazons ("1: 1"). Kopēt diapazonu ("5: 5") |
vai
1 | Diapazons ("C: C"). Kopēt diapazonu ("E: E") |
Ievietot un ielīmēt
Šie nākamie piemēri tiks ielīmēti tikko ievietotā rindā vai kolonnā.
Tādējādi tiks kopēta 1. rinda un ievietota 5. rindā, pārvietojot esošās rindas uz leju:
12 | Diapazons ("1: 1"). KopētDiapazons ("5: 5"). Ievietot |
Tādējādi tiks nokopēta kolonna C un ievietota kolonnā E, pārvietojot esošās kolonnas pa labi:
12 | Diapazons ("C: C"). KopētDiapazons ("E: E"). Ievietot |
Paslēpt / parādīt rindas un kolonnas
Lai paslēptu rindas vai kolonnas, iestatiet tās Slēptie rekvizīti uz True. Izmantojiet False, lai paslēptu rindas vai kolonnas:
12345 | 'Slēpt rindasRindas ("2: 3"). EntireRow.Hidden = True'Atklāj rindasRindas ("2: 3"). EntireRow.Hidden = False |
vai
12345 | 'Slēpt kolonnasKolonnas ("B: C"). EntireColumn.Hidden = True'Parādīt slejasKolonnas ("B: C"). EntireColumn.Hidden = False |
Grupēt / atgrupēt rindas un kolonnas
Ja vēlaties grupēt rindas (vai kolonnas), izmantojiet šādu kodu:
12345 | 'Grupas rindasRindas ("3: 5"). Grupa"Grupas kolonnasKolonnas ("C: D"). Grupa |
Lai noņemtu grupu, izmantojiet šo kodu:
12345 | 'Atgrupēt rindasRindas ("3: 5"). Atgrupēt'Atgrupēt kolonnasKolonnas ("C: D"). Atgrupēt |
Tas paplašinās visus “grupētos” kontūru līmeņus:
1 | ActiveSheet.Outline.ShowLevels RowLevels: = 8, ColumnLevels: = 8 |
un tas sabojās visus kontūras līmeņus:
1 | ActiveSheet.Outline.ShowLevels RowLevels: = 1, ColumnLevels: = 1 |
Iestatiet rindas augstumu vai kolonnas platumu
Lai iestatītu kolonnas platumu, izmantojiet šo koda rindu:
1 | Kolonnas ("A: E"). Kolonnas platums = 30 |
Lai iestatītu rindas augstumu, izmantojiet šo koda rindu:
1 | Rindas ("1: 1"). Rindas augstums = 30 |
Autofit rindas augstums / kolonnas platums
Lai automātiski pielāgotu kolonnu:
1 | Kolonnas ("A: B"). Automātiskā pielāgošana |
Lai automātiski pielāgotu rindu:
1 | Rindas ("1: 2"). Autofit |
Rindas un kolonnas citās darblapās vai darbgrāmatās
Lai mijiedarbotos ar rindām un kolonnām citās darblapās, jums ir jādefinē Loksnes objekts:
1 | Izklājlapas ("2. lapa"). Rindas (3). Ievietot |
Līdzīgi, lai mijiedarbotos ar rindām un kolonnām citās darbgrāmatās, ir jādefinē arī Darbgrāmatas objekts:
1 | Darbgrāmatas ("book1.xlsm"). Izklājlapas ("Sheet2"). Rindas (3). Ievietot |
Iegūstiet aktīvo rindu vai kolonnu
Lai iegūtu aktīvo rindu vai kolonnu, varat izmantot Rinda un Kolonnas rekvizīti no ActiveCell objekts.
1 | MsgBox ActiveCell.Row |
vai
1 | MsgBox ActiveCell. Kolonna |
Tas darbojas arī ar Diapazona objekts:
1 | MsgBox diapazons ("B3"). Kolonna |