- Valige ühe lahtri abil VBA
- Valige VBA abil lahtrite vahemik
- Valige VBA abil mitteseotud lahtrite vahemik
- Valige kõik töölehe lahtrid
- Valige rida
- Valige veerg
- Valige veerus viimane tühi lahter
- Valige rea viimane tühi lahter
- Valige VBA praegune piirkond
- Valige teise lahtri suhtes lahter
- Valige Excelis nimega vahemik
- Lahtri valimine teisel töölehel
- Valikuobjektiga manipuleerimine VBA -s
- Kasutamine koos … Lõpeta konstrueerimisega
VBA võimaldab teil valida lahtri, lahtrivahemikud või kõik töölehe lahtrid. Saate valitud lahtri või vahemikuga manipuleerida valikuobjekti abil.
Valige ühe lahtri abil VBA
Saate töölehel lahtri valida, kasutades meetodit Vali. Järgmine kood valib ActiveWorksheetis lahtri A2:
1 | Vahemik ("A2"). Valige |
Või
1 | Lahtrid (2, 1). Valige |
Tulemuseks on:
Valige VBA abil lahtrite vahemik
Saate töölehel lahtrirühma valida meetodit Vali ja objekti Vahemik kasutades. Järgmine kood valib A1: C5:
1 | Vahemik ("A1: C5"). Valige |
Valige VBA abil mitteseotud lahtrite vahemik
Saate valida lahtrid või vahemikud, mis ei ole üksteise kõrval, eraldades lahtrid või vahemikud komaga VBA -s. Järgmine kood võimaldab teil valida lahtrid A1, C1 ja E1:
1 | Vahemik ("A1, C1, E1"). Valige |
VBA-s saate valida ka külgnevate vahemike komplekte. Järgmine kood valib A1: A9 ja B11: B18:
1 | Vahemik ("A1: A9, B11: B18"). Valige |
Valige kõik töölehe lahtrid
VBA abil saate töölehe kõik lahtrid valida. Järgmine kood valib kõik töölehe lahtrid.
1 | Lahtrid. Valige |
Valige rida
Saate töölehel teatud rea valida, kasutades objekti Rida ja selle rea indeksinumbrit, mida soovite valida. Järgmine kood valib teie töölehe esimese rea:
1 | Ridad (1). Valige |
Valige veerg
Saate töölehel teatud veeru valida, kasutades objekti Veerg ja selle veeru indeksnumbrit, mida soovite valida. Järgmine kood valib teie töölehel veeru C:
1 | Veerud (3). Valige |
Valige veerus viimane tühi lahter
Oletame, et teil on andmed lahtrites A1, A2, A3 ja A4 ning soovite valida veerus viimase lahtri, mis pole tühi. Selleks saate kasutada VBA -d ja meetodit Range.End.
The Vahemik. Lõppmeetod võib tuua neli argumenti, nimelt: xlToLeft, xlToRight, xlUp ja xlAla.
Järgmine kood valib viimase lahtri, mis pole tühi ja mis oleks antud juhul A4, kui A1 on aktiivne lahter:
1 | Vahemik ("A1"). Lõpp (xlDown). Valige |
Valige rea viimane tühi lahter
Oletame, et teil on andmed lahtrites A1, B1, C1, D1 ja E1 ning soovite valida rea viimase lahtri, mis ei ole tühi. Selleks saate kasutada VBA -d ja meetodit Range.End.
Järgmine kood valib viimase tühja lahtri, mis oleks sel juhul E1, kui A1 on aktiivne lahter:
1 | Vahemik ("A1"). Lõpp (xlToRight). Valige |
Valige VBA praegune piirkond
Võite kasutada Praeguse piirkonna vara vahemiku objekti, et valida konkreetse sisendlahtri ümber ristkülikukujuline tühjade ja tühjade lahtrite vahemik. Kui teil on andmeid lahtris A1, B1 ja C1, valib järgmine kood lahtri A1 ümber selle piirkonna:
1 | Vahemik ("A1"). Praegune piirkond. Valige |
Seega valitakse vahemik A1: C1.
Valige teise lahtri suhtes lahter
Võite kasutada Tasakaalustatud vara teise lahtri suhtes lahtri valimiseks. Järgmine kood näitab, kuidas valida lahter B2, mis on lahtri A1 suhtes 1 rida ja 1 veerg:
1 | Vahemik ("A1"). Nihe (1, 1). Valige |
Valige Excelis nimega vahemik
Saate valida Nimega vahemikud samuti. Oletame, et olete lahtrid nimetanud A1: A4 Puu. Selle nimega vahemiku valimiseks saate kasutada järgmist koodi:
1 | Vahemik ("Puu"). Valige |
Lahtri valimine teisel töölehel
Lahtri valimiseks mõnel teisel töölehel peate esmalt töölehe töölehtede abil aktiveerima. Meetodi aktiveerimine. Järgmine kood võimaldab teil valida lehe A7 lahtri nimega Sheet5:
12 | Töölehed ("Sheet5"). AktiveeriVahemik ("A1"). Valige |
Valikuobjektiga manipuleerimine VBA -s
Kui olete lahtri või lahtrivahemiku valinud, saate nende lahtritega manipuleerimiseks viidata valikuobjektile. Järgmine kood valib lahtrid A1: C1 ja määrab nende lahtrite fondiks Arial, fondi kaalu paksus kirjas, kirjastiili kursiivis ja täitmise värvi roheliseks.
123456789 | AlamvormingSelection ()Vahemik ("A1: C1"). ValigeSelection.Font.Name = "Arial"Selection.Font.Bold = TõsiSelection.Font.Italic = TõsiValik.Sisese.Värv = vbRohelineEnd Sub |
Tulemuseks on:
Kasutamine koos … Lõpeta konstrueerimisega
Võime ülaltoodud näidet korrata, kasutades lauset With / End With, et viidata valikuobjektile ainult üks kord. See säästab trükkimist ja muudab teie koodi tavaliselt hõlpsamini loetavaks.
1234567891011 | Sub UsingWithEndWithSelection ()Vahemik ("A1: C1"). ValigeValikuga.Font.Name = "Arial".Font.Bold = Tõsi.Font.Italic = Tõsi.Sisustus.Värv = vbRohelineLõpetaEnd Sub |