VBA Valitse alue / solut

VBA: n avulla voit valita solun, solualueet tai kaikki laskentataulukon solut. Voit muokata valittua solua tai aluetta valintaobjektin avulla.

Valitse yksittäinen solu VBA: n avulla

Voit valita laskentataulukon solun Valitse -menetelmällä. Seuraava koodi valitsee solun A2 ActiveWorksheet -taulukossa:

1	Alue ("A2"). Valitse

Tai

1	Solut (2, 1) Valitse

Tulos on:

Valitse solualue VBA: n avulla

Voit valita laskentataulukon soluryhmän Select -menetelmällä ja Range -objektilla. Seuraava koodi valitsee A1: C5:

1	Alue ("A1: C5"). Valitse

Valitse joukko ei-vierekkäisiä soluja VBA: n avulla

Voit valita soluja tai alueita, jotka eivät ole vierekkäin, erottamalla solut tai alueet pilkulla VBA: ssa. Seuraavan koodin avulla voit valita solut A1, C1 ja E1:

1	Alue ("A1, C1, E1"). Valitse

Voit myös valita joukkoja ei-vierekkäisiä alueita VBA: ssa. Seuraava koodi valitsee A1: A9 ja B11: B18:

1	Alue ("A1: A9, B11: B18"). Valitse

Valitse kaikki laskentataulukon solut

Voit valita kaikki laskentataulukon solut VBA: n avulla. Seuraava koodi valitsee kaikki laskentataulukon solut.

1	Solut Valitse

Valitse rivi

Voit valita tietyn rivin laskentataulukosta käyttämällä Rivi -objektia ja valitun rivin indeksinumeroa. Seuraava koodi valitsee laskentataulukon ensimmäisen rivin:

1	Rivit (1) Valitse

Valitse sarake

Voit valita tietyn sarakkeen laskentataulukosta käyttämällä sarakeobjektia ja valitun sarakkeen hakemistonumeroa. Seuraava koodi valitsee laskentataulukon sarakkeen C:

1	Sarakkeet (3) Valitse

Valitse sarakkeen viimeinen ei-tyhjä solu

Oletetaan, että sinulla on tietoja soluissa A1, A2, A3 ja A4 ja haluat valita viimeisen ei-tyhjän solun, joka olisi sarake A4. Voit tehdä tämän VBA: n ja Range.End -menetelmän avulla.

The Alue.End -menetelmä voi ottaa neljä argumenttia, nimittäin: xlToLeft, xlToRight, xlUp ja xlAlas.

Seuraava koodi valitsee viimeisen ei-tyhjän solun, joka olisi tässä tapauksessa A4, jos A1 on aktiivinen solu:

1	Alue ("A1"). Loppu (xlDown) .Valitse

Valitse rivin viimeinen ei-tyhjä solu

Oletetaan, että sinulla on tietoja soluissa A1, B1, C1, D1 ja E1 ja haluat valita viimeisen ei-tyhjän solun, joka olisi solu E1 rivillä. Voit tehdä tämän VBA: n ja Range.End -menetelmän avulla.

Seuraava koodi valitsee viimeisen ei-tyhjän solun, joka olisi tässä tapauksessa E1, jos A1 on aktiivinen solu:

1	Alue ("A1"). Loppu (xlToRight) .Valitse

Valitse Nykyinen alue VBA: ssa

Voit käyttää Nykyisen alueen omaisuus Range-objektista, jotta voit valita suorakulmaisen tyhjien ja ei-tyhjien solujen alueen tietyn syötetyn solun ympäriltä. Jos sinulla on tietoja soluissa A1, B1 ja C1, seuraava koodi valitsee tämän alueen solun A1 ympärillä:

1	Alue ("A1"). Nykyinen alue.Valitse

Joten alue A1: C1 valitaan.

Valitse solu, joka on suhteessa toiseen soluun

Voit käyttää Offset -ominaisuus valitaksesi solun, joka on suhteessa toiseen soluun. Seuraava koodi näyttää, kuinka valitset solun B2, joka on 1 rivi ja 1 sarake suhteessa soluun A1:

1	Alue ("A1"). Siirtymä (1, 1)

Valitse nimetty alue Excelissä

Voit valita Nimetyt alueet yhtä hyvin. Oletetaan, että olet antanut soluille nimen A1: A4 Hedelmä. Voit valita tämän nimetyn alueen käyttämällä seuraavaa koodia:

1	Alue ("Hedelmät"). Valitse

Solun valitseminen toisella laskentataulukolla

Jos haluat valita solun toisesta laskentataulukosta, sinun on ensin aktivoitava taulukko laskentataulukoiden avulla. Seuraavan koodin avulla voit valita Sheet5 -taulukon solun A7:

12	Laskentataulukot ("Sheet5"). AktivoiAlue ("A1"). Valitse

Valintaobjektin manipulointi VBA: ssa

Kun olet valinnut solun tai solualueen, voit viitata valintaobjektiin näiden solujen käsittelemiseksi. Seuraava koodi valitsee solut A1: C1 ja asettaa näiden solujen fontiksi Arial, kirjasimen painon lihavoituna, kirjasintyylin kursiiviksi ja täyttövärin vihreäksi.

123456789

AlaformaattiValinta ()Alue ("A1: C1"). ValitseSelection.Font.Name = "Arial"Selection.Font.Bold = TosiSelection.Font.Italic = TottaSelection.Interior.Color = vbVihreäEnd Sub

Tulos on:

Käyttäminen With… End With Construct

Voimme toistaa yllä olevan esimerkin käyttämällä / Lopeta -lauseketta viittaamaan valintaobjektiin vain kerran. Tämä säästää kirjoittamista ja helpottaa yleensä koodin lukemista.

1234567891011

Sub UsingWithEndWithSelection ()Alue ("A1: C1"). ValitseValinnan kanssa.Font.Name = "Arial".Font.Bold = Totta.Font.Italic = Totta.Interior.Color = vbVihreäLopetaEnd Sub