Få cellvärde med Excel VBA
En cell är en individuell cell och är också en del av ett intervall, tekniskt finns det två metoder för att interagera med en cell i VBA och de är intervallmetoden och cellmetoden, intervallmetoden används som intervall (“A2”) .Värde som ger oss värdet för A2-cellen eller så kan vi använda cellmetoden som celler (2,1) .värde som också ger oss värdet för A2-celler.
Oavsett om det fungerar utmärkt eller VBA-arbete, vi behöver alla arbeta med celler eller celler eftersom all data kommer att lagras i celler, så det handlar allt om hur väl vi känner till celler i VBA. Så, om celler är en så viktig del av VBA, är det viktigt att förstå dem väl, och om du är en starter när det gäller VBA-celler, kommer den här artikeln att vägleda dig om hur du får cellvärden i Excel VBA i detalj.
Först och främst kan vi referera till eller arbeta med celler i VBA på två sätt, dvs genom att använda CELLS-egenskapen och RANGE-objektet. Varför CELLS är en egenskap och varför RANGE är ett objekt är en annan analogi, och senare i artikeln kommer vi till den punkten.
Exempel på att få cellvärde i Excel VBA
Nedan följer exemplen på att få Cellvärde i Excel VBA.
Exempel # 1 - Använda RANGE eller CELLS Property
I cell A1 har vi till exempel värdet "Indien".
För att referera till den här cellen kan vi använda en CELLS-egenskap eller ett RANGE-objekt. Låt oss se dem båda i detalj.
Använda Range Property
Börja först med makroförfarandet.
Koda:
Sub Get_Cell_Value () Avsluta Sub
Öppna nu RANGE-objektet.
Koda:
Sub Get_Cell_Value () Range (End Sub
Det första argumentet för detta objekt är "Cell1", dvs. vilken cell vi hänvisar till. I det här fallet är det cell A1, så vi måste ange celladressen i dubbla citat för RANGE-objektet.
Koda:
Sub Get_Cell_Value () Range ("A1") End Sub
Eftersom endast en cell hänvisar till andra parametrar är irrelevant, så stäng fästet och sätt en punkt för att se IntelliSense-listan.
Som du kan se ovan kan vi se alla tillgängliga IntelliSense-listor över egenskaper och metoder för intervallobjekt när vi sätter en punkt.
Eftersom vi väljer cellen måste vi välja "VÄLJ" -metoden från IntelliSense-listan.
Koda:
Sub Get_Cell_Value () Range ("A1") Välj End Sub
Välj nu den andra cellen än A1 och kör koden.
Det spelar ingen roll vilken cell du har valt när du kör koden. Den har valt den nämnda cellen, dvs. A1-cellen.
Använda Cells Property
På samma sätt använder vi CELLS-egendom nu.
Koda:
Sub Get_Cell_Value () Range ("A1") Välj celler (End Sub
Detta skiljer sig från RANGE-objektet där vi direkt kunde ange celladressen men med den här CELLS-egenskapen kan vi inte göra det.
Det första argumentet för den här egenskapen är "Radindex", dvs. vilken rad vi hänvisar till. Eftersom vi väljer cellen A1 hänvisar vi till den första raden, så nämn 1.
Nästa argument är "Kolumnindex", dvs. vilken kolumn vi hänvisar till. A1-cellkolumn är den första kolumnen, så ange 1.
Vår kod läser CELLS (1, 1) dvs första raden första kolumnen = A1.
Sätt nu en prick och se om du får se IntelliSense-listan eller inte.
Med CELLS-egenskaper kan vi inte se någon IntelliSense-lista, så vi måste vara helt säkra på vad vi skriver. Ange “Välj” som metod.
Koda:
Sub Get_Cell_Value () Range ("A1"). Välj celler (1, 1). Välj End Sub
Detta kommer också att välja cell A1.
Exempel # 2 - Få värde från Cell i Excel VBA
Att välja är det första vi har lärt oss, nu ser vi hur man får värde från celler. Innan vi väljer cellen måste vi definiera variabeln för att lagra värdet från cellen.
Koda:
Sub Get_Cell_Value1 () Dim CellValue som strängänd Sub
Nämn nu celladressen genom att antingen använda RANGE-objekt eller CELLS-egenskap. Eftersom du är nybörjare, använd bara RANGE-objekt eftersom vi med RANGE-objekt får se IntelliSense-listan.
För den definierade variabeln, sätt ett likhetstecken och ange celladressen.
Koda:
Sub Get_Cell_Value1 () Dim CellValue As String CellValue = Range ("A1") End Sub
Sätt igen en punkt för att se IntelliSense-listan.
Från VBA IntelliSense-listan väljer du "Värde" -egenskap för att få värdet från den nämnda cellen.
Koda:
Sub Get_Cell_Value1 () Dim CellValue As String CellValue = Range ("A1"). Värde Slut Sub
Nu innehåller variabeln "CellValue" värdet från cellen A1. Visa detta variabelvärde i meddelandefältet i VBA.
Koda:
Sub Get_Cell_Value1 () Dim CellValue As String CellValue = Range ("A1"). Värde MsgBox CellValue End Sub
Ok, kör koden och se resultatet i en meddelandefält.
Eftersom det finns ett värde av "INDIEN" i cell A1, uppträdde samma sak också i meddelandefältet. Så här, genom VBA-värdet på cellen, kan vi få värdet på cellen.
Exempel # 3 - Få värde från en cell till en annan cell
Vi vet hur man får värde från cellen med VBA. Nu är frågan hur man sätter in värde i cellen. Låt oss bara ta samma exempel. För cell A1 måste vi infoga värdet på "INDIEN", och detta kan göras från nedanstående kod.
Koda:
Sub Get_Cell_Value2 () Range ("A1") Value = "INDIA" End Sub
Detta infogar värdet "INDIA" i cell A1. På samma sätt, för att få värde från en cell till en annan, kan vi skriva koden enligt nedan.
Koda:
Sub Get_Cell_Value2 () Range ("A5"). Value = Range ("A1"). Value End Sub
Låt mig förklara koden för dig.
"För cellen A5 behöver vi värdet som kommer från cellen A1-värdet" det är allt som denna kod säger. Så detta kommer att få värdet från cell A1 till A5 med hjälp av VBA-kod.
Saker att komma ihåg
- För att infoga värde i celler och få värde från cellen krävs att egenskapen VBA "VALUE" ska användas.
- Med hjälp av egenskapen CELLS kan vi bara välja en cell men använda RANGE-objektet. Vi kan välja flera celler.
