VBA Vrijednost - Kako se koristi Excel VBA vrijednost vrijednosti?

Sadržaj:

Anonim

VBA Vrijednost

Putovanje VBA započinje spoznajom kako se vrijednosti pohranjuju u ćelije. Stoga je poznavanje funkcije VALUE u VBA od više važnosti. Nakon što proučite svojstvo VBA VALUE, moći ćete znati kako se vrijednosti spremaju pod VBA. Ovaj članak objašnjava sve vrste VALUE funkcije u VBA, primjerice kako se vrijednost pohranjuje u ćelije, vruća za postavljanje vrijednosti, kako umetnuti vrijednost i još mnogo toga.

Kako se koristi Excel VBA vrijednost vrijednosti?

Naučit ćemo kako koristiti funkciju VBA Vrijednost s nekoliko primjera u Excelu.

Možete preuzeti ovaj VBA Value Excel predložak ovdje - VBA Value Excel predložak

Primjer br. 1 - Postavite vrijednost ćelije pomoću funkcije Range.Value

Postavljanje vrijednosti ćelije / s pomoću raspona. Vrijednost se otprilike sastoji od dva važna koraka:

  • Postavljanje raspona u koji želite pohraniti vrijednost.
  • Dodjeljivanje vrijednosti skupu raspona.

Slijedite dolje navedene korake za podešavanje vrijednosti u Excelu VBA:

Korak 1: Umetnite novi modul pod Visual Basic Editor (VBE).

Korak 2: Definirajte novi podprocedu ispod umetnutog modula tako da se u njemu može pohraniti makronaredba.

Kodirati:

 Sub VBA_Value_Ex1 () Kraj Sub

Korak 3: Definirajte novu varijablu kao raspon koji se može koristiti za definiranje raspona u koji ste željeli pohraniti vrijednost.

Kodirati:

 Sub VBA_Value_Ex1 () Dim setValue_Var Kao raspon Kraj Sub

Korak 4: Pomoću funkcije VBA RANGE dodijelite ćelije u rasponu varijabli definiranoj uz pomoć operatora dodjele.

Kodirati:

 Pod VBA_Value_Ex1 () Dim setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Raspon ("A1") Kraj Sub

Korak 5: Sada koristite svojstvo Range.Value da biste mogli dodijeliti vrijednost definiranom rasponu. Upišite naziv varijable "setValue_Var" pod kojim je definiran raspon.

 Pod VBA_Value_Ex1 () Dim setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Raspon ("A1") setValue_Var End Sub

Korak 6: Stavite točku (.) Iza varijable kako biste mogli odabrati IntelliSense popis funkcija dostupnih za ovu definiranu varijablu raspona.

Kodirati:

 Pod VBA_Value_Ex1 () Dim setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Raspon ("A1") setValue_Var. Kraj Sub

Korak 7: Povucite prema dolje kroz popis i odaberite funkciju "Vrijednost" da biste pohranili vrijednost ispod ove varijable raspona.

Kodirati:

 Pod VBA_Value_Ex1 () Dim setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Raspon ("A1") setValue_Var.Value Kraj Pot

Korak 8: Dodijelite "Dobrodošli u svijet VBA!" Kao vrijednost ovom rasponu pomoću operatora dodjele.

Kodirati:

 Pod VBA_Value_Ex1 () Dim setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Raspon ("A1") setValue_Var.Value = "Dobrodošli u svijet VBA!" Kraj Sub

Korak 9: Gotovi smo s dijelom za kodiranje. Pokrenite ovaj kôd pritiskom na F5 ili Run tipku ispod VBE i pogledajte izlaz.

Možete dodijeliti vrijednost nizu ćelija. Sve što trebate učiniti je dok postavljate raspon za izlaz koji ćete dati jednodimenzionalni niz umjesto referentne vrijednosti za jednu ćeliju.

Korak 10: U istom kôdu gore, promijenite raspon iz "A1" u "A1: A5".

Kodirati:

 Pod VBA_Value_Ex1 () Dim setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Raspon ("A1: A5") setValue_Var.Value = "Dobrodošli u svijet VBA!" Kraj Sub

11. korak: Pritisnite tipku F5 ili Run i pogledajte izlaz.

Primjer br. 2 - Postavite vrijednost ćelije upotrebom VBA svojstva ćelija

Ovo je još jedna metoda za postavljanje vrijednosti ćelije pod VBA. Za razliku od funkcije RANGE, stanice ih ni ne trebaju. Operator vrijednosti biti u mogućnosti postaviti vrijednost za određene ćelije.

