VBA Aktiv celle

Aktiv celle betyder den specifikke celle, der er aktiv i det aktuelle aktive regneark. For eksempel, hvis der i ark 2 vælges celle B4, betyder den aktive celle B4 i ark 2. I VBA bruger vi en reference til aktiv celle til at ændre egenskaberne eller værdierne for den aktive celle. ELLER vi bruger denne funktion i visse situationer, når vi er nødt til at foretage nogle ændringer i den aktive celle under visse betingelser, der opfylder kravene.

Den aktive celle er en egenskab i VBA. Vi bruger det i forskellige situationer i VBA. Vi kan tildele værdier til en aktiv celle ved hjælp af VBA Active Cell-funktion eller hente adressen på den aktive celle. Hvad vendte disse funktioner tilbage? Aktiv cellefunktion returnerer rækkeviddeegenskaben for den aktive celle i det aktive regneark. Som forklaret i ovenstående udsagn i definitionen, hvis ark 2 er aktiv og celle B4 er aktiv celle, henter den aktive cellefunktion i VBA rækkeegenskaberne for cellen B4 i ark 2.

Syntaks for aktiv celle i Excel VBA

Nedenfor er syntaks for Active Cell i Excel VBA

Syntaks bruges til at tildele en bestemt værdi til den aktive celle.

 Activecell.Value = ““ 

Syntaksen vælger værdien eller egenskaben for den aktive celle i det aktive regneark.

 Application.Activecell 

Hvis vi har brug for at ændre skriften på den aktive celle, vil syntaksen være som følger

 Activecell.Font. (Den skrifttype, vi ønsker) = Sandt 

Vi kan også vise rækkerne og kolonnen i den aktive celle ved hjælp af følgende syntaks

 Application.Activecell 

Lad os bruge ovenstående syntaks forklaret i et par eksempler og lære at lege med de aktive celler.

Bemærk: For at bruge VBA skal du sørge for at have udviklerens fane aktiveret fra File Tab fra indstillingsafsnittet.

Eksempler på Excel VBA Active Cell

Nedenfor er de forskellige eksempler på VBA Active Cell i Excel:

Du kan downloade denne VBA Active Cell Excel-skabelon her - VBA Active Cell Excel-skabelon

VBA Aktiv celle - eksempel # 1

I dette eksempel ønsker vi at ændre værdien af ​​den aktuelle celle med noget celle. For eksempel i ark 1 skal du vælge celle A2 og indsætte værdi som ANAND, og vi vil ændre værdien for den aktive celle som ARAN.

Følg nedenstående trin for at bruge VBA Active Cell i Excel.

Trin 1: Gå til fanen Udvikler og klik på Visual Basic for at åbne VB Editor.

Trin 2: Klik på fanen Indsæt, og klik på moduler for at indsætte et nyt modul.

Trin 3: Erklær en underfunktion for at begynde at skrive koden.

Kode:

 Undereksempel () Slutundert 

Trin 4: Aktivér regnearket 1 ved hjælp af nedenstående funktion.

Kode:

 Undereksempel () Arbejdsark ("Ark1"). Aktivér slutund 

Trin 5: Vi kan kontrollere, at vi i celle A2 i ark 1 har værdien som ANAND, og ​​det er den aktive celle.

Trin 6: Brug nu følgende sætning til at ændre værdien af ​​den aktive celle.

Kode:

 Undereksempel () Arbejdsark ("Sheet1"). Aktivér ActiveCell.Value = "ARAN" End Sub 

Trin 7: Kør ovenstående kode fra den medfølgende køreknap eller tryk på F5.

Vi kan se, at værdien i celle A2 er ændret.

VBA Aktiv celle - eksempel # 2

Nu har vi ændret den aktive celleværdi fra ANAND til ARAN. Hvordan viser vi den aktuelle celleværdi? Dette lærer vi i dette eksempel.

Følg nedenstående trin for at bruge VBA Active Cell i Excel.

Trin 1: Gå til udviklerens fane, og klik på Visual Basic for at åbne VB Editor.

Trin 2: I det samme modul erklæres en underfunktion for at begynde at skrive koden.

Kode:

 Underprøve1 () Slutundert 

Trin 3: Aktivér regnearket 1 med følgende kode.

Kode:

 Undereksempel1 () Arbejdsark ("Ark1"). Aktivér slutund 

Trin 4: Lad os nu vælge den aktive celle ved hjælp af følgende kode.

