VBA érték - Hogyan kell használni az Excel VBA értékfunkciót?

Tartalomjegyzék:

Anonim

VBA érték

A VBA útja azzal kezdődik, hogy megismerjük, hogyan tárolódnak az értékek a cellákban. Ezért az VALBA függvény ismerete a VBA szerint sokkal fontosabb. A VBA ÉRTÉK tulajdonságának tanulmányozása után megtudhatja, hogyan tárolódnak az értékek a VBA alatt. Ez a cikk ismerteti a VBA VALUE függvényének összes típusát, például azt, hogy az érték hogyan kerül tárolásra a cellákban, meleg az érték beállításához, hogyan kell beilleszteni az értéket és még sok más.

Hogyan kell használni az Excel VBA értékfunkciót?

Megtanuljuk, hogyan kell használni a VBA Value függvényt néhány példával az Excelben.

Itt letöltheti ezt a VBA Value Excel sablont - VBA Value Excel Template

1. példa - Állítsa be a sejtértéket a Range.Value függvény segítségével

A cellák értékének beállítása a tartomány segítségével. Az értékfüggvény nagyjából két fontos lépésből áll:

  • Annak a tartománynak a beállítása, ahol az értéket tárolni szeretné.
  • Érték hozzárendelése a beállított tartományhoz.

Az Excel VBA értékének beállításához kövesse az alábbi lépéseket:

1. lépés: Helyezzen be új modult a Visual Basic Editor (VBE) alá.

2. lépés: Adjon meg egy új alapelvet a beillesztett modul alatt, hogy egy makró tárolható legyen benne.

Kód:

 Sub VBA_Value_Ex1 () Sub 

3. lépés: Adjon meg egy új változót olyan tartományként, amely felhasználható azon tartomány meghatározására, ahol az értéket tárolni szeretné.

Kód:

 Sub VBA_Value_Ex1 () Dim setValue_Var As Range End Sub 

4. lépés: A VBA RANGE funkció segítségével rendelje hozzá a tartományban lévő cellákat a hozzárendelési operátor segítségével meghatározott változóhoz.

Kód:

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

5. lépés: Most használja a Range.Value tulajdonságot, hogy értéket rendelhessen a meghatározott tartományhoz. Írja be a „setValue_Var” változónevet, amely alatt a tartomány meghatározásra kerül.

 Sub VBA_Value_Ex1 () Halvány setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Range ("A1") setValue_Var End Sub 

6. lépés: Helyezzen egy pontot (.) A változó után, hogy kiválassza az ehhez a tartományváltozóhoz rendelkezésre álló funkciók IntelliSense listáját.

Kód:

 Sub VBA_Value_Ex1 () Dim setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Range ("A1") setValue_Var. Befejezés Sub 

7. lépés: Húzza lefelé a listát, és válassza az „Érték” funkciót az érték tárolására ezen tartománytartomány alatt.

Kód:

 Sub VBA_Value_Ex1 () Halvány setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Range ("A1") setValue_Var.Value End Sub 

8. lépés: Adja meg ennek a tartománynak az „Üdvözöljük a VBA világába!” Értékét a hozzárendelési operátor segítségével.

Kód:

 Sub VBA_Value_Ex1 () Halvány setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Range ("A1") setValue_Var.Value = "Üdvözöljük a VBA világában!" Befejezés Sub 

9. lépés: Befejeztük a kódoló részt. Futtassa ezt a kódot az F5 vagy a Futtatás gomb megnyomásával a VBE alatt, és nézze meg a kimenetet.

Az értéket hozzá is rendelheti a cellák tartományához. Csak annyit kell tennie, hogy amikor beállítja a kimeneti tartományt, akkor egydimenziós tömböt fog megadni egyetlen cellareferencia helyett.

10. lépés: A fenti kódban módosítsa a tartományt „A1” -ről „A1: A5” -re.

Kód:

 Sub VBA_Value_Ex1 () Halvány setValue_Var As Range Set setValue_Var = ThisWorkbook.Worksheets ("Setting_Cell_Value_1"). Range ("A1: A5") setValue_Var.Value = "Welcome to VBA world!" Befejezés Sub 

11. lépés: Nyomja meg az F5 vagy a Futtatás gombot, és nézze meg a kimenetet.

2. példa - A cellaérték beállítása a VBA cellatulajdonság használatával

Ez egy másik módszer a cellaérték VBA-n belüli beállítására. A RANGE funkcióval ellentétben a celláknak még nincs rá szükségük. Értékkezelő, hogy beállíthassa az értéket az adott cellához.

A cellák értékének az Excel VBA beállításához kövesse az alábbi lépéseket:

1. lépés: Helyezzen be egy új modult a VBE alá, ahol megkezdheti az új kóddarab írását.

2. lépés: Helyezzen be új alrendszert a beillesztett modul alá, ahol a makrókódot tárolhatja.

Kód:

 Sub VBA_Value_Ex2 () Sub Sub 

3. lépés: Indítsa el a thisWorkbook.Worksheet gépelését a „Setting_Cell_Value_2” nevű lap eléréséhez.

Kód:

 Sub VBA_Value_Ex2 () ThisWorkbook.worksheets End Sub 

4. lépés: Mutassa meg a lap nevét zárójelben idézőjelekben.

Kód:

 Sub VBA_Value_Ex2 () ThisWorkbook.Worksheets ("Setting_Cell_Value_2") End Sub 

5. lépés : A .Cells tulajdonsággal állítsa be a cellák tartományát az adott excel lapról.

Kód:

 Sub VBA_Value_Ex2 () ThisWorkbook.Worksheets ("Setting_Cell_Value_2"). Cella (1, 1) End Sub 

A Cella tulajdonság első argumentuma a sorokat képviseli, a második argumentum pedig az oszlopot. Ezért a (1, 1) cellák a „Setting_Cell_Value_2” lap első sorához és első oszlopához társított cellát jelentik.

6. lépés: Most, a hozzárendelési operátor segítségével rendeljen értéket ehhez a cellakészlethez.

Kód:

 Sub VBA_Value_Ex2 () ThisWorkbook.Worksheets ("Setting_Cell_Value_2"). Cells (1, 1) = "A VBA rugalmas." Befejezés Sub 

Vessen egy pillantást arra, hogy nincs szükségünk .Value függvényre, amelyet használnunk kell az érték megadásakor a Range függvény használatával. A Cells Method nem rendelkezik ilyen IntelliSense beállításokkal.

7. lépés: Nyomja meg az F5 vagy a Futtatás gombot a kód futtatásához és a kimenet megtekintéséhez. Lát egy kimenetet, amint az az alábbi képernyőképen látható.

3. példa - Sejtérték beszerzése a VBA-ban

Eddig két példában láttuk, hogyan állítsunk be értéket egy cellára vagy a cellák tartományára. Tegyük fel, hogy az eset pontosan fordított, és meg kell szerezni az Excel lap adott cellájához rendelt értéket. Hogyan szerezzük meg? Menjünk át lépésről lépésre.

Tegyük fel, hogy az alábbi képernyőképen látható értéket rendeltem hozzá az „A Getting_Cell_Value” A lap A oszlopának első cellája alatt.

A cellák értékének az Excel VBA-ban történő eléréséhez kövesse az alábbi lépéseket:

1. lépés: Helyezzen be új modult a VBE alá.

2. lépés: Adjon hozzá egy alprogramot, hogy a makró kódként tárolható legyen.

Kód:

 Sub VBA_Value_Ex3 () Sub 

3. lépés: Adjon meg egy új, Get_Value nevű változót változóként a VBA Dim függvény segítségével.

Kód:

 Sub VBA_Value_Ex3 () Dim Get_Value Variant End Sub 

Most hozzá kell rendelnie az A1 cellában lévő értéket a fent definiált változóhoz.

4. lépés: Írja be a „Get_Value = ThisWorkbook.Worksheets” parancsot. Ez lehetővé teszi a VBA-fordító számára az Excel lap elérését, ahol az érték tárolódik.

Kód:

 Sub VBA_Value_Ex3 () Dim Get_Value Variant mint Get_Value = ThisWorkbook.Worksheets End Sub 

5. lépés: Zárójelben említse meg a munkalap nevét olyan idézetekkel, amelyekben az értéket tárolja.

Kód:

 Sub VBA_Value_Ex3 () Dim Get_Value Variant mint Get_Value = ThisWorkbook.Worksheets ("Getting_Cell_Value") End Sub 

6. lépés: Most a dot (.) Range módszerrel adja meg a pontos cellát, ahol az értéket a „Getting_Cell_Value” név alatt tárolja.

