Gaukite ląstelių vertę naudodami „Excel VBA“
Ląstelė yra atskira ląstelė ir taip pat yra diapazono dalis, techniškai yra du būdai, kaip sąveikauti su VBA ląstele, ir tai yra diapazono metodas ir ląstelės metodas, diapazono metodas naudojamas kaip diapazonas („A2“) Vertė, kuri suteiks mums A2 langelio vertę, arba mes galime naudoti ląstelių metodą kaip langelius (2,1). Vertė, kuri taip pat suteiks mums A2 langelių vertę.
Nesvarbu, ar veikia puikiai, ar VBA, mums visiems reikia dirbti su ląstele ar ląstelėmis, nes visi duomenys bus saugomi ląstelėse, todėl viskas priklauso nuo to, kiek gerai žinome apie VBA ląsteles. Taigi, jei ląstelės yra tokia svarbi VBA dalis, svarbu jas gerai suprasti ir, jei esate pradedantysis VBA ląstelių atžvilgiu, šis straipsnis padės jums sužinoti, kaip gauti ląstelių vertes „Excel VBA“ detalė.
Pirmiausia, mes galime remtis VBA langeliais arba dirbti su jais dviem būdais, ty naudodami CELLS ypatybę ir RANGE objektą. Kodėl CELLS yra savybė ir kodėl RANGE yra objektas, yra kitokia analogija, o vėliau straipsnyje mes prieisime prie to.
Ląstelių vertės gavimo „Excel VBA“ pavyzdžiai
Žemiau pateikiami „Cell Value“ gavimo „Excel VBA“ pavyzdžiai.
1 pavyzdys - nuosavybės RANGE arba CELLS naudojimas
Pavyzdžiui, langelyje A1 turime reikšmę „Indija“.
Norėdami nurodyti šią langelį, galime naudoti CELLS ypatybę arba objektą RANGE. Pažiūrėkime abu juos išsamiai.
Range Range naudojimas
Pirmiausia pradėkite makrokomandą.
Kodas:
Sub Get_Cell_Value () Pabaiga Sub
Dabar atidarykite objektą RANGE.
Kodas:
Sub Get_Cell_Value () diapazonas (pabaigos sub
Pirmasis šio objekto argumentas yra „Cell1“, ty, į kurią langelį mes kalbame. Šiuo atveju tai yra langelis A1, todėl objekto RANGE langelio adresą turime pateikti dvigubomis kabutėmis.
Kodas:
Sub Get_Cell_Value () diapazonas ("A1") Pabaiga Sub
Kadangi tik vienas langelis nurodo kitus parametrus, nesvarbus, uždarykite skliaustą ir įdėkite tašką, kad pamatytumėte „IntelliSense“ sąrašą.
Kaip matote aukščiau, tuo metu, kai dedame tašką, galime pamatyti visą turimą „IntelliSense“ diapazono objekto savybių ir metodų sąrašą.
Kadangi mes pasirenkame langelį, turime pasirinkti „SELECT“ metodą iš „IntelliSense“ sąrašo.
Kodas:
Sub Get_Cell_Value () diapazonas ("A1"). Pasirinkite End Sub
Dabar pasirinkite langelį, išskyrus A1, ir paleiskite kodą.
Nesvarbu, kurią langelį pasirinkote, kai paleidžiate kodą. Ji pasirinko minėtą langelį, ty A1 langelį.
„Cells Property“ naudojimas
Panašiai ir dabar mes naudojame CELLS nuosavybę.
Kodas:
Sub Get_Cell_Value () diapazonas ("A1"). Pasirinkite langelius (End Sub
Tai skiriasi nuo objekto RANGE, kur mes galėtume tiesiogiai pateikti langelio adresą, tačiau naudodami šią CELLS ypatybę to padaryti negalime.
Pirmasis šios ypatybės argumentas yra „Eilučių indeksas“, ty, į kurią eilutę mes kalbame. Kadangi mes pasirenkame langelį A1, mes nurodome pirmąją eilutę, todėl paminėkite 1.
Kitas argumentas yra „Stulpelio rodyklė“, ty kuris stulpelis yra nurodytas. A1 langelio stulpelis yra pirmasis stulpelis, todėl įveskite 1.
Mūsų kodas yra CELLS (1, 1), ty pirmos eilutės pirmasis stulpelis = A1.
Dabar įdėkite tašką ir pažiūrėkite, ar pamatysite „IntelliSense“ sąrašą, ar ne.
Turėdami CELLS savybes, mes negalime pamatyti jokio „IntelliSense“ sąrašo, todėl turime būti visiškai tikri, ką rašome. Kaip metodą įveskite „Pasirinkti“.
Kodas:
Sub Get_Cell_Value () diapazonas ("A1"). Pasirinkite langelius (1, 1). Pasirinkite Pabaiga Sub
Tai taip pat pasirinks langelį A1.
2 pavyzdys - gaukite vertę iš „Excel VBA“ langelio
Pasirinkimas yra pirmas dalykas, kurio išmokome, dabar pamatysime, kaip iš ląstelių gauti vertę. Prieš pasirinkdami langelį, turime apibrėžti kintamąjį, kad išsaugotumėte langelio vertę.
Kodas:
Sub „Get_Cell_Value1“) „Dim CellValue“ kaip eilutės pabaiga Sub
Dabar paminėkite langelio adresą naudodami objektą RANGE arba ypatybę CELLS. Kadangi esate pradedantysis, naudokite objektą RANGE tik todėl, kad su objektu RANGE matome „IntelliSense“ sąrašą.
Apibrėžtam kintamajam uždėkite lygybės ženklą ir paminėkite langelio adresą.
Kodas:
Sub Get_Cell_Value1 () Dim CellValue as String CellValue = Range ("A1") End Sub
Dar kartą įdėkite tašką, kad pamatytumėte „IntelliSense“ sąrašą.
Norėdami gauti vertę iš minėto langelio, iš „VBA IntelliSense“ sąrašo pasirinkite „Vertė“.
Kodas:
Sub „Get_Cell_Value1“ () „Dim CellValue“ kaip eilutė „CellValue“ = diapazonas („A1“). Reikšmė Pabaiga Sub
Dabar kintamasis „CellValue“ turi langelio A1 vertę. Rodyti šią kintamąją vertę pranešimų laukelyje VBA.
Kodas:
Sub „Get_Cell_Value1“ () „Dim CellValue“ kaip eilutė „CellValue“ = diapazonas („A1“). Reikšmė „MsgBox CellValue“ Pabaiga Sub
Gerai, paleiskite kodą ir pamatykite rezultatą pranešimų laukelyje.
Kadangi langelyje A1 yra „INDIA“ reikšmė, tas pats dalykas atsirado ir pranešimų laukelyje. Tokiu būdu pagal ląstelės VBA vertę galime gauti ląstelės vertę.
3 pavyzdys - gaukite vertę iš vienos ląstelės į kitą langelį
Mes žinome, kaip gauti vertę iš langelio naudojant VBA. Dabar kyla klausimas, kaip įterpti reikšmę į langelį. Paimkime tik tą patį pavyzdį. Langelyje A1 turime įterpti reikšmę „INDIA“ ir tai galima padaryti iš žemiau pateikto kodo.
Kodas:
Sub Get_Cell_Value2 () diapazonas ("A1"). Reikšmė = "INDIA" Pabaiga Sub
Tai į langelį A1 įtrauks „INDIA“ vertę. Panašiai, norėdami gauti vertę iš vienos ląstelės į kitą, kodą galime parašyti taip, kaip nurodyta toliau.
Kodas:
Sub Get_Cell_Value2 () diapazonas ("A5"). Reikšmė = diapazonas ("A1"). Reikšmė Pabaiga Sub
Leisk man paaiškinti kodą.
„Langeliui A5 mums reikia vertės, kuri yra iš langelio A1 vertės“, - sako visas šis kodas. Taigi tai gaus vertę nuo langelio A1 iki A5, naudojant VBA kodą.
Ką reikia atsiminti
- Norint įterpti vertę į langelius ir gauti vertę iš langelio, reikia naudoti ypatybę VBA „VALUE“.
- Naudodamiesi ypatybe CELLS, galime pasirinkti tik vieną langelį, bet naudodami objektą RANGE. Mes galime pasirinkti kelias langelius.
