Excel VBA vērtības īpašums
Vērtība ir rekvizīts VBA, ko galvenokārt izmanto ar diapazona metodi, lai piešķirtu vērtību konkrētam diapazonam, tā ir iebūvēta izteiksme VBA, piemēram, ja izmantojam diapazonu (“B3”). Vērtība = 3 B3 šūnas vērtība ir 3, ne vienmēr šī vērtības īpašība ir jāizmanto tikai ar diapazona metodi, un mēs to varam izmantot arī ar citām funkcijām.
Mācoties ar VBA, mēs esam tik ļoti ieinteresēti uzzināt, kā datus uzglabāt šūnās. Ja jūs esat tik ziņkārīgs, jums ir jāsaprot īpašums “Vērtība”. Šajā rakstā mēs jums paskaidrosim par rekvizītu “Vērtība”, kā ievietot vai iestatīt vērtības, kā iegūt vērtību no šūnas un daudzas citas lietas.
Vienā no iepriekšējiem rakstiem mēs esam apsprieduši “VBA diapazona šūnas”. Diapazons objekts var palīdzēt mums atsaukties gan uz vienu, gan uz vairākām šūnām. Lai vispirms izmantotu objektu RANGE, mums jāizlemj, kurai šūnai mums jāievieto vērtība un kāda ir vērtība, kuru mēs ievietosim.
Kā izmantot Value Property VBA?
1. piemērs - Objekta diapazons, lai šūnām piešķirtu vērtības
- Piemēram, ja vēlaties ievietot vērtību šūnā A1, šūna A1 jānorāda kā šis diapazons (“A1”)
Kods:
Apakšvērtība () Diapazons ("A1") Beigu apakšgrupa
- Pēc šūnas novirzīšanas, izmantojot objektu RANGE, tagad ielieciet punktu (.), Lai redzētu visu ar šo objektu saistīto īpašību un metožu sarakstu IntelliSense.
Kods:
Apakšvērtība () Diapazons ("A1"). Beigu apakšnodaļa
- Veidojiet šīs iespējas, atlasiet īpašumu “VALUE”.
Kods:
Apakšvērtība () Diapazons ("A1"). Vērtības beigu apakšgrupa
- Kad ir atlasīts rekvizīts “VALUE”, mums jāiestata vērtība šūnai A1, vērtību ievietojot vienādības zīmē.
Kods:
Apakšvērtība () Diapazons ("A1"). Vērtība = "Laipni lūdzam VBA" Beigas apakšdaļa
- Labi, šūnā A1 tiks ievietota vērtība “Welcome to VBA”.
- Ja vēlaties vienu un to pašu vērtību ievietot vairākās šūnās, norādiet šūnas, piemēram, zemāk redzamo kodu.
Kods:
Apakšvērtības () diapazons ("A1: A5"). Vērtība = "Laipni lūdzam VBA" beigu apakšgrupa
- Tas ievietos vērtību no šūnas A1 līdz A5 .
- Ja vēlaties ievietot vērtības dažādās šūnās, bet ne šūnu sērijām, mums ir jāizmanto kods un šūnas adrese atsevišķos argumentos, piemēram, zemāk.
Kods:
Apakšvērtības () diapazons ("A1, A5, B4, C2"). Vērtība = "Laipni lūdzam VBA" Beigu apakšdaļa
- Šūnās A1, A5, B4 un C2 šūnās tiks ievietots teksts “Welcome to VBA” .
2. piemērs - ievietojiet vērtību, izmantojot rekvizītu CELLS
Ne caur RANGE objektu, bet arī izmantojot VBA CELLS īpašumu, mēs varam ievietot vērtības. Bet viena no CELLS objekta problēmām ir tā, ka mēs nevaram piekļūt IntelliSense sarakstam, kā mēs saņēmām objektam RANGE.
Šeit mums jāpiemin rindu un kolonnu numuri, kuriem mums jāievieto vērtība. Piemēram, ja vēlaties ievietot vērtību šūnā A1, kods ir CELLS (1,1). Ja vēlaties ievietot vērtību šūnā B5, kods ir CELLS (5,2), ti, vienāds ar B5 šūnu.
Mēs nevaram ievietot vērtības vairākās šūnās, izmantojot rekvizītu CELLS. Tas ir atšķirībā no mūsu RANGE objekta.
3. piemērs - iegūt šūnu vērtību
Mēs esam redzējuši, kā šūnās ievietot vērtības, tagad redzēsim, kā iegūt vērtības no šūnām.
1. darbība: definējiet mainīgo kā virkni.
Kods:
Apakšvērtība () Dim K kā virknes beigu apakšgrupa
2. solis: Šim mainīgajam “k” mēs piešķirsim šūnas A1 vērtību. Šūnā A1 esmu ievadījis vērtību “Welcome to VBA”.
Tātad kods būs k = Range (“A1”). Vērtība
Kods:
Apakšvērtība () Dim K kā virkne K = diapazons ("A1"). Vērtības beigu apakšgrupa
3. darbība: parādiet mainīgā “k” rezultātu VBA ziņojumu lodziņā.
Kods:
Apakšvērtība () Dim K kā virkne K = diapazons ("A1"). Vērtība MsgBox K End Sub
Palaižot kodu, ziņojuma lodziņā mums vajadzētu būt šūnas A1 vērtībai.
Mēs varam arī izmantot objektu RANGE, lai iegūtu šūnas A1 datus. Zemāk redzamais kods jums parādīs to pašu.
Kods:
Apakšvērtība () Dim K kā virkne Iestatiet CellValue = Diapazons ("A1") MsgBox CellValue Beigas Sub
Tam arī jāiegūst šūnas A1 vērtība ziņojuma lodziņā.
4. piemērs - kļūdas vērtība, ja nepieciešama vairāk nekā viena šūnas vērtība
Piemēram, apskatiet zemāk redzamo kodu.
Kods:
Apakšvērtība () Dim K As Range Set CellValue = Range ("A1: A5") MsgBox CellValue End Sub
Ja palaidīsit iepriekš minēto kodu, tiks parādīta kļūda “Tips Mismatch”.
Iemesls, kāpēc mēs saņemam šo kļūdu, jo, ja objekta mainīgajam tiek iestatīta vairāk nekā viena šūnas “vērtība”, rekvizīts īsti nesaprot, kura šūnas vērtība ir jāpiešķir, tāpēc vienlaikus var iegūt vienas šūnas vērtību.
