Når vi skriver VBA -kodingen for å redde oss fra det gjentagende arbeidet, spiller valg av data en veldig viktig rolle. Så i denne artikkelen lærer du hvordan du velger data etter rad, kolonne og hele dokumentdata gjennom VBA -koding i Microsoft Excel.
Du lærer:
- Hvordan velge hele kolonnen?
- Hvordan velge hele raden?
- Hvordan velge hele data?
Hvordan velge hele kolonnen gjennom VBA?
Vi har data i området A1: C19, der kolonne A inneholder navn, kolonne B Kjønn og kolonne C inneholder alder.
For å velge hele kolonnen A i disse dataene, følg trinnene og koden nedenfor:-
- Åpne VBA -siden, trykk på tasten Alt+F11
- Sett inn en modul
- Skriv koden nedenfor:
Underkolonner Velg () Område ("A1"). Hele kolonnen. Velg Avslutt sub
- Trykk på tasten F5 for å kjøre makroen i Excel
- Kolonne A blir valgt
Hvis du vil at data skal velges til den siste aktive cellen i kolonnen, følger du trinnene og koden nedenfor:-
- Skriv koden nedenfor:-
Underkolonnevalg () lastrow = Regneark ("Ark1"). Celler (Rader.telling, 1). Slutt (xlUp) .Rekke regneark ("Ark1"). Område ("A1: A" og siste liste) .Velg Slutt under
Kode Forklaring:- Først vil vi definere den som vil være den siste aktive cellen i data, og deretter siste rad vil vi bruke til å definere området i koding.
- Trykk på tasten F5 for å kjøre makroen i Excel
- Kolonne A1: A19 blir valgt
På denne måten ved å bruke VBA kan du velge koden for å velge kolonnen til siste aktive celle. Når vi ikke vet hva den siste aktive cellen er, kan vi bruke denne koden mens vi skriver VBA -koden for utvalget i Microsoft Excel.
Hvordan velge hele raden gjennom VBA?
Vi har data i området A1: C19, der kolonne A inneholder navn, kolonne B Kjønn og kolonne C inneholder alder.
For å velge hele raden i disse dataene, følg trinnene og koden nedenfor:-
- Åpne VBA -siden, trykk på tasten Alt+F11
- Sett inn en modul
- Skriv koden nedenfor:-
Under rader Velg () Område ("A2"). EntireRow.Select End Sub
- Trykk på tasten F5 for å kjøre makroen i Excel
- Kolonne A blir valgt
Hvis du vil at data skal velges til den siste aktive cellen i rad, følg trinnene og koden nedenfor:-
- Skriv koden nedenfor:-
Del rader Velg () Dim lastcolumn As Long lastcolumn = Regneark ("Sheet1"). Celler (1, Columns.count). End (xlToLeft) .Column Worksheets ("Sheet1"). Range ("A1", Cells (1, lastcolumn) Velg End Sub
Kode Forklaring: I denne koden hadde vi definert den siste kolonnen først, så bruker vi den til å definere området.
- Trykk på F5 for å kjøre makroen i Excel
- Første rad blir valgt til den siste aktive cellen i raden
På denne måten kan vi velge hele raden eller velge raden til den siste aktive cellen i Microsoft Excel gjennom VBA.
Hvordan velge hele data gjennom VBA?
La oss ta et eksempel og forstå:-
Vi har data i området A1: C19, der kolonne A inneholder navn, kolonne B Kjønn og kolonne C inneholder alder.
For å velge data fra første celle til siste aktive celle, følg trinnene og koden nedenfor:-
- Åpne VBA -siden, trykk på tasten Alt+F11
- Sett inn en modul
- Skriv koden nedenfor:
Subselectionoflastcell () Dim lastrow As Long, lastcolumn As Long lastrow = Worksheets ("Sheet1"). Cells (Rows.count, 1). End (xlUp) .Row lastcolumn = Worksheets ("Sheet1"). Cells (1, Columns) .count) .End (xlToLeft) .Column Worksheets ("Sheet1"). Range ("A1", Cells (lastrow, lastcolumn)). Velg End Sub
Kode Forklaring: Først har vi definert emnetavnet til kode, deretter har vi definert alle variablene. Så har vi definert hva som ville være vår siste rad og siste kolonne.
- Trykk på tasten F5 for å kjøre makroen i Excel
- I regnearket blir alle data valgt
Hvis du vil kopiere de samme dataene og lime dem inn, bruker du koden nedenfor:-
Sub Selectionoflastcell () Dim lastrow As Long, lastcolumn As Long lastrow = Worksheets ("Sheet1"). Celler (Rows.count, 1). End (xlUp) .Row lastcolumn = Worksheets ("Sheet1"). Cells (1, Columns) .count) .End (xlToLeft) .Column Worksheets ("Sheet1"). Range ("A1", Cells (lastrow, lastcolumn)). Copy Sheets ("Sheet2"). Range ("A1") End Sub
Kjør koden alle data blir kopiert og limt inn i ark2.
Dette er måten vi kan skrive makroen for å velge data fra første celle til siste aktive celle og deretter lime inn i et annet ark i Microsoft Excel.
Hvis du likte bloggene våre, del den med vennene dine på Facebook. Og du kan også følge oss på Twitter og Facebook.
Vi vil gjerne høre fra deg, gi oss beskjed om hvordan vi kan forbedre, utfylle eller innovere arbeidet vårt og gjøre det bedre for deg. Skriv oss på e -poststedet.