Indholdsfortegnelse
I denne artikel vil jeg vise dig, hvordan du kan indstille en variabel til en celleværdi ved hjælp af VBA i Excel. Du lærer at indstille en variabel til værdien af en enkelt celle og et område af celler.
Download arbejdsbog til øvelser
Download denne arbejdsbog til træning, så du kan øve dig, mens du læser denne artikel.
Indstil Variabel til Cell.xlsm3 hurtige eksempler på at indstille variabel til en celleværdi i Excel
Her har vi et datasæt, der indeholder navne på nogle kunder , deres kontaktnumre , og e-mail-adresser i rækkevidde B3:D13 af et regneark.
Vi søger at indstille variabler til celleværdier fra dette datasæt ved hjælp af VBA .
1. Indstil variabel til en enkelt celleværdi ved hjælp af Excel VBA
Først skal vi lære at indstille en variabel til en enkelt celleværdi ved hjælp af VBA .
Lad os f.eks. indstille værdien af celle B4 til en variabel kaldet Kunde_Navn .
Det er bedre, hvis du kender datatypen for værdien og erklærer den før. Og derefter indsætter værdien i den pågældende variabel.
For eksempel her celle B4 indeholder navnet, Boris Pasternak . Det er en string-type Derfor kan du bruge følgende 2 linjer af koder:
Dim Value As String Value = Range("B4") 
Men det er i orden, hvis du ikke er sikker på datatypen. I så fald skal du kun skrive den anden linje, og VBA vil læse værdien korrekt for dig.
Værdi = Range("B4") 
For at kontrollere, om VBA har læst værdien korrekt eller ej, skal du indtaste linjen MsgBox Værdi med et af de to sæt koder og derefter køre koden.
Der vises en meddelelsesboks, som viser værdien af celle B4 , Boris Pasternak .
2. Indstil værdierne i et tilstødende område af celler til en variabel ved hjælp af Excel VBA
Nu indsætter vi værdierne for et tilstødende område af celler i en variabel. Lad os f.eks. læse området B3:D13 i variablen Rng .
Her vil variablens datatype være en Område Du kan enten erklære det før på denne måde:
Dim Rng As Range Set Rng = Range("B3:D13") 
Eller du kan tildele værdierne direkte med den.
Set Rng = Range("B3:D13") 
For at få adgang til værdierne i Områdeobjekt skal du få adgang til dem med deres række- og kolonnenumre med en Celler objekt .
For eksempel for at få adgang til celle B4 , skal du bruge Rng.Cells(2,1) [ Celle B4 er i den 2. række og 1. kolonne i intervallet B3:D13 .]
Indtast linjen MsgBox Rng.Celler(2,1) inde i din kode og køre den. Den vil vise Boris Pasternak , værdien i celle B4 .
3. Indstil værdierne i et ikke-tilstødende område af celler til en variabel ved hjælp af Excel VBA
Endelig skal vi indsætte værdierne for et ikke-nærliggende område af celler i en variabel.
Lad os f.eks. prøve at læse området B3:B13 og D3:D13 i en variabel kaldet Rng .
Det er igen en datatype af typen Område Du kan enten anmelde det på forhånd eller ej.
Vi bruger den EU-metode på VBA til at deltage 2 eller flere ikke-tilstødende celleintervaller til et enkelt interval.
Dim Rng As Range Set Range = Union(Range("B3:B13"), Range("D3:D13"))) 
Nu til at få adgang til celle B4 , skal du igen indtaste linjen MsgBox Rng.Cells(1,1). Hvis vi så kører koden, vil den vise indholdet i cellen B4 , Boris Pasternak .
Ting at huske
Alle de ovenfor beskrevne metoder fungerer kun for det aktive regneark. Hvis du vil have adgang til et regneark, der ikke er aktivt, skal du nævne regnearkets navn før intervallet.
For eksempel for at få adgang til området B4 på Ark1 , skal du bruge:
Værdi = Worksheets("Sheet1").Range("B4") 
