VBA-verdi | Hvordan bruker jeg Excel VBA Value Property? (Eksempler)

Excel VBA Value Property

Verdi er en egenskap i VBA som for det meste brukes med områdemetoden for å tilordne en verdi til et bestemt område, det er et innebygd uttrykk i VBA, for eksempel hvis vi bruker område (“B3”). Verdi = 3 dette vil tildele celle B3 en verdi på 3, ikke nødvendigvis at verdiegenskapen skal brukes med bare områdemetoden, vi kan også bruke den med andre funksjoner.

Tidlig i vår læring med VBA er vi så nysgjerrige på å lære om hvordan du lagrer dataene i cellene. Hvis du er så nysgjerrig, må du forstå “Verdi” -egenskapen. I denne artikkelen vil vi forklare deg om “Verdi” -egenskap, hvordan du setter inn eller angir verdier, hvordan du får verdi fra cellen og mange andre ting.

I en av de tidligere artiklene har vi diskutert “VBA Range Cells”. Områdeobjekt kan hjelpe oss med å referere til en enkelt celle så vel som flere celler. For å bruke RANGE-objektet først må vi bestemme hvilken celle vi trenger for å sette inn verdien og hva er verdien vi skal sette inn.

Hvordan bruke Value Property i VBA?

Du kan laste ned denne Excel-malen for VBA-verdifunksjon her - VBA-verdifunksjon Excel-mal

Eksempel # 1 - Områdeobjekt for å tildele verdier til celler

  • Hvis du for eksempel vil sette inn en verdi i cellen A1, bør du henvise cellen A1 slik som dette området ("A1")

Kode:

 Underverdi () Område ("A1") Slutt Sub

  • Etter å ha henvist cellen ved hjelp av RANGE-objektet, sett nå en prikk (.) For å se IntelliSense-listen over alle egenskapene og metodene som er knyttet til dette objektet.

Kode:

Underverdi () Område ("A1"). Slutt Sub

  • Velg dette valget "VALUE" i dette utvalget.

Kode:

 Underverdi () Område ("A1")

  • Når “VALUE” -egenskapen er valgt, må vi sette verdien til cellen A1 ved å sette verdien i likhetstegn.

Kode:

 Underverdi () Område ("A1"). Verdi = "Velkommen til VBA" Sluttunder

  • Ok, dette vil sette inn verdien "Velkommen til VBA" i cellen A1.

  • Hvis du vil sette inn samme verdi i flere celler, kan du henvise cellene som koden nedenfor.

Kode:

 Underverdi () Område ("A1: A5"). Verdi = "Velkommen til VBA" Sluttunder
  • Dette vil sette inn verdien fra cellen A1 til A5 .

  • Hvis du vil sette inn verdier i forskjellige celler, men ikke for serier av cellen, må vi bruke kode og celleadressen i separate argumenter som nedenfor.

Kode:

 Underverdi () Område ("A1, A5, B4, C2"). Verdi = "Velkommen til VBA" Sluttunder
  • Dette vil sette inn teksten "Velkommen til VBA" til cellene A1, A5, B4 og C2- celler.

Eksempel 2 - Sett inn verdi ved hjelp av CELLS-egenskap

Ikke gjennom RANGE-objekt, men også ved bruk av VBA CELLS-egenskap kan vi sette inn verdier. Men et av problemene med CELLS-objektet er at vi ikke får tilgang til IntelliSense-listen slik vi fikk for RANGE-objektet.

Her må vi nevne rad- og kolonnetallene vi trenger for å sette inn verdien. Hvis du for eksempel vil sette inn verdien i cellen A1, er koden CELLS (1,1). Hvis du vil sette inn verdien i cellen B5, er koden CELLS (5,2), dvs. lik B5 celle.

Vi kan ikke sette inn verdier i flere celler ved å bruke CELLS-egenskap, dette er i motsetning til vårt RANGE-objekt.

Eksempel 3 - Få celleverdi

Vi har sett hvordan man setter inn verdier i cellene, nå skal vi se hvordan man får verdier fra celler.

Trinn 1: Definer en variabel som streng.

Kode:

 Underverdi () Dim K Som streng End Sub

Trinn 2: For denne variabelen “k” tildeler vi verdien av cellen A1. I celle A1 har jeg lagt inn verdien "Velkommen til VBA".

Så koden vil være k = Område (“A1”). Verdi

Kode:

 Underverdi () Dim K Som streng K = Område ("A1") Verdi Slutt sub

Trinn 3: Vis resultatet av variabelen “k” i VBA-meldingsboksen.

Kode:

 Underverdi () Dim K Som streng K = Område ("A1") Verdi MsgBox K Slutt sub

Ved å kjøre koden, bør vi resultatet av celle A1-verdien i meldingsboksen.

Vi kan også bruke RANGE-objektet for å få data fra cellen A1, under koden vil vise deg det samme.

Kode:

 Underverdi () Dim K som strengsett CellValue = Range ("A1") MsgBox CellValue End Sub

Dette skal også få verdien av cellen A1 i meldingsboksen.

Eksempel 4 - Feilverdi hvis mer enn én celleverdi krever

For et eksempel se koden nedenfor.

Kode:

 Underverdi () Dim K Som Range Set CellValue = Range ("A1: A5") MsgBox CellValue End Sub

Hvis du kjører ovennevnte kode, får vi feilmeldingen "Type Mismatch".

Årsaken til at vi får denne feilen fordi når objektvariabelen satt til mer enn en celle "verdi" -egenskap ikke egentlig forstår hvilken celleverdi som skal gis, så den kan få en enkelt celleverdi om gangen.