Innholdsfortegnelse
Vi skal vise deg 3 metoder i Excel VBA for å velge område fra aktiv celle . For å demonstrere dette har vi valgt et datasett med 3 kolonner : « Fornavn », « Etternavn » og « E-post ". Vi velger en celle og ved hjelp av Excel VBA velger vi området fra den cellen .
Last ned øvelsesarbeidsbok
Velg område fra Active Cell.xlsm
3 måter å velge område fra Active Cell ved å bruke VBA i Excel
1. Bruke VBA til å velge område fra aktiv celle til den siste ikke-blanke cellen
For den første metoden skal vi bruke egenskapen Range.End .
Her legger vi inn koden vår som en modul . For å få frem Modul -vinduet, gjør du disse-
trinnene:
- For det første fra Utvikleren fanen >>> velg Visual Basic .
Vinduet Visual Basic vises.
- Til slutt, fra Sett inn >>> velg Modul .
Dette vil få opp vinduet Modul .
1.1. Bruke End(xlUp)-egenskapen
I denne delen skal vi velge området oppover opp til den siste ikke-blanke cellen fra vår aktive celle .
Trinn:
- Få først opp vinduet Modul .
- For det andre, skriv inn følgende kode.
4719
Vi ringer vår Under Prosedyre ToUp . Deretter velger vi vårt utvalg . Den første verdien er vår aktive celle . Den siste verdien er ActiveCell.End(xlUp) . Til slutt velger vi område med Rekkevidde . Velg -metoden.
- For det tredje, Lagre det og lukk vinduet.
- Deretter velger du celle C6 . Denne cellen er vår aktive celle .
Nå skal vi få opp vinduet Makro . For å gjøre det-
- Fra Utvikler -fanen >>> velg Makroer .
Deretter vises dialogboksen Makro .
- Velg deretter « ToUp » fra « Makronavn: ».
- Til slutt klikker du på Kjør .
Vi kan se at vi har valgt celleområdet C4:C6 .
Les mer: Excel VBA: Copy Dynamic Range to Another Workbook
1.2. Inkorporering av End(xlDown)-egenskapen
I denne delen skal vi velge området nedover fra vår aktive celle .
Trinn:
- Få først opp vinduet Modul .
- For det andre, type følgende kode.
7849
Vi kaller vår Sub prosedyre ToDown . Deretter velger vi vårt utvalg . Den første verdien er vår aktive celle . Den siste verdien er ActiveCell.End(xlDown) . Endelig er vi detvelge området med området . Velg metoden.
- For det tredje, Lagre det og lukk vinduet.
- Deretter velger du celle C6 . Dette er vår aktive celle .
- Deretter får du opp Makro-dialogboksen .
- Velg « ToDown .
- Til slutt klikker du på Kjør .
Derfor har vi valgt et område fra vår aktive celle ved å bruke Excel VBA .
Les mer: Excel VBA for å gå gjennom området til tom celle (4 eksempler)
Lignende artikler
- Excel VBA: Loop Through Columns in Range (5 eksempler)
- Hvordan bruke VBA for hver rad i et område i Excel
- Excel-makro: Sorter flere kolonner med dynamisk område (4 metoder)
- VBA for å gå gjennom rader og kolonner i et område i Excel (5 eksempler)
- Hvordan konvertere område til matrise i Excel VBA (3 måter)
1.3. Bruk av End(xlToLeft)-egenskapen
I denne delen skal vi velge området til venstre av vår aktive celle .
Trinn:
- Få først opp vinduet Modul .
- Skriv deretter følgende kode.
2260
Vi kaller vår Sub prosedyre Til Venstre . Deretter velger vi vårt utvalg . Den første verdien er vår aktive celle . Den siste verdien er ActiveCell.End(xlToLeft) . Til slutt velger vi området med området . Velg metoden.
- For det tredje, Lagre det og lukk vinduet.
- Deretter velger du celle D7 . Dette er vår aktive celle .
- Deretter får du opp Makro-dialogboksen .
- Velg « ToLeft .
- Til slutt klikker du på Kjør .
Derfor har vi valgt et område fra vår aktive celle ved å bruke Excel VBA .
1.4. Implementering av End(xlToRight)-egenskapen
I denne delen skal vi velge området til høyre for vår aktive celle .
Trinn:
- Få først opp vinduet Modul .
- Skriv deretter følgende kode.
2016
Vi kaller vår Underprosedyre Til Høyre . Deretter velger vi vårt utvalg . Den første verdien er vår aktive celle . Den siste verdien er ActiveCell.End(xlToRight) . Til slutt velger vi området med området . Velg metoden.
- For det tredje, Lagre det og lukk vinduet.
- Deretter velger du celle C8 . Dette er vår aktive celle .
- Deretter får du opp Makro-dialogboksen .
- Velg « Til Høyre .
- Til slutt klikker du på Kjør .
Derfor har vi valgt et område fra vår aktive celle ved å bruke Excel VBA .
2. Bruke egenskapen VBA Range.Offset for å velge område fra Active Cell Bruke VBA i Excel
For den andre metoden skal vi bruke egenskapen VBA Range.Offset for å velge området ved å bruke vår aktive celle .
Trinn:
- Først skriv inn følgende kode i Modul -vinduet.
2016
Vi har opprettet vår Underprosedyre UsingOffset . Deretter velger vi vårt utvalg . Den første verdien er vår aktive celle . Den siste verdien er ActiveCell.Offset (1,2) . Med Offset-egenskapen flytter vi 1 rad ned og 2 kolonner til høyre . Til slutt velger vi området med området . Velg metoden.
- For det andre, Lagre det og lukk vinduet.
- Deretter velger du celle B8 . Dette er vår aktive celle .
- Deretter får du opp Makro-dialogboksen .
- Velg « UsingOffset .
- Til slutt klikker du på Kjør .
Som konklusjonen har vi valgt et område fra den aktive cellen . Dessuten er det slik det siste trinnet skal se ut.
Les mer: Excel VBA: Get Range of Cells with Values (7) Eksempler)
3. Velg område fra aktiv celle ved å bruke VBA i Excel ved å bruke CurrentRegion-egenskapen
For den siste metoden bruker vi egenskapen Range.CurrentRegion .
Trinn:
- Skriv først inn følgende kode i vinduet Modul .
9980
Vi kaller vår Sub prosedyre cRegion . Deretter velger vi vårt utvalg . Med CurrentRegion -egenskapen velger vi området opp til en tom celle . Til slutt velger vi området med området . Velg metoden.
- For det andre, Lagre det og gå tilbake til Excel -arket.
- Deretter velger du celle C10 . Dette er vår aktive celle .
- Deretter får du opp Makro-dialogboksen .
- Velg « cRegion .
- Til slutt klikker du på Kjør .
Derfor har vi valgt området opp til en tom celle .
Øvingsseksjonen
Vi har gitt praksisdatasett for hver metode i Excel -filen.
Konklusjon
Vi' har vist deg 3 metoder for Excel VBA velg område fra aktiv celle . Hvis du har problemer med å forstå trinnene, kan du gjerne kommentere nedenfor. Takk for at du leser, fortsett å utmerke deg!