Získejte hodnotu buňky pomocí aplikace Excel VBA
Buňka je samostatná buňka a je také součástí rozsahu, technicky existují dvě metody interakce s buňkou ve VBA a jsou to metoda rozsahu a metoda buňky, metoda rozsahu se používá jako rozsah („A2“) Hodnota, která nám dá hodnotu buňky A2, nebo můžeme použít metodu buňky jako buňky (2,1). Hodnota, která nám také dá hodnotu buněk A2.
Ať už je to excelentní práce nebo práce s VBA, všichni potřebujeme pracovat s buňkou nebo buňkami, protože všechna data budou uložena v buňkách, takže se vše snižuje na to, jak dobře víme o buňkách ve VBA. Pokud jsou tedy buňky tak důležitou součástí VBA, je důležité jim dobře porozumět, a pokud jste začátečník, pokud jde o VBA buňky, pak vás tento článek provede, jak získat hodnoty buněk v aplikaci Excel VBA v detail.
Nejdříve musíme odkazovat nebo pracovat s buňkami ve VBA dvěma způsoby, tj. Pomocí vlastnosti CELLS a objektu RANGE. Proč CELLS je vlastnost a proč RANGE je objekt, to je jiná analogie a později v článku se k tomu dostaneme.
Příklady získání hodnoty buňky v aplikaci Excel VBA
Níže jsou uvedeny příklady získání hodnoty buňky v aplikaci Excel VBA.
Příklad č. 1 - Použití vlastnosti RANGE nebo CELLS
Například v buňce A1 máme hodnotu „Indie“.
Pro odkazování na tuto buňku můžeme použít vlastnost CELLS nebo RANGE objekt. Podívejme se na oba podrobně.
Použití vlastnosti Range
Nejprve spusťte postup makra.
Kód:
Sub Get_Cell_Value () End Sub
Nyní otevřete objekt RANGE.
Kód:
Sub Get_Cell_Value () Range (End Sub
První argument tohoto objektu je „Cell1“, tj. Na kterou buňku odkazujeme. V tomto případě se jedná o buňku A1, takže musíme zadat adresu buňky v uvozovkách pro objekt RANGE.
Kód:
Sub Get_Cell_Value () Range ("A1") End Sub
Protože pouze jedna buňka odkazuje na další parametry, je irelevantní, zavřete tedy závorku a vložte tečku, abyste viděli seznam IntelliSense.
Jak vidíte výše, v okamžiku, kdy vložíme tečku, můžeme vidět všechny dostupné seznamy IntelliSense vlastností a metod rozsahu objektu.
Protože vybíráme buňku, musíme zvolit metodu „SELECT“ ze seznamu IntelliSense.
Kód:
Sub Get_Cell_Value () Range ("A1"). Vyberte End Sub
Nyní vyberte jinou buňku než A1 a spusťte kód.
Nezáleží na tom, kterou buňku jste vybrali v okamžiku spuštění kódu. Vybrala zmíněnou buňku, tj. Buňku A1.
Použití vlastnosti buněk
Podobně nyní používáme vlastnost CELLS.
Kód:
Sub Get_Cell_Value () Range ("A1"). Vyberte buňky (End Sub
To je na rozdíl od RANGE objektu, kde bychom mohli přímo zadat adresu buňky, ale pomocí této vlastnosti CELLS to nemůžeme udělat.
Prvním argumentem této vlastnosti je „Row Index“, tj. Na který řádek odkazujeme. Jelikož vybíráme buňku A1, odkazujeme na první řádek, takže uveďte 1.
Dalším argumentem je „Index sloupců“, tj. Na který sloupec odkazujeme. Sloupec buňky A1 je první sloupec, zadejte tedy 1.
Náš kód čte CELLS (1, 1), tj. První řádek první sloupec = A1.
Teď vložte tečku a podívejte se, zda můžete zobrazit seznam IntelliSense nebo ne.
S vlastnostmi CELLS nemůžeme vidět žádný seznam IntelliSense, takže si musíme být naprosto jisti, co píšeme. Jako metodu zadejte „Vybrat“.
Kód:
Sub Get_Cell_Value () Range ("A1"). Vyberte buňky (1, 1). Vyberte End Sub
Tím se také vybere buňka A1.
Příklad č. 2 - Získejte hodnotu z buňky v aplikaci Excel VBA
Výběr je první věc, kterou jsme se naučili, nyní uvidíme, jak získat hodnotu z buněk. Než vybereme buňku, musíme definovat proměnnou pro uložení hodnoty z buňky.
Kód:
Sub Get_Cell_Value1 () Dim CellValue jako řetězec End Sub
Nyní uveďte adresu buňky pomocí objektu RANGE nebo vlastnosti CELLS. Protože jste začátečník, použijte objekt RANGE pouze proto, že s objektem RANGE se zobrazí seznam IntelliSense.
U definované proměnné vložte znaménko rovná se a uveďte adresu buňky.
Kód:
Sub Get_Cell_Value1 () Dim CellValue jako řetězec CellValue = Range ("A1") End Sub
Ještě jednou vložte tečku, abyste viděli seznam IntelliSense.
Ze seznamu IntelliSense VBA vyberte vlastnost „Hodnota“, abyste získali hodnotu ze zmíněné buňky.
Kód:
Sub Get_Cell_Value1 () Dim CellValue jako řetězec CellValue = Range ("A1"). Hodnota End Sub
Proměnná „CellValue“ nyní obsahuje hodnotu z buňky A1. Zobrazit tuto hodnotu proměnné v okně se zprávou ve VBA.
Kód:
Sub Get_Cell_Value1 () Dim CellValue jako řetězec CellValue = Range ("A1"). Hodnota MsgBox CellValue End Sub
Dobře, spusťte kód a podívejte se na výsledek v okně se zprávou.
Protože v buňce A1 je hodnota „INDIA“, totéž se objevilo také v okně se zprávou. Takto můžeme podle hodnoty VBA buňky získat hodnotu buňky.
Příklad č. 3 - Získejte hodnotu z jedné buňky do druhé buňky
Víme, jak získat hodnotu z buňky pomocí VBA. Otázkou nyní je, jak vložit hodnotu do buňky. Vezměme si stejný příklad. Pro buňku A1 musíme vložit hodnotu „INDIE“, což lze provést z níže uvedeného kódu.
Kód:
Sub Get_Cell_Value2 () Range ("A1"). Value = "INDIA" End Sub
Tím se do buňky A1 vloží hodnota „INDIE“. Podobně pro získání hodnoty z jedné buňky do druhé můžeme napsat kód níže.
Kód:
Sub Get_Cell_Value2 () Range ("A5"). Value = Range ("A1"). Value End Sub
Vysvětlím vám kód.
"Pro buňku A5 potřebujeme hodnotu, která je z hodnoty buňky A1", to je vše, co tento kód říká. Tím se získá hodnota z buňky A1 do A5 pomocí kódu VBA.
Věci k zapamatování
- Vkládání hodnoty do buněk a získávání hodnoty z buňky vyžaduje použití vlastnosti VBA „VALUE“.
- Pomocí vlastnosti CELLS můžeme vybrat pouze jednu buňku, ale pomocí objektu RANGE. Můžeme vybrat více buněk.
