VBA Active Cell

Aktiv cell betyder den specifika cellen som är aktiv i det aktuella aktiva kalkylbladet. Om till exempel cell 2 B4 väljs betyder den aktiva cellen B4 i ark 2. I VBA använder vi en referens till aktiv cell för att ändra egenskaperna eller värdena för den aktiva cellen. ELLER vi använder denna funktion i vissa situationer när vi behöver göra några förändringar i den aktiva cellen under vissa villkor som uppfyller kraven.

Den aktiva cellen är en egenskap i VBA. Vi använder det i olika situationer i VBA. Vi kan tilldela värden till en aktiv cell med VBA Active Cell-funktion eller hämta adressen till den aktiva cellen. Vad gav dessa funktioner tillbaka? Aktiv cellfunktion returnerar områdesegenskapen för den aktiva cellen i det aktiva kalkylbladet. Som förklarats i ovanstående påstående i definitionen om ark 2 är aktivt och cell B4 är aktiv cell kommer den aktiva cellfunktionen i VBA att hämta områdesegenskaperna för cellen B4 i ark 2.

Syntax av Active Cell i Excel VBA

Nedan är syntaxen för Active Cell i Excel VBA

Syntaxen används för att tilldela ett visst värde till den aktiva cellen.

 Activecell.Value = ““

Syntaxen väljer värdet eller egenskapen för den aktiva cellen i det aktiva kalkylbladet.

 Application.Activecell

Om vi ​​behöver ändra teckensnittet för den aktiva cellen kommer syntaxen att vara följande

 Activecell.Font. (Det teckensnitt vi vill ha) = Sant

Vi kan också visa raderna och kolumnen i den aktiva cellen med följande syntax

 Application.Activecell

Låt oss använda ovanstående syntax som förklaras i några exempel och lära oss att spela med de aktiva cellerna.

Obs: För att använda VBA måste du se till att utvecklarens flik är aktiverad från File Tab från alternativavsnittet.

Exempel på Excel VBA Active Cell

Nedan är de olika exemplen på VBA Active Cell i Excel:

Du kan ladda ner denna VBA Active Cell Excel-mall här - VBA Active Cell Excel-mall

VBA Active Cell - Exempel 1

I det här exemplet vill vi ändra värdet på den aktuella cellen med något cell. Till exempel i ark 1, välj cell A2 och infoga värde som ANAND och vi vill ändra värdet för den aktiva cellen som ARAN.

Följ stegen nedan för att använda VBA Active Cell i Excel.

Steg 1: Gå till fliken Developer och klicka på Visual Basic för att öppna VB Editor.

Steg 2: Klicka på Infoga-fliken och klicka på moduler för att infoga en ny modul.

Steg 3: Förklara en underfunktion för att börja skriva koden.

Koda:

 Sub Sample () Slut Sub

Steg 4: Aktivera kalkylbladet 1 med hjälp av funktionen nedan.

Koda:

 Underprov () Arbetsblad ("Sheet1"). Aktivera End Sub

Steg 5: Vi kan kontrollera att i cell A2 i ark 1 har vi värdet ANAND och det är den aktiva cellen.

Steg 6: Använd nu följande påstående för att ändra värdet på den aktiva cellen.

Koda:

 Underprov () Arbetsblad ("Sheet1"). Aktivera ActiveCell.Value = "ARAN" Slut sub

Steg 7: Kör ovanstående kod från den medföljande körknappen eller tryck på F5.

Vi kan se att värdet i cell A2 har ändrats.

VBA Active Cell - Exempel # 2

Nu har vi ändrat det aktiva cellvärdet från ANAND till ARAN. Hur visar vi det aktuella värdet på den aktiva cellen? Detta kommer vi att lära oss i detta exempel.

Följ stegen nedan för att använda VBA Active Cell i Excel.

Steg 1: Gå till utvecklarens flik och klicka på Visual Basic för att öppna VB Editor.

Steg 2: I samma modul förklara en underfunktion för att börja skriva koden.

Koda:

 Sub Sample1 () Slut Sub

Steg 3: Aktivera kalkylbladet 1 med följande kod.

Koda:

 Underprov1 () Arbetsblad ("Blad1"). Aktivera slutund

Steg 4: Låt oss nu välja den aktiva cellen med följande kod.

Koda:

 Underprov1 () Arbetsblad ("Sheet1"). Aktivera Set valdCell = Application.ActiveCell End Sub

