Acest tutorial va demonstra cum să selectați și să lucrați cu rânduri sau coloane întregi în VBA.
Mai întâi vom acoperi cum să selectăm rânduri și coloane întregi, apoi vom demonstra cum să manipulăm rândurile și coloanele.
Selectați Rânduri întregi sau Coloane
Selectați rând unic
Puteți selecta un rând întreg cu Obiectul Rows asa:
1 | Rânduri (5). Selectați |
Sau puteți folosi Întregul rând impreuna cu Gamă sau Obiecte celulare:
1 | Range ("B5"). EntireRow.Select |
sau
1 | Celule (5,1) .Entreg Rând.Selectați |
Puteți utiliza, de asemenea Obiectul Range pentru a face referire în mod specific la un rând:
1 | Gama („5: 5”). Selectați |
Selectați o singură coloană
In loc de Obiectul Rows, folosește Coloane Obiect pentru a selecta coloane. Aici puteți face referință la coloana numărul 3:
1 | Coloane (3). Selectați |
sau litera „C”, înconjurată de citate:
1 | Coloane („C”). Selectați |
In loc de Întregul rând, utilizare ÎntregColoană impreuna cu Gamă sau Obiecte celulare pentru a selecta coloane întregi:
1 | Range ("C5"). EntireColumn.Select |
sau
1 | Celule (5,3) .EntregăColoană. Selectați |
Puteți utiliza, de asemenea, Obiectul Range pentru a face referire în mod specific la o coloană:
1 | Range ("B: B"). Selectați |
Selectați mai multe rânduri sau coloane
Selectarea mai multor rânduri sau coloane funcționează exact la fel când se utilizează EntireRow sau EntireColumn:
1 | Gama ("B5: D10"). EntireRow.Select |
sau
1 | Range („B5: B10”). EntireColumn.Select |
Cu toate acestea, când utilizați obiectele rânduri sau coloane, trebuie să introduceți numerele rândurilor sau literele coloanei între ghilimele:
1 | Rânduri („1: 3”). Selectați |
sau
1 | Coloane („B: C”). Selectați |
Selectați rândul sau coloana ActiveCell
Pentru a selecta rândul sau coloana ActiveCell, puteți utiliza una dintre aceste linii de cod:
1 | ActiveCell.EntireRow.Select |
sau
1 | ActiveCell.EntireColumn.Select |
Selectați rânduri și coloane pe alte foi de lucru
Pentru a selecta Rânduri sau Coloane pe alte foi de lucru, trebuie mai întâi să selectați foaia de lucru.
12 | Foi („Sheet2”). SelectațiRânduri (3). Selectați |
Același lucru este valabil și atunci când selectați rânduri sau coloane în alte registre de lucru.
123 | Cărți de lucru („Book6.xlsm”). ActivațiFoi („Sheet2”). SelectațiRânduri (3). Selectați |
Notă: trebuie Activati registrul de lucru dorit. spre deosebire de Obiecte Foi, Obiect de registru de lucru nu are o Selectați Metoda.
Este necesară selectarea rândurilor și a coloanelor?
Cu toate acestea, nu este (aproape?) Niciodată necesar să selectați de fapt Rânduri sau Coloane. Nu trebuie să selectați un rând sau o coloană pentru a interacționa cu acestea. În schimb, puteți aplica metode sau proprietăți direct la rânduri sau coloane. Următoarele câteva secțiuni vor demonstra diferite metode și proprietăți care pot fi aplicate.
Puteți utiliza orice metodă enumerată mai sus pentru a vă referi la Rânduri sau Coloane.
Metode și proprietăți ale rândurilor și coloanelor
Ștergeți rânduri sau coloane întregi
Pentru a șterge rânduri sau coloane, utilizați Metoda de ștergere:
1 | Rânduri („1: 4”). Ștergeți |
sau:
1 | Coloane („A: D”). Ștergeți |
Introduceți rânduri sau coloane
Folosește Metoda de inserare pentru a insera rânduri sau coloane:
1 | Rânduri („1: 4”). Introduceți |
sau:
1 | Coloane ("A: D"). Inserați |
Copiați și lipiți rânduri sau coloane întregi
Lipiți în rândul sau coloana existentă
Când copiați și lipiți rânduri sau coloane întregi, trebuie să decideți dacă doriți să lipiți peste un rând / coloană existent sau dacă doriți să inserați un rând / coloană nouă pentru a lipi datele.
Aceste prime exemple vor copia și lipi peste un rând sau coloană existentă:
1 | Gama („1: 1”). Gama de copiere („5: 5”) |
sau
1 | Gama ("C: C"). Gama de copiere ("E: E") |
Inserați și lipiți
Următoarele exemple se vor lipi într-un rând sau o coloană nou inserată.
Aceasta va copia rândul 1 și îl va introduce în rândul 5, deplasând rândurile existente în jos:
12 | Gama („1: 1”). CopiațiGama („5: 5”). Introduceți |
Aceasta va copia coloana C și o va insera în coloana E, deplasând coloanele existente la dreapta:
12 | Gama („C: C”). CopiațiGama ("E: E"). Introduceți |
Ascunde / Afișează rândurile și coloanele
Pentru a ascunde rânduri sau coloane setați-le Proprietăți ascunse la Adevărat. Folosiți Fals pentru a ascunde rândurile sau coloanele:
12345 | „Ascunde rândurileRânduri („2: 3”). EntireRow.Hidden = True„Afișează rândurileRânduri („2: 3”). EntireRow.Hidden = False |
sau
12345 | „Ascundeți coloaneleColoane („B: C”). EntireColumn.Hidden = Adevărat„Afișează coloaneleColoane („B: C”). EntireColumn.Hidden = False |
Grupați / Ungrupați rândurile și coloanele
Dacă doriți să grupați rânduri (sau coloane) utilizați codul astfel:
12345 | „Rânduri de grupRânduri („3: 5”). Grup'Coloane de grupColoane („C: D”). Grup |
Pentru a elimina gruparea, utilizați acest cod:
12345 | „Dezgropați rândurileRânduri („3: 5”). Dezgrupare„Dezagregați coloaneleColoane („C: D”). Dezagregați |
Aceasta va extinde toate nivelurile de contur „grupate”:
1 | ActiveSheet.Outline.ShowLevels RowLevels: = 8, ColumnLevels: = 8 |
iar aceasta va prăbuși toate nivelurile de contur:
1 | ActiveSheet.Outline.ShowLevels RowLevels: = 1, ColumnLevels: = 1 |
Setați înălțimea rândului sau lățimea coloanei
Pentru a seta lățimea coloanei utilizați această linie de cod:
1 | Coloane („A: E”). ColumnWidth = 30 |
Pentru a seta înălțimea rândului, utilizați această linie de cod:
1 | Rânduri („1: 1”). Înălțimea rândului = 30 |
Autofit Înălțimea rândului / Lățimea coloanei
Pentru adaptarea automată a unei coloane:
1 | Coloane („A: B”). Autofit |
Pentru ajustarea automată a unui rând:
1 | Rânduri („1: 2”). Autofit |
Rânduri și coloane pe alte foi de lucru sau registre de lucru
Pentru a interacționa cu rânduri și coloane pe alte foi de lucru, trebuie să definiți Obiecte Foi:
1 | Foi („Sheet2”). Rânduri (3) .Insert |
În mod similar, pentru a interacționa cu rândurile și coloanele din alte registre de lucru, trebuie să definiți și Obiect de registru de lucru:
1 | Cărți de lucru („book1.xlsm”). Foi („Sheet2”). Rânduri (3). Inserare |
Obțineți rândul activ sau coloana
Pentru a obține rândul sau coloana activă, puteți utiliza Rând și Proprietăți coloană din Obiect ActiveCell.
1 | MsgBox ActiveCell.Row |
sau
1 | MsgBox ActiveCell.Column |
Acest lucru funcționează și cu Obiectul Range:
1 | MsgBox Range („B3”). Coloană |