U VBA možemo odabrati bilo koji raspon stanica ili skupinu stanica i na njima izvoditi različit skup operacija, odabir je objekt raspona pa koristimo metodu raspona za odabir stanica jer identificira stanice, a kod za odabir stanica je Naredba "Select", sintaksa koja se koristi za odabir je raspon (A1: B2) .select.
Što je svojstvo za odabir programa Excel VBA?
Odabir je svojstvo dostupno uz VBA. Nakon što odaberemo raspon stanica, moramo odlučiti što trebamo učiniti. Dakle, pomoću ovog svojstva VBA "Selection" možemo učiniti sve što možemo s odabranim stanicama. Jedan od problema sa svojstvom Selection je što ne možemo vidjeti popis IntelliSense. Dakle, kada pišemo kod, moramo biti potpuno sigurni u ono što radimo bez popisa IntelliSense.
Primjeri odabira svojstva u VBA
Ovdje ćemo pogledati primjere odabira u programu Excel VBA.
Ovdje možete preuzeti ovaj VBA Selection Excel predložak - VBA Selection Excel Predložak
Primjer # 1
Dopustite mi da vam pokažem jednostavan primjer svojstva "odabira" s VBA-om. Sada želim prvo odabrati ćelije od A1 do B5, za to možemo ovako napisati VBA kod.
Raspon ( "A1: B5" ). Odaberite
Kodirati:
Sub Selection_Example1 () Raspon ("A1: B5"). Odaberite End Sub Ovaj će kôd odabrati raspon VBA ćelija od A1 do B5.
Ako želim umetnuti vrijednost "zdravo" u ove stanice, mogu napisati ovakav kod.
Kodirati:
Sub Selection_Example1 () Raspon ("A1: B5"). Value = "hello" End Sub 
Slično tome, nakon što se odaberu stanice, postaje "Odabir".
Kodirati:
Sub Selection_Example1 () Raspon ("A1: B5"). Odaberite Selection.Value = "Hello" End Sub U prvom gore navedenom odabrao sam raspon stanica od A1 do B5. Dakle, ovaj će redak odabrati stanice.
Nakon što se odaberu ove stanice, na njih se možemo pozivati pomoću svojstva "Odabir" u excelu VBA. Dakle, pomoću svojstva Selection u ove ćelije možemo umetnuti vrijednost "Hello".
Ovo je opći pregled svojstva "Selection" u VBA.
Primjer # 2
Sada ćemo vidjeti svojstvo VBA "Odabir" s varijablama. Definirajte VBA varijablu kao Raspon.
Kodirati:
Sub Selection_Example2 () Dim Rng As Range End Sub
Raspon je objektna varijabla, jer je objektna varijabla, moramo postaviti raspon ćelija pomoću ključne riječi "Set".
Podesit ću raspon kao "Raspon (" A1: A6 ").
Kodirati:
Sub Selection_Example2 () Dim Rng As Range Set Rng = Range ("A1: A6") End Sub 
Sada se varijabla " Rng " odnosi na raspon ćelija od A1 do A6 .
Sada ću napisati kod da ubacim vrijednost " Hello ".
Kodirati:
Sub Selection_Example2 () Dim Rng As Range Set Rng = Range (Range ("A1: A6") Rng.Value = "Hello" End Sub 
Ovo će umetnuti vrijednost "Pozdrav" u ćelije od A1 do A6.
Nije važno odakle pokrećete kôd, u aktivni radni list umetnut će vrijednost "Pozdrav" u ćeliju A1 do A6.
Ali zamislite situaciju u kojoj morate umetnuti riječ "Zdravo" gdje god odaberete ćelije jednim klikom na gumb.
Zbog toga ne možemo postaviti određeni raspon ćelija, već moramo postaviti raspon kao " Odabir ".
Kodirati:
Sub Selection_Example2 () Dim Rng As Range Set Rng = Selection End Sub
Sada se varijabla "Rng" odnosi na aktivnu ćeliju ili gdje god odaberemo stanice. Sada koristeći ovo svojstvo (Odabir) u excelu VBA možemo umetnuti vrijednost "Hello".
Kodirati:
Sub Selection_Example2 () Dim Rng As Range Set Rng = Selection Selection.Value = "Hello" End Sub
Ovo će umetnuti riječ "Zdravo" u ćelije našeg odabira. Sada ću odabrati ćelije od B2 do C6 i pokrenuti kôd, on će umetnuti vrijednost "Hello".
Primjer # 3
Sad ćemo vidjeti kako možemo promijeniti unutarnju boju odabranih stanica. Sada želim promijeniti unutarnju boju ćelija koje ću odabrati. Za ovo prvo, proglasio sam varijablu kao Raspon i postavio referencu za opseg kao "Odabir".
Kodirati:
Sub Selection_Example3 () Dim Rng As Range Set Rng = Selection End Sub
Sada se pomoću svojstva VBA Selection pristupa svojstvu "Interior" .
Kodirati:
Sub Selection_Example3 () Dim Rng As Range Set Rng = Selection Selection.Interior End Sub
Nakon odabira nekretnine "Interijer" moramo odlučiti što trebamo učiniti s ovom nekretninom. Budući da moramo promijeniti boju unutrašnjosti odabrane ćelije, odaberite svojstvo "Boja".
Kodirati:
Sub Selection_Example3 () Dim Rng As Range Set Rng = Selection Selection.Interior.Color End Sub
Postavite svojstvo boje kao " vbGreen ".
Kodirati:
Sub Selection_Example3 () Dim Rng As Range Set Rng = Selection Selection.Interior.Color = vbGreen End Sub
Dakle, ovo će promijeniti unutarnju boju odabranih ćelija u "vbGreen".
Kao što je ovo, u kodiranju možemo koristiti svojstvo Excel "VBA" Odabir "i učiniti puno više stvari lako.
Napomena: Jedna od najvećih prijetnji sa svojstvom “Selection” jest da ne dobivamo pristup popisu IntelliSense tijekom kodiranja. Kao novi učenik gotovo je nemoguće zapamtiti sva svojstva i metode svojstva Selection, tako da morate biti apsolutno profesionalni u VBA da biste počeli koristiti svojstvo "Selection".