Kode:

 Undereksempel1 () Arbejdsark ("Ark1"). Aktiver Sæt valgtCell = Application.ActiveCell End Sub 

Trin 5: Lad os nu vise værdien af ​​den valgte celle med følgende kode.

Kode:

 Underprøve1 () Arbejdsark ("Ark1"). Aktiver Sæt valgtCell = Application.ActiveCell MsgBox valgtCell.Value End Sub 

Trin 6: Kør ovennævnte kode ved at trykke på F5 eller med den medfølgende løbsknap og se følgende resultat.

Den aktive celle var A2, og den har værdien som ARAN, så den viste egenskab er ARAN.

VBA Aktiv celle - eksempel # 3

Lad os ændre skrifttypen på cellen A2, som var den valgte celle. Lad os lave skrifttypen som FETT. Oprindeligt var der ingen font valgt.

Følg nedenstående trin for at bruge VBA Active Cell i Excel.

Trin 1: Gå til fanebladet Udvikler og klik på Visual Basic for at åbne VB Editor.

Trin 2: I det samme modul erklæres en underfunktion for at begynde at skrive koden.

Kode:

 Undereksempel2 () Slutundert 

Trin 3: Lad os aktivere regnearket først for at bruge den aktive celle.

Kode:

 Undereksempel2 () Arbejdsark ("Ark1"). Aktivér slutund 

Trin 4: Lad os ændre skriften på den valgte celle med følgende kode.

Kode:

 Undereksempel2 () Arbejdsark ("Ark1"). Aktivér ActiveCell.Font.Bold = True End Sub 

Trin 5: Kør ovennævnte kode ved at trykke på F5 eller med den medfølgende løbsknap og se resultatet.

Skrifttypen på den aktive celle ændres til BOLD.

VBA Aktiv celle - eksempel # 4

Nu vil vi vide, hvilken række eller hvilken søjle den aktuelt aktive celle er i. Sådan gør du det, vi lærer i dette eksempel.

Følg nedenstående trin for at bruge VBA Active Cell i Excel.

Trin 1: Gå til fanebladet Udvikler, og klik på Visual Basic for at åbne VB Editor.

Trin 2: I det samme modul erklæres en underfunktion for at begynde at skrive koden.

Kode:

 Undereksempel3 () Slutundersøgelse 

Trin 3: Lad os aktivere regnearket først for at bruge de aktive celleegenskaber.

Kode:

 Undereksempel3 () Arbejdsark ("Ark1"). Aktivér slutund 

Trin 4: Nu vælger vi den aktive celle ved hjælp af følgende kode.

Kode:

 Undereksempel3 () Arbejdsark ("Ark1"). Aktiver Sæt valgtCell = Application.ActiveCell End Sub 

Trin 5: Nu kan vi vise den aktuelle række af den aktive celle med følgende kode.

Kode:

 Undereksempel3 () Arbejdsark ("Ark1"). Aktiver Sæt valgtCell = Application.ActiveCell MsgBox valgtCell.Row End Sub 

Trin 6: Vi kan også få den aktuelle kolonne i den aktive celle ved hjælp af følgende kode.

Kode:

 Underprøve3 () Arbejdsark ("Ark1"). Aktivér Sæt valgtCell = Anvendelse.ActiveCell MsgBox valgtCell.Row MsgBox valgtCell.Column End Sub 

Trin 7: Tryk nu på F5 eller den medfølgende køreknap for at køre ovenstående kode og se følgende resultat.

Ovenstående resultat var rækken af ​​den aktive celle. Tryk på ok for at se kolonnen for den aktive celle.

Ting at huske

Der er få ting, som vi skal huske på Aktiv celle i VBA:

  • Den aktive celle er den aktuelt aktive eller valgte celle i ethvert regneark.
  • Vi kan vise eller ændre egenskaberne for den aktive celle-adresse i VBA.
  • For at bruge egenskaberne for den aktive celle skal vi først aktivere det aktuelle regneark.

Anbefalede artikler

Dette har været en guide til Excel VBA Active Cell. Her diskuterede vi, hvordan man bruger VBA Active Cell-egenskab til at tildele værdi eller hente adressen på den aktive celle i Excel sammen med nogle praktiske eksempler og downloadbar excel-skabelon. Du kan også gennemgå vores andre foreslåede artikler -

  1. Brug af VBA IFError i Excel
  2. Sådan bruges Excel-fryseruter?
  3. Tutorials om VBA-indsæt
  4. Tilpas og brug statuslinjen i Excel

Kategori: