Ši pamoka parodys, kaip pasirinkti ir dirbti su visomis eilutėmis ar stulpeliais VBA.
Pirmiausia aptarsime, kaip pasirinkti visas eilutes ir stulpelius, tada parodysime, kaip manipuliuoti eilėmis ir stulpeliais.
Pasirinkite Visas eilutes arba stulpelius
Pasirinkite vieną eilutę
Galite pasirinkti visą eilutę naudodami Eilučių objektas kaip šitas:
1 | Eilutės (5). Pasirinkite |
Arba galite naudoti Visa eilutė kartu su diapazonas arba Ląstelių objektai:
1 | Diapazonas („B5“). Visa eilutė. Pasirinkite |
arba
1 | Ląstelės (5,1). Visa eilutė. Pasirinkite |
Taip pat galite naudoti Diapazono objektas konkrečiai nurodyti eilutę:
1 | Diapazonas („5: 5“). Pasirinkite |
Pasirinkite vieną stulpelį
Vietoj Eilučių objektas, naudoti Stulpeliai Objektas pasirinkti stulpelius. Čia galite nurodyti 3 stulpelio numerį:
1 | Stulpeliai (3). Pasirinkite |
arba raidė „C“, apsupta citatų:
1 | Stulpeliai („C“). Pasirinkite |
Vietoj Visa eilutė, naudoti Visa stulpelis kartu su diapazonas arba Ląstelių objektai Norėdami pasirinkti visus stulpelius:
1 | Diapazonas („C5“). Visa stulpelis. Pasirinkite |
arba
1 | Ląstelės (5,3). Visa stulpelis. Pasirinkite |
Taip pat galite naudoti Diapazono objektas konkrečiai nurodyti stulpelį:
1 | Diapazonas („B: B“). Pasirinkite |
Pasirinkite kelias eilutes arba stulpelius
Naudojant „EntireRow“ arba „EntireColumn“, kelių eilučių ar stulpelių pasirinkimas veikia visiškai vienodai:
1 | Diapazonas („B5: D10“). „EntireRow.Select“ |
arba
1 | Diapazonas („B5: B10“). Visa stulpelis. Pasirinkite |
Tačiau, kai naudojate objektų eilutes ar stulpelius, eilutės numerius arba stulpelių raides turite įvesti kabutėse:
1 | Eilutės („1: 3“). Pasirinkite |
arba
1 | Stulpeliai („B: C“). Pasirinkite |
Pasirinkite „ActiveCell“ eilutė arba stulpelis
Norėdami pasirinkti „ActiveCell“ eilutę ar stulpelį, galite naudoti vieną iš šių kodo eilučių:
1 | ActiveCell.EntireRow.Select |
arba
1 | ActiveCell.EntireColumn.Select |
Kituose darbalapiuose pasirinkite eilutes ir stulpelius
Norėdami pasirinkti eilutes ar stulpelius kituose darbalapiuose, pirmiausia turite pasirinkti darbalapį.
12 | Skaičiuoklės („Sheet2“). PasirinkiteEilutės (3). Pasirinkite |
Tas pats pasakytina ir renkantis eilutes ar stulpelius kitose darbaknygėse.
123 | Darbaknygės („Book6.xlsm“). AktyvintiSkaičiuoklės („Sheet2“). PasirinkiteEilutės (3). Pasirinkite |
Pastaba: Jūs turite Suaktyvinti norimą darbo knygą. Skirtingai nuo Lakštų objektas, Darbo knygos objektas neturi a Pasirinkite Metodas.
Ar reikia pasirinkti eilutes ir stulpelius?
Tačiau (beveik?) Niekada nereikia iš tikrųjų pasirinkti eilutės ar stulpeliai. Jums nereikia pasirinkti eilutės ar stulpelio, kad galėtumėte su jais bendrauti. Vietoj to, metodus ar ypatybes galite taikyti tiesiogiai eilutėms ar stulpeliams. Kituose skyriuose bus parodyti skirtingi metodai ir savybės, kuriuos galima taikyti.
Eilėms ar stulpeliams nurodyti galite naudoti bet kurį aukščiau išvardytą metodą.
Eilučių ir stulpelių metodai ir savybės
Ištrinkite visas eilutes ar stulpelius
Norėdami ištrinti eilutes ar stulpelius, naudokite Ištrinti metodas:
1 | Eilutės („1: 4“). Ištrinti |
arba:
1 | Stulpeliai („A: D“). Ištrinti |
Įterpkite eilutes arba stulpelius
Naudoti Įterpimo metodas Norėdami įterpti eilutes ar stulpelius:
1 | Eilutės ("1: 4"). Įterpti |
arba:
1 | Stulpeliai („A: D“). Įterpimas |
Nukopijuokite ir įklijuokite visas eilutes ar stulpelius
Įklijuokite į esamą eilutę arba stulpelį
Kopijuodami ir įklijuodami visas eilutes ar stulpelius, turite nuspręsti, ar norite įklijuoti esamą eilutę / stulpelį, ar įterpti naują eilutę / stulpelį, kad įklijuotumėte duomenis.
Šie pirmieji pavyzdžiai nukopijuos ir įklijuos esamą eilutę ar stulpelį:
1 | Diapazonas („1: 1“). Kopijuoti diapazoną („5: 5“) |
arba
1 | Diapazonas („C: C“). Kopijuoti diapazoną („E: E“) |
Įterpti ir įklijuoti
Šie kiti pavyzdžiai bus įklijuoti į naujai įterptą eilutę ar stulpelį.
Bus nukopijuota 1 eilutė ir įterpta į 5 eilutę, perkeliant esamas eilutes žemyn:
12 | Diapazonas („1: 1“). KopijuotiDiapazonas („5: 5“) |
Tai nukopijuos C stulpelį ir įterps jį į E stulpelį, perkeliant esamus stulpelius į dešinę:
12 | Diapazonas („C: C“). KopijuotiDiapazonas („E: E“). Įterpimas |
Slėpti / rodyti eilutes ir stulpelius
Norėdami paslėpti eilutes ar stulpelius, nustatykite jas Paslėptos savybės į Tiesa. Norėdami paslėpti eilutes ar stulpelius, naudokite False:
12345 | 'Slėpti eilesEilutės ("2: 3"). EntireRow.Hidden = Tiesa„Rodyti eilutesEilutės ("2: 3"). EntireRow.Hidden = Netiesa |
arba
12345 | 'Slėpti stulpeliusStulpeliai („B: C“). EntireColumn.Hidden = Tiesa„Rodyti stulpeliusStulpeliai („B: C“). EntireColumn.Hidden = False |
Grupuoti / išgrupuoti eilutes ir stulpelius
Jei norite grupuoti eilutes (arba stulpelius), naudokite tokį kodą:
12345 | „Grupės eilėsEilutės („3: 5“). Grupė„Grupės stulpeliaiStulpeliai („C: D“). Grupė |
Norėdami pašalinti grupavimą, naudokite šį kodą:
12345 | „Išgrupuoti eilutesEilutės („3: 5“). Išgrupuoti„Išgrupuoti stulpeliusStulpeliai („C: D“). Išgrupuoti |
Tai išplės visus „sugrupuotus“ metmenų lygius:
1 | ActiveSheet.Outline.ShowLevels RowLevels: = 8, ColumnLevels: = 8 |
ir tai sutrauks visus kontūro lygius:
1 | ActiveSheet.Outline.ShowLevels RowLevels: = 1, ColumnLevels: = 1 |
Nustatykite eilutės aukštį arba stulpelio plotį
Norėdami nustatyti stulpelio plotį, naudokite šią kodo eilutę:
1 | Stulpeliai („A: E“). Stulpelio plotis = 30 |
Norėdami nustatyti eilutės aukštį, naudokite šią kodo eilutę:
1 | Eilutės ("1: 1"). RowHeight = 30 |
Automatinio pritaikymo eilutės aukštis / stulpelio plotis
Norėdami automatiškai pritaikyti stulpelį:
1 | Stulpeliai („A: B“). Automatinis pritaikymas |
Norėdami automatiškai pritaikyti eilutę:
1 | Eilutės („1: 2“). Automatinis pritaikymas |
Eilutės ir stulpeliai kituose darbalapiuose arba darbaknygėse
Jei norite sąveikauti su kitų darbalapių eilutėmis ir stulpeliais, turite apibrėžti Lakštų objektas:
1 | Skaičiuoklės („2 lapas“). Eilutės (3). Įterpti |
Panašiai, norėdami sąveikauti su kitų darbo knygų eilutėmis ir stulpeliais, taip pat turite apibrėžti Darbo knygos objektas:
1 | Darbaknygės ("book1.xlsm"). Skaičiuoklės ("Sheet2"). Eilutės (3). Įterpti |
Gaukite aktyvią eilutę arba stulpelį
Norėdami gauti aktyvią eilutę ar stulpelį, galite naudoti Eilutė ir Stulpelio ypatybės iš „ActiveCell“ objektas.
1 | „MsgBox ActiveCell.Row“ |
arba
1 | „MsgBox ActiveCell.Column“ |
Tai taip pat veikia su Diapazono objektas:
1 | „MsgBox“ diapazonas („B3“). Stulpelis |