Iegūstiet šūnu vērtību, izmantojot Excel VBA
Šūna ir atsevišķa šūna, un tā ir arī diapazona daļa, tehniski ir divas metodes, kā mijiedarboties ar VBA šūnu, un tās ir diapazona metode un šūnu metode, diapazona metodi izmanto tāpat kā diapazonu (“A2”) Vērtība, kas mums dos A2 šūnas vērtību, vai arī mēs varam izmantot šūnu metodi kā šūnas (2,1). Vērtība, kas mums arī dos A2 šūnu vērtību.
Vai tas būtu Excel darbs, vai VBA, mums visiem ir nepieciešams darbs ar šūnu vai šūnām, jo visi dati tiks glabāti šūnās, tāpēc viss ir atkarīgs no tā, cik labi mēs zinām par VBA šūnām. Tātad, ja šūnas ir tik izšķiroša VBA sastāvdaļa, tad ir svarīgi tās labi saprast un, ja jūs esat iesācējs attiecībā uz VBA šūnām, tad šis raksts palīdzēs jums iegūt šūnu vērtības programmā Excel VBA detaļa.
Pirmkārt, mēs varam atsaukties uz VBA šūnām vai strādāt ar tām divos veidos, ti, izmantojot CELLS īpašumu un RANGE objektu. Kāpēc CELLS ir īpašums un kāpēc RANGE ir objekts, ir atšķirīga līdzība, un vēlāk rakstā mēs nonāksim pie tā.
Šūnu vērtības iegūšanas piemēri programmā Excel VBA
Tālāk ir sniegti šūnu vērtības iegūšanas piemēri programmā Excel VBA.
1. piemērs - rekvizīta RANGE vai CELLS izmantošana
Piemēram, šūnā A1 mums ir vērtība “Indija”.
Lai atsauktos uz šo šūnu, mēs varam izmantot rekvizītu CELLS vai RANGE objektu. Apskatīsim abus sīkāk.
Range Property izmantošana
Vispirms sāciet makro procedūru.
Kods:
Sub Get_Cell_Value () Beigas Sub
Tagad atveriet objektu RANGE.
Kods:
Sub Get_Cell_Value () diapazons (beigu apakš
Pirmais šī objekta arguments ir “Cell1”, ti, uz kuru šūnu mēs atsaucamies. Šajā gadījumā tā ir šūna A1, tāpēc mums ir jānorāda šūnas adrese divkāršās pēdiņās objektam RANGE.
Kods:
Sub Get_Cell_Value () diapazons ("A1") Beigas Sub
Tā kā tikai viena šūna atsaucas uz citiem parametriem, nav nozīmes, tāpēc aizveriet kronšteinu un ielieciet punktu, lai redzētu IntelliSense sarakstu.
Kā redzat iepriekš, brīdī, kad mēs ievietojam punktu, mēs varam redzēt visu pieejamo IntelliSense diapazona objekta īpašību un metožu sarakstu.
Tā kā mēs atlasām šūnu, mums IntelliSense sarakstā jāizvēlas metode “SELECT”.
Kods:
Sub Get_Cell_Value () diapazons ("A1"). Atlasiet Beigu beigas
Tagad atlasiet šūnu, kas nav A1, un palaidiet kodu.
Nav svarīgi, kuru šūnu esat atlasījis, kad palaižat kodu. Tā ir izvēlējusies minēto šūnu, ti, A1 šūnu.
Šūnu rekvizītu izmantošana
Līdzīgi mēs tagad izmantojam CELLS īpašumu.
Kods:
Sub Get_Cell_Value () diapazons ("A1"). Atlasiet Cells (End Sub
Tas atšķirībā no objekta RANGE, kur mēs varētu tieši piegādāt šūnas adresi, bet, izmantojot šo CELLS rekvizītu, mēs to nevaram izdarīt.
Pirmais šī rekvizīta arguments ir “Rindas indekss”, ti, uz kuru rindu mēs atsaucamies. Tā kā mēs atlasām šūnu A1, mēs atsaucamies uz pirmo rindu, tāpēc pieminiet 1.
Nākamais arguments ir “Kolonnu indekss”, ti, uz kuru kolonnu mēs atsaucamies. A1 šūnu kolonna ir pirmā kolonna, tāpēc ievadiet 1.
Mūsu kods skan CELLS (1, 1), ti, pirmās rindas pirmā kolonna = A1.
Tagad ielieciet punktu un pārbaudiet, vai jūs redzat IntelliSense sarakstu vai nē.
Izmantojot CELLS īpašības, mēs nevaram redzēt nevienu IntelliSense sarakstu, tāpēc mums ir jābūt pilnīgi pārliecinātiem par to, ko mēs rakstām. Kā metodi ievadiet “Atlasīt”.
Kods:
Sub Get_Cell_Value () diapazons ("A1"). Atlasiet šūnas (1, 1). Atlasiet Beigu apakšdaļa
Tādējādi tiks atlasīta arī šūna A1.
2. piemērs - iegūstiet vērtību no Excel VBA šūnas
Atlasīšana ir pirmā lieta, ko esam iemācījušies, tagad mēs redzēsim, kā iegūt vērtību no šūnām. Pirms mēs izvēlamies šūnu, mums ir jādefinē mainīgais lieluma glabāšanai no šūnas.
Kods:
Sub Get_Cell_Value1 () Dim CellValue kā virknes beigu apakšsadaļa
Tagad pieminiet šūnas adresi, izmantojot objektu RANGE vai rekvizītu CELLS. Tā kā esat iesācējs, izmantojiet objektu RANGE tikai tāpēc, ka ar objektu RANGE mēs redzam IntelliSense sarakstu.
Definētajam mainīgajam uzlieciet vienādības zīmi un miniet šūnas adresi.
Kods:
Sub Get_Cell_Value1 () Dim CellValue kā virkne CellValue = Diapazons ("A1") Beigas Sub
Vēlreiz ielieciet punktu, lai redzētu IntelliSense sarakstu.
No VBA IntelliSense saraksta izvēlieties rekvizītu “Vērtība”, lai iegūtu vērtību no minētās šūnas.
Kods:
Sub Get_Cell_Value1 () Dim CellValue kā virkne CellValue = Diapazons ("A1"). Vērtība Beigas Sub
Tagad mainīgais “CellValue” saglabā vērtību no šūnas A1. Parādiet šo mainīgo vērtību ziņojuma lodziņā VBA.
Kods:
Sub Get_Cell_Value1 () Dim CellValue kā virkne CellValue = Diapazons ("A1"). Vērtība MsgBox CellValue End Sub
Labi, palaidiet kodu un redziet rezultātu ziņojumu lodziņā.
Tā kā šūnā A1 ir vērtība “INDIA”, tas pats parādījās arī ziņojumu lodziņā. Šādi pēc šūnas VBA vērtības mēs varam iegūt šūnas vērtību.
3. piemērs - iegūstiet vērtību no vienas šūnas uz citu šūnu
Mēs zinām, kā iegūt vērtību no šūnas, izmantojot VBA. Tagad jautājums ir par to, kā šūnā ievietot vērtību. Ņemsim tikai to pašu piemēru. Šūnā A1 mums jāievieto vērtība “INDIA”, un to var izdarīt, izmantojot zemāk redzamo kodu.
Kods:
Sub Get_Cell_Value2 () diapazons ("A1"). Vērtība = "INDIA" Beigas Sub
Tas šūnā A1 ievietos “INDIA” vērtību. Līdzīgi, lai iegūtu vērtību no vienas šūnas uz otru, mēs varam uzrakstīt kodu, kā norādīts zemāk.
Kods:
Sub Get_Cell_Value2 () diapazons ("A5"). Vērtība = diapazons ("A1"). Vērtība Beigas Sub
Ļaujiet man jums izskaidrot kodu.
"Šūnai A5 mums ir nepieciešama vērtība, kas ir no šūnas A1 vērtības", tas ir viss, ko saka šis kods. Tātad tas iegūs vērtību no šūnas A1 līdz A5, izmantojot VBA kodu.
Atceramās lietas
- Lai ievietotu vērtību šūnās un iegūtu vērtību no šūnas, jāizmanto rekvizīts VBA “VALUE”.
- Izmantojot rekvizītu CELLS, mēs varam atlasīt tikai vienu šūnu, bet izmantojot objektu RANGE. Mēs varam atlasīt vairākas šūnas.
