Nabavite vrijednost ćelije pomoću programa Excel VBA
Stanica je pojedinačna stanica i također je dio raspona, tehnički postoje dvije metode za interakciju sa ćelijom u VBA i to su metoda opsega i metoda stanica, metoda opsega koristi se poput raspona ("A2") .Vrijednost koja će nam dati vrijednost A2 ćelije ili metodu ćelija možemo koristiti kao ćelije (2,1) .vrijednost koja će nam dati i vrijednost A2 ćelija.
Bio to izvanredan rad ili VBA koji radi, svi trebamo rad sa stanicom ili stanicama, jer će se svi podaci pohraniti u stanice, pa se sve svodi na to koliko dobro znamo o stanicama u VBA. Dakle, ako su stanice tako presudan dio VBA, onda ih je važno dobro razumjeti, a ako ste početnik u pogledu VBA stanica, ovaj će vas članak uputiti kako doći do vrijednosti stanica u Excelu VBA u detalj.
Prvo, na dva načina možemo referencirati ili raditi sa stanicama u VBA, tj. Pomoću svojstva CELLS i RANGE objekta. Zašto su STANICE svojstvo i zašto RANGE objekt je druga analogija, a kasnije u članku doći ćemo do te točke.
Primjeri dobivanja vrijednosti ćelije u programu Excel VBA
Ispod su primjeri dobivanja vrijednosti ćelije u programu Excel VBA.
Primjer # 1 - Korištenje svojstva RANGE ili CELLS
Na primjer, u ćeliji A1 imamo vrijednost "Indija".
Da bismo uputili ovu ćeliju, možemo koristiti svojstvo CELLS ili RANGE objekt. Pogledajmo obojicu u detalje.
Korištenje svojstva raspona
Prvo pokrenite makro postupak.
Kodirati:
Sub Get_Cell_Value () Kraj Sub
Sada otvorite objekt RANGE.
Kodirati:
Sub Get_Cell_Value () Raspon (Kraj Sub
Prvi argument ovog objekta je "Cell1", tj. Na koju ćeliju mislimo. U ovom je slučaju riječ o ćeliji A1, tako da za objekt RANGE moramo navesti adresu ćelije u dvostrukim navodnicima.
Kodirati:
Sub Get_Cell_Value () Raspon ("A1") Kraj Sub
Budući da se samo jedna ćelija odnosi na druge parametre, irelevantno je, zato zatvorite zagradu i stavite točku da biste vidjeli popis IntelliSense.
Kao što vidite gore, u trenutku kada stavimo točku, možemo vidjeti sav dostupni IntelliSense popis svojstava i metoda objekta raspona.
Budući da odabiremo ćeliju, moramo odabrati metodu „SELECT” s popisa IntelliSense.
Kodirati:
Sub Get_Cell_Value () Raspon ("A1"). Odaberite End Sub
Sada odaberite ćeliju koja nije A1 i pokrenite kôd.
Nije važno koju ste ćeliju odabrali u trenutku kada pokrenete kod. Odabrao je spomenutu ćeliju, tj. A1 ćeliju.
Korištenje svojstva stanica
Slično tome, sada koristimo svojstvo CELLS.
Kodirati:
Sub Get_Cell_Value () Raspon ("A1"). Odaberite ćelije (Kraj Sub
To je za razliku od objekta RANGE gdje bismo mogli izravno dostaviti adresu ćelije, ali pomoću ovog svojstva CELLS to ne možemo učiniti.
Prvi argument ovog svojstva je "Indeks reda", tj. Na koji red se pozivamo. Budući da odabiremo ćeliju A1, mislimo na prvi redak, zato spomenite 1.
Sljedeći je argument "Indeks stupaca", tj. Na koji stupac se pozivamo. Stupac A1 ćelije je prvi stupac, pa unesite 1.
Naš kôd glasi CELLS (1, 1), tj. Prvi redak prvi stupac = A1.
Sada stavite točku i pogledajte hoćete li vidjeti popis IntelliSense ili ne.
Sa svojstvima CELLS ne možemo vidjeti nijedan popis IntelliSense, pa moramo biti apsolutno sigurni u ono što pišemo. Unesite "Select" kao metodu.
Kodirati:
Sub Get_Cell_Value () Raspon ("A1"). Odaberite ćelije (1, 1). Odaberite End Sub
Ovo će također odabrati ćeliju A1.
Primjer # 2 - Dohvatite vrijednost iz ćelije u programu Excel VBA
Odabir je prva stvar koju smo naučili, sada ćemo vidjeti kako dobiti vrijednost iz stanica. Prije nego što odaberemo ćeliju, moramo definirati varijablu za pohranu vrijednosti iz ćelije.
Kodirati:
Sub Get_Cell_Value1 () Dim CellValue kao niz na kraju Sub
Sada spomenite adresu ćelije pomoću objekta RANGE ili svojstva CELLS. Budući da ste početnik, koristite objekt RANGE samo zato što s objektom RANGE vidimo popis IntelliSense.
Za definiranu varijablu stavite znak jednakosti i spomenite adresu ćelije.
Kodirati:
Sub Get_Cell_Value1 () Zatamni CellValue kao niz CellValue = Raspon ("A1") Kraj Sub
Još jednom stavite točku da biste vidjeli popis IntelliSense.
Na popisu VBA IntelliSense odaberite svojstvo "Vrijednost" da biste dobili vrijednost iz spomenute ćelije.
Kodirati:
Sub Get_Cell_Value1 () Priguši vrijednost ćelije kao niz CellValue = Raspon ("A1"). Vrijednost Kraj Sub
Sada varijabla "CellValue" sadrži vrijednost iz ćelije A1. Prikažite ovu vrijednost varijable u okviru za poruke u VBA.
Kodirati:
Sub Get_Cell_Value1 () Zatamni CellValue kao niz CellValue = Raspon ("A1"). Vrijednost MsgBox CellValue End Sub
Ok, pokrenite kod i pogledajte rezultat u okviru za poruku.
Budući da u ćeliji A1 postoji vrijednost "INDIA", ista se stvar pojavila i u okviru za poruke. Ovako, prema VBA vrijednosti stanice možemo dobiti vrijednost stanice.
Primjer # 3 - Dobijte vrijednost od jedne ćelije do druge ćelije
Znamo kako dobiti vrijednost iz ćelije pomoću VBA. Sad je pitanje kako umetnuti vrijednost u ćeliju. Uzmimo samo isti primjer. Za ćeliju A1 moramo umetnuti vrijednost "INDIA", a to se može učiniti iz donjeg koda.
Kodirati:
Sub Get_Cell_Value2 () Raspon ("A1"). Vrijednost = "INDIA" Kraj Sub
Ovo će umetnuti vrijednost "INDIA" u ćeliju A1. Slično tome, da bismo dobili vrijednost iz jedne ćelije u drugu, možemo napisati kod kao dolje.
Kodirati:
Sub Get_Cell_Value2 () Raspon ("A5"). Vrijednost = Raspon ("A1"). Vrijednost Kraj Sub
Dopustite mi da vam objasnim kod.
"Za ćeliju A5 trebamo vrijednost koja je iz vrijednosti ćelije A1", to je sve što ovaj kôd kaže. Dakle, ovo će dobiti vrijednost od ćelije A1 do A5 pomoću VBA koda.
Stvari koje treba zapamtiti
- Umetanje vrijednosti u ćelije i dobivanje vrijednosti iz ćelije zahtijeva upotrebu svojstva VBA "VALUE".
- Pomoću svojstva CELLS možemo odabrati samo jednu ćeliju, ali pomoću objekta RANGE. Možemo odabrati više stanica.
