VBA valik | Mis on Exceli VBA valimisvara? (koos näidetega)

VBA-s saame valida mis tahes lahtrivahemiku või lahtrirühma ja teha neile erinevaid toiminguid. Valik on vahemikuobjekt, nii et rakkude valimiseks kasutame vahemikumeetodit, kuna see identifitseerib lahtrid ja kood rakkude valimiseks on „Select“ käsk, valimiseks kasutatav süntaks on vahemik (A1: B2) .vali.

Mis on Exceli VBA valiku omadus?

Valik on VBA-s saadaval olev vara. Kui valitud lahtrite vahemik, peame otsustama, mida me peame tegema. Niisiis, kasutades seda VBA „Selection” omadust, saame teha kõik asjad, mida saame teha valitud lahtritega. Atribuudi Selection üks probleem on see, et me ei näe IntelliSense'i loendit. Nii et koodi kirjutades peame olema täiesti kindlad, mida teeme ilma IntelliSense'i loendita.

Näited valiku atribuudist VBA-s

Siin vaatleme Exceli VBA valiku näiteid.

Selle VBA valiku Exceli malli saate alla laadida siit - VBA valiku Exceli mall

Näide 1

Lubage mul näidata teile VBA-ga atribuudi „valik” lihtne näide. Nüüd tahan kõigepealt valida lahtrid A1 kuni B5, selleks võime kirjutada VBA koodi niimoodi.

Vahemik ( „A1: B5” ). Valige

Kood:

 Alamvaliku_näide1 () vahemik ("A1: B5"). Valige Lõpeta alam 

See kood valib VBA lahtrivahemiku A1 kuni B5.

Kui tahan nendesse lahtritesse lisada väärtuse “tere”, saan koodi kirjutada niimoodi.

Kood:

 Alamvaliku_näide1 () vahemik ("A1: B5"). Väärtus = "tere" Lõpp alam 

Samamoodi saab rakkude valimisel valikuks valik.

Kood:

 Alamvaliku_näide1 () vahemik ("A1: B5"). Valige Selection.Value = "Hello" End Sub 

Eelnevalt olen valinud rakkude vahemiku A1 kuni B5. Niisiis valib see rida lahtrid.

Kui need lahtrid on valitud, saame neile lahtritele viidata, kasutades Exceli VBA omadust „Valik”. Nii et atribuudi Selection abil saame nendesse lahtritesse sisestada väärtuse “Hello”.

See on üldine ülevaade VBA atribuudist „Valik”.

Näide 2

Nüüd näeme muutujatega atribuuti VBA “Selection”. Määrake VBA muutuja vahemikuks.

Kood:

 Alamvalik_näide2 () Dim Rng vahemiku lõpu alam 

Vahemik on objekti muutuja, kuna see on objektimuutuja, peame määrama lahtrite vahemiku märksõna „Set” abil.

Määran vahemikuks “Range (“ A1: A6 ”).

Kood:

 Alamvalik_näide2 () Dim Rng vahemikuna määratud Rng = Range ("A1: A6") Lõpp Alam 

Nüüd osutab muutuja “ Rng ” lahtrite vahemikule A1 kuni A6 .

Nüüd kirjutan koodi väärtuse “ Tere ” sisestamiseks .

Kood:

 Alamvalik_näide2 () Hämarda Rng vahemikuna Set Rng = Vahemik ("A1: A6") Rng.Value = "Tere" Lõpp Alam 

See sisestab lahtritesse A1 kuni A6 väärtuse “Tere”.

Pole tähtis, kust koodi käivitate, see lisab aktiivsele töölehele lahtrisse A1 kuni A6 väärtuse “Tere”.

Kujutage ette olukorda, kus peate lahtrite valimiseks sisestama sõna "Tere" vaid ühe nupuvajutusega.

Selleks ei saa me konkreetset lahtrivahemikku määrata, pigem peame määrama vahemiku valikuksValik ”.

Kood:

 Alamvaliku_näide2 () Dim Rng as Range Set Rng = Valiku lõpp alam 

Nüüd viitab muutuja “Rng” aktiivsele lahtrile või kuhu iganes me lahtrid valime. Kasutades seda omadust (valikut) Exceli VBA-s, võime sisestada väärtuse "Tere".

Kood:

 Alamvalik_näide2 () Dim Rng vahemikuna Rng = Valiku Selection.Value = "Tere" Lõpp alam 

See lisab meie valitud lahtritesse sõna „Tere”. Nüüd valin lahtrid B2-st kuni C6-ni ja käivitan koodi, see sisestab väärtuse “Tere”.

Näide # 3

Nüüd näeme, kuidas saame valitud lahtrite sisevärvi muuta. Nüüd tahan muuta valitud lahtrite sisevärvi. Selle jaoks olen deklareerinud muutuja vahemikuks ja määranud vahemikuviideks “Valik”.

Kood:

 Alamvaliku_näide3 () Dim Rng vahemikuna Set Rng = Valiku lõpp alam 

Nüüd kasutatakse atribuudi VBA Selection juurdepääsu siseruumidele .

Kood:

 Alamvalik_näide3 () Dim Rng as Range Set Rng = Valiku valik. Sisemise otsa alam 

Kui kinnisvara „Interior” on valitud, peame otsustama, mida selle kinnistuga peale hakata. Kuna peame valitud lahtri siseruumi värvi muutma, valige omadus „Värv”.

Kood:

 Alamvalik_näide3 () Dim Rng as Range Set Rng = Valiku valik. Sees. Värvi lõpp alam 

Määrake värvi atribuudiks “ vbGreen ”.

Kood:

 Alamvalik_näide3 () Hämarda Rng vahemikuna Rng = Valiku valik. Sisemine.Värv = vbGreeni lõpp Alam 

Nii muutub see valitud lahtrite sisevärviks “vbGreen”.

Niimoodi saame kodeerimisel kasutada atribuuti Excel VBA “Selection” ja teha palju rohkem asju lihtsalt.

Märkus. Atribuudi „Selection” üks suurimaid ohte on see, et me ei saa kodeerimise ajal juurdepääsu IntelliSense'i loendile. Uue õppijana on peaaegu võimatu meeles pidada kõiki atribuudi Selection omadusi ja meetodeid, seega peate atribuudi „Selection” kasutamiseks VBA-s olema täiesti professionaalne.