Steg 5: Låt oss nu visa värdet på den valda cellen med följande kod.

Koda:

 Underprov1 () Arbetsblad ("Blad1"). Aktivera Set valdCell = Application.ActiveCell MsgBox valdCell.Value End Sub

Steg 6: Kör ovanstående kod genom att trycka på F5 eller med den medföljande körknappen och se följande resultat.

Den aktiva cellen var A2 och den har värdet som ARAN så den visade egenskapen är ARAN.

VBA Active Cell - Exempel # 3

Låt oss ändra teckensnittet för cellen A2 som var den valda cellen. Låt oss göra teckensnittet som FETT. Ursprungligen valts inget teckensnitt.

För detta följer du stegen nedan för att använda VBA Active Cell i Excel.

Steg 1: Gå till utvecklarens flik och klicka på Visual Basic för att öppna VB Editor.

Steg 2: I samma modul förklara en underfunktion för att börja skriva koden.

Koda:

 Sub Sample2 () Slut Sub

Steg 3: Låt oss aktivera kalkylbladet först för att använda den aktiva cellen.

Koda:

 Underprov2 () Arbetsblad ("Blad1"). Aktivera slutunder

Steg 4: Låt oss ändra teckensnittet för den valda cellen med följande kod.

Koda:

 Underprov2 () Arbetsblad ("Sheet1"). Aktivera ActiveCell.Font.Bold = True End Sub

Steg 5: Kör ovanstående kod genom att trycka på F5 eller med den medföljande körknappen och se resultatet.

Teckensnittet för den aktiva cellen ändras till FETT.

VBA Active Cell - Exempel # 4

Nu vill vi veta vilken rad eller vilken kolumn den aktuella aktiva cellen är i. Hur vi gör detta är vad vi kommer att lära oss i det här exemplet.

För detta följer du stegen nedan för att använda VBA Active Cell i Excel.

Steg 1: Gå till utvecklarens flik och klicka på Visual Basic för att öppna VB-redigeraren.

Steg 2: I samma modul förklara en underfunktion för att börja skriva koden.

Koda:

 Sub Sample3 () Slut Sub

Steg 3: Låt oss aktivera kalkylbladet först för att använda de aktiva cellegenskaperna.

Koda:

 Underprov3 () Arbetsblad ("Blad1"). Aktivera slutunder

Steg 4: Nu väljer vi den aktiva cellen med följande kod.

Koda:

 Sub Sample3 () Arbetsblad ("Sheet1"). Aktivera Set valdCell = Application.ActiveCell End Sub

Steg 5: Nu kan vi visa den aktuella raden för den aktiva cellen med följande kod.

Koda:

 Underprov3 () Arbetsblad ("Blad1"). Aktivera Set valdCell = Application.ActiveCell MsgBox valdCell.Row End Sub

Steg 6: Vi kan också få den aktuella cellens kolumn med följande kod.

Koda:

 Underprov3 () Arbetsblad ("Blad1"). Aktivera Set valdCell = Application.ActiveCell MsgBox valdCell.Row MsgBox valdCell.Column End Sub

Steg 7: Tryck nu på F5 eller körknappen för att köra ovanstående kod och se följande resultat.

Ovanstående resultat var raden med den aktiva cellen. Tryck på ok för att se kolumnen i den aktiva cellen.

Saker att komma ihåg

Det finns få saker som vi behöver komma ihåg om Aktiv cell i VBA:

  • Den aktiva cellen är den aktuella aktiva eller valda cellen i vilket kalkylblad som helst.
  • Vi kan visa eller ändra egenskaperna för den aktiva celladressen i VBA.
  • För att kunna använda den aktiva cellens egenskaper måste vi aktivera det aktuella kalkylbladet först.

Rekommenderade artiklar

Detta har varit en guide till Excel VBA Active Cell. Här diskuterade vi hur man använder egenskapen VBA Active Cell för att tilldela värde eller hämta adressen till den aktiva cellen i Excel tillsammans med några praktiska exempel och nedladdningsbar Excel-mall. Du kan också gå igenom våra andra föreslagna artiklar -

  1. Använda VBA IFError i Excel
  2. Hur använder jag frysrutor i Excel?
  3. Handledning om VBA-klistra
  4. Anpassa och använd statusfältet i Excel

Kategori:

VBA