Kód:

 Sub VBA_Value_Ex3 () Dim Get_Value Variant: Get_Value = ThisWorkbook.Worksheets ("Getting_Cell_Value"). Range ("A1") End Sub 

7. lépés: Végül használja a dot (.) Érték módszerét, hogy az A1 cella tényleges értéke elérhető legyen a fordító által.

Kód:

 Sub VBA_Value_Ex3 () Dim Get_Value Variant: Get_Value = ThisWorkbook.Worksheets ("Getting_Cell_Value"). Range ("A1"). Value End Sub 

8. lépés: Amint erről beszéltünk, meg kell szereznünk az A1 cellában tárolt értéket. Ehhez az MsgBox használatával jelenítse meg a Get_Value változó értékét (amelyek már elérik az A1 cellában megadott értéket).

Kód:

 Sub VBA_Value_Ex3 () Dim Get_Value As Variant Get_Value = ThisWorkbook.Worksheets ("Getting_Cell_Value"). Range ("A1"). Érték MsgBox Get_Value End Sub 

9. lépés: Nyomja meg az F5 vagy a Futtatás gombot a kód futtatásához. Az üzenet mező alatt az A1 cellában jelenik meg.

Lásd, ez az az érték, amelyet már említettünk a „Getting_Cell_Value” lap A1 cellájában. Jobb?

4. példa - Több cellás értéket kaphatunk egyszerre?

Tegyük fel, hogy az alábbi képernyőképen látható módon három különféle A1, A2, A3 cellában tároltam értékeket:

Ne zavarja meg, ha a szöveget az A-tól E.-ig oszlik el. Ez csak egy látható elrendezés (mivel összeolvadtam a cellákat), és a tényleges érték csak az A1, A2, A3 cellákban található.

Az Excel VBA Value használatához kövesse az alábbi lépéseket:

1. lépés: Adjon meg egy változót variánsként egy új al-eljárás alatt a VBA modulban.

 Kód: Sub VBA_Value_Ex4 () Dim Get_Value_2 Variant End Sub 

2. lépés: Használja a Range.Value módszert az A1: A3 cellák értékének lekéréséhez és az előző lépésben meghatározott új változóhoz rendeléséhez.

Kód:

 Sub VBA_Value_Ex4 () Dim Get_Value_2 Variant Get_Value_2 = ThisWorkbook.Worksheets ("Getting_Cell_Value_2"). Range ("A1: A3") Value End Sub 

3. lépés: Végül használja az MsgBox funkciót az A1: A3 cellában tárolt értékek megjelenítéséhez.

Kód:

 Sub VBA_Value_Ex4 () Dim Get_Value_2 Variant Get_Value_2 = ThisWorkbook.Worksheets ("Getting_Cell_Value_2"). Range ("A1: A3"). Érték MsgBox Get_Value_2 End Sub 

4. lépés: Nyomja meg az F5 vagy a Futtatás gombot, és nézze meg ennek a kódnak a kimenetet.

Kap egy Futtatási idő hibát '13 ': Írja be a Nem megfelelő pontot. Ennek a hibanek az oka az, hogy egyetlen változót definiálunk, és egydimenziós tömb értékeit (három sorral) rendeljük hozzá. Ami logikusan nem lehetséges.

Ez a cikkből származik. Tekerjük össze a dolgokat néhány emlékezetes ponttal.

Dolgok, amikre emlékezni kell

A VBA CELLS módszer használatakor nem állíthat be több cellát, mert sorokat és oszlopokat vesz fel argumentumként. Csak a sor és az oszlop számát adhatja meg.

Ezenkívül egyetlen cellában sem lehet több cellában tárolt értékeket beolvasni. Ha ki kell töltenie az értéktartományt, akkor minden értékhez külön meg kell adnia a get argumentumokat.

Ajánlott cikkek

Ez egy útmutató a VBA Value-hez. Itt megvitattuk az Excel VBA Value Function használatát, a gyakorlati példákkal és a letölthető Excel sablonnal együtt. Megnézheti más javasolt cikkeinket -

  1. Teljes útmutató a hibás VBA-hoz
  2. Hogyan kell használni a VBA számformátumot?
  3. VBA VLOOKUP függvény példákkal
  4. VBA függvény létrehozása Excelben
  5. Hogyan kell használni a VBA Val funkciót?