VBA-værdi | Hvordan bruges Excel VBA Value Property? (Eksempler)

Excel VBA værdi egenskab

Værdi er en egenskab i VBA, som for det meste bruges med områdemetoden til at tildele en værdi til et specifikt område, det er et indbygget udtryk i VBA, for eksempel hvis vi bruger rækkevidde (“B3”). Værdi = 3 vil dette tildele celle B3 en værdi på 3, ikke nødvendigvis at værdiegenskaben kun skal bruges med områdemetoden, vi kan også bruge den med andre funktioner.

Tidligt i vores læring med VBA er vi så nysgerrige efter at lære om, hvordan data gemmes i cellerne. Hvis du er så nysgerrig, er du nødt til at forstå "værdi" ejendom. I denne artikel vil vi forklare dig om egenskaben “Værdi”, hvordan du indsætter eller indstiller værdier, hvordan du får værdi fra cellen og mange andre ting.

I en af ​​de tidligere artikler har vi diskuteret “VBA Range Cells”. Områdeobjekt kan hjælpe os med at henvise til en enkelt celle såvel som flere celler. For at bruge RANGE-objektet først skal vi beslutte, hvilken celle vi skal indsætte værdien, og hvad er den værdi, vi skal indsætte.

Hvordan bruges Value Property i VBA?

Du kan downloade denne VBA-værdifunktion Excel-skabelon her - VBA-værdifunktion Excel-skabelon

Eksempel # 1 - Områdeobjekt til tildeling af værdier til celler

  • For eksempel, hvis du vil indsætte en værdi i cellen A1, skal du henvise cellen A1 som dette interval ("A1")

Kode:

 Underværdi () Område ("A1") Afslut sub

  • Efter at have henvist cellen ved hjælp af RANGE-objekt, sæt nu en prik (.) For at se IntelliSense-listen over alle de egenskaber og metoder, der er knyttet til dette objekt.

Kode:

Underværdi () Område ("A1"). Afslut sub

  • Udform denne række muligheder, vælg ejendommen "VALUE".

Kode:

 Underværdi () Område ("A1")

  • Når egenskaben "VALUE" er valgt, skal vi indstille værdien til cellen A1 ved at sætte værdien i lige tegn.

Kode:

 Underværdi () Område ("A1") Værdi = "Velkommen til VBA" Slutunder

  • Ok, dette vil indsætte værdien "Velkommen til VBA" i cellen A1.

  • Hvis du vil indsætte den samme værdi til flere celler, skal du henvise cellerne som nedenstående kode.

Kode:

 Underværdi () Område ("A1: A5") Værdi = "Velkommen til VBA" Slutunder
  • Dette indsætter værdien fra cellen A1 til A5 .

  • Hvis du vil indsætte værdier i forskellige celler, men ikke til serier af cellen, skal vi bruge kode og celleadressen i separate argumenter som nedenfor.

Kode:

 Underværdi () Område ("A1, A5, B4, C2"). Værdi = "Velkommen til VBA" Slutunder
  • Dette vil indsætte teksten "Velkommen til VBA" til cellerne A1, A5, B4 og C2 celler.

Eksempel 2 - Indsæt værdi ved hjælp af CELLS-egenskab

Ikke gennem RANGE-objekt, men også ved hjælp af VBA CELLS-egenskab kan vi indsætte værdier. Men et af problemerne med CELLS-objektet er, at vi ikke får adgang til IntelliSense-listen, som vi fik for RANGE-objektet.

Her skal vi nævne række- og kolonnetalene, vi skal bruge, indsæt værdien. For eksempel, hvis du vil indsætte værdien i cellen A1, er koden CELLS (1,1), hvis du vil indsætte værdien i cellen B5, er koden CELLS (5,2) dvs. lig med B5 celle.

Vi kan ikke indsætte værdier i flere celler ved hjælp af CELLS egenskab, dette er i modsætning til vores RANGE-objekt.

Eksempel # 3 - Hent celleværdi

Vi har set, hvordan man indsætter værdier i cellerne, nu vil vi se, hvordan man får værdier fra celler.

Trin 1: Definer en variabel som streng.

Kode:

 Underværdi () Dim K Som streng End Sub

Trin 2: For denne variabel "k" tildeler vi værdien af ​​cellen A1. I celle A1 har jeg indtastet værdien "Velkommen til VBA".

Så koden vil være k = Range (“A1”). Værdi

Kode:

 Underværdi () Dim K som streng K = interval ("A1")

Trin 3: Vis resultatet af variablen “k” i VBA-meddelelsesfeltet.

Kode:

 Underværdi () Dim K Som streng K = Område ("A1"). Værdi MsgBox K Afslut sub

Ved at køre koden skal vi resultatet af celle A1-værdi i meddelelsesfeltet.

Vi kan også bruge RANGE-objektet til at hente dataene i cellen A1, nedenstående kode viser dig det samme.

Kode:

 Underværdi () Dim K som streng sæt CellValue = Range ("A1") MsgBox CellValue End Sub

Dette skal også få værdien af ​​cellen A1 i meddelelsesboksen.

Eksempel 4 - Fejlværdi, hvis der kræves mere end en celleværdi

For et eksempel se nedenstående kode.

Kode:

 Underværdi () Dim K som område Indstil CellValue = Range ("A1: A5") MsgBox CellValue End Sub

Hvis du kører ovenstående kode, får vi fejlen "Type Mismatch".

Årsagen til, at vi får denne fejl, fordi når objektvariablen indstillet til mere end en celle "værdi" egenskab ikke rigtig forstår, hvilken celleværdi der skal gives, så den kan få en enkelt celleværdi ad gangen.