Slijedite dolje navedene korake za postavljanje vrijednosti ćelije u Excelu VBA:

Korak 1: Umetnite novi modul pod VBE gdje možete početi pisati svoj novi dio koda.

Korak 2: Dodajte novi podproces ispod umetnutog modula, u koji možete pohraniti svoj makro kod.

Kodirati:

 Sub VBA_Value_Ex2 () Kraj Sub

Korak 3: Započnite tipkati ovu knjigu rada. Radite tablicu kako biste pristupili listu pod nazivom "Setting_Cell_Value_2".

Kodirati:

 Sub VBA_Value_Ex2 () ThisWorkbook.worksheets Završava Sub

Korak 4: Navedite naziv lista u zagradama u dvostrukim navodnicima.

Kodirati:

 Pod VBA_Value_Ex2 () ThisWorkbook.Worksheets ("Postavljanje_Cell_Value_2") Kraj Sub

Korak 5 : Upotrijebite svojstvo .Cells da postavite raspon ćelija iz danog excel lista.

Kodirati:

 Pod VBA_Value_Ex2 () ThisWorkbook.Worksheets ("Postavljanje_Cell_Value_2"). Ćelije (1, 1) Kraj Sub

Prvi argument svojstva Cells predstavlja retke, a drugi argument stupac. Stoga ćelije (1, 1) označavaju ćeliju povezanu s prvim redom i prvim stupcem lista "Setting_Cell_Value_2".

Korak 6: Sada, uz pomoć operatora dodjele, dodijelite vrijednost ovom skupu ćelija.

Kodirati:

 Pod VBA_Value_Ex2 () ThisWorkbook.Worksheets ("Postavljanje_Cell_Value_2"). Ćelije (1, 1) = "VBA je fleksibilan." Kraj Sub

Pogledajte kako nam ne treba. Funkcija funkcije koju trebamo koristiti tijekom postavljanja vrijednosti pomoću funkcije Range. Metoda ćelija nema takve IntelliSense mogućnosti.

Korak 7: Pritisnite tipku F5 ili Run da biste pokrenuli ovaj kod i pogledali izlaz. Vidjet ćete izlaz kao što je prikazano na slici ispod.

Primjer br. 3 - Dohvati vrijednost ćelije u VBA

Do sada smo u dva primjera vidjeli kako postaviti vrijednost za ćeliju ili raspon ćelija. Pretpostavimo da je slučaj upravo obrnut, moramo dobiti vrijednost dodijeljenu određenoj ćeliji excel lista. Kako to možemo dobiti? Krenimo kroz korak po korak vodič.

Pretpostavimo da sam dodijelio vrijednost kao što je prikazano na snimci zaslona ispod prve ćelije stupca A na listu "Getting_Cell_Value".

Slijedite dolje navedene korake da biste dobili vrijednost ćelije u Excelu VBA:

Korak 1: Umetnite novi modul pod VBE.

2. korak: Dodajte potprocedura kako bi se makronaredba mogla pohraniti kao kôd.

Kodirati:

 Sub VBA_Value_Ex3 () Kraj Sub

Korak 3: Definirajte novu varijablu pod nazivom Get_Value kao varijantu koristeći VBA dim funkciju.

Kodirati:

 Sub VBA_Value_Ex3 () Dim Get_Value kao varijanta Kraj Sub

Sada morate dodijeliti vrijednost prisutnu u ćeliji A1 gore definiranoj varijabli.

4. korak: Upišite "Get_Value = ThisWorkbook.Worksheets". To će omogućiti VBA prevoditelju da pristupi excel listu na kojem je pohranjena vaša vrijednost.

Kodirati:

 Pod VBA_Value_Ex3 () Dim Get_Value kao varijanta Get_Value = ThisWorkbook.Worksheets End Sub

Korak 5: Navedite naziv radnog lista u zagradama s navodima u koje je vrijednost spremljena.

Kodirati:

 Pod VBA_Value_Ex3 () Dim Get_Value kao varijanta Get_Value = ThisWorkbook.Worksheets ("Getting_Cell_Value") Kraj Sub

Korak 6: Sada koristite točku (.) Metoda raspona da biste odredili točnu ćeliju u kojoj je vrijednost pohranjena pod listom naziva "Getting_Cell_Value".

Kodirati:

 Pod VBA_Value_Ex3 () Dim Get_Value kao varijanta Get_Value = ThisWorkbook.Worksheets ("Getting_Cell_Value"). Raspon ("A1") Kraj Sub

Korak 7: Na kraju upotrijebite metodu vrijednosti točke (.) Kako bi prevodilac mogao pristupiti stvarnoj vrijednosti ispod ćelije A1.

Kodirati:

 Pod VBA_Value_Ex3 () Dim Get_Value kao varijanta Get_Value = ThisWorkbook.Worksheets ("Getting_Cell_Value"). Raspon ("A1"). Vrijednost Kraj Sub

Korak 8: Kao što smo razgovarali, moramo dobiti vrijednost pohranjenu u ćeliji A1. Za to koristite MsgBox da biste prikazali vrijednost varijable Get_Value (kojoj je vrijednost već pristupljena unesena u ćeliju A1).

Kodirati:

 Pod VBA_Value_Ex3 () Dim Get_Value kao varijanta Get_Value = ThisWorkbook.Worksheets ("Getting_Cell_Value"). Raspon ("A1") Vrijednost MsgBox Get_Value End Sub

9. korak: Pritisnite tipku F5 ili Run da biste pokrenuli ovaj kôd, dobit ćete vrijednost prisutnu u ćeliji A1 ispod okvira s porukom.

Vidite, ovo je bila vrijednost koju smo naveli u ćeliji A1 lista "Getting_Cell_Value". Pravo?

Primjer br. 4 - Možemo li dobiti više vrijednosti ćelija odjednom?

Pretpostavimo da imam vrijednosti pohranjene u tri različite ćelije A1, A2, A3 kao što je prikazano na slici ispod:

Samo se nemojte zbuniti ako vidite tekst koji se širi duž stupaca od A do E. to je samo vidljivi izgled (jer sam spojio ćelije), a stvarna vrijednost pohranjena je samo u ćeliji A1, A2, A3.

Slijedite dolje navedene korake za korištenje Excelove VBA vrijednosti:

Korak 1: Definirajte varijablu kao varijantu pod novim pod-postupkom u vašem VBA modulu.

 Kod: Sub VBA_Value_Ex4 () Dim Get_Value_2 Kao varijanta Kraj Sub

Korak 2: Pomoću metode Range.Value dohvatite vrijednost ćelija A1: A3 i dodijelite novu varijablu definiranu u prethodnom koraku.

Kodirati:

 Pod VBA_Value_Ex4 () Dim Get_Value_2 kao varijanta Get_Value_2 = ThisWorkbook.Worksheets ("Getting_Cell_Value_2"). Raspon ("A1: A3"). Vrijednost Kraj Sub

Korak 3: Za kraj koristite funkciju MsgBox za prikaz vrijednosti pohranjenih u ćeliji A1: A3.

Kodirati:

 Pod VBA_Value_Ex4 () Dim Get_Value_2 kao varijanta Get_Value_2 = ThisWorkbook.Worksheets ("Getting_Cell_Value_2"). Raspon ("A1: A3"). Vrijednost MsgBox Get_Value_2 Kraj Sub

Korak 4: Pritisnite F5 ili Run tipku i pogledajte izlaz za ovaj kôd.

Dobit ćete pogrešku u izvršavanju '13': Upišite neusklađenost. Razlog za dobivanje ove pogreške je da definiramo jednu varijablu i dodijelimo joj vrijednosti jednodimenzionalnog niza (s tri reda). Što logično nije moguće.

Ovo je iz ovog članka. Završimo stvari s nekim točkama kojih se treba zapamtiti.

Stvari koje treba zapamtiti

Ne možete postaviti vrijednost više ćelija tijekom upotrebe VBA CELLS metode, jer uzima retke i stupce kao argumente. Možete samo odrediti broj retka i broj stupca u njemu.

Isto tako ne možete dobiti vrijednosti pohranjene u više ćelija u jednom okviru za poruke. Ako morate dohvatiti raspon vrijednosti, morate napisati odvojene argumente za dobivanje za svaku vrijednost.

Preporučeni članci

Ovo je vodič kroz VBA vrijednost. Ovdje smo raspravljali o tome kako koristiti Excel VBA Vrijednostnu funkciju zajedno s praktičnim primjerima i besplatnim Excelovim predloškom. Možete i pregledati naše druge predložene članke -

  1. Kompletan vodič za VBA o pogrešci
  2. Kako se koristi VBA format broja?
  3. VBA VLOOKUP funkcija s primjerima
  4. Stvaranje VBA funkcije u Excelu
  5. Kako koristiti VBA val funkciju?