Ko pišemo kodiranje VBA, da se rešimo ponavljajočega se dela, ima izbor podatkov zelo pomembno vlogo. Tako se boste v tem članku naučili, kako izbrati podatke po podatkih vrstic, stolpcev in celotnih dokumentov s kodiranjem VBA v programu Microsoft Excel.
Naučili se boste:
- Kako izbrati celoten stolpec?
- Kako izbrati celotno vrstico?
- Kako izbrati celotne podatke?
Kako izbrati celoten stolpec prek VBA?
Imamo podatke v razponu A1: C19, v katerem stolpec A vsebuje ime, stolpec B Spol in stolpec C starost.
Če želite v teh podatkih izbrati celoten stolpec A, sledite spodnjim korakom in kodi:-
- Odprite stran VBA pritisnite tipko Alt+F11
- Vstavite modul
- Napišite spodnjo kodo:
Pod stolpec Izberite obseg () ("A1"). Celoten stolpec. Izberite Končaj podv
- Pritisnite tipko F5, da zaženete makro v Excelu
- Stolpec A bo izbran
Če želite podatke izbrati do zadnje aktivne celice v stolpcu, sledite spodnjim korakom in kodi:-
- Napišite spodnjo kodo:-
Pod stolpec () lastrow = Delovni listi ("Sheet1"). Celice (Rows.count, 1) .End (xlUp) .Row Worksheets ("Sheet1"). Range ("A1: A" & lastrow). Izberite End Sub
Koda Pojasnilo:- Najprej bomo opredelili, kaj bo zadnja aktivna celica v podatkih, nato pa zadnjo vrstico, ki jo bomo uporabili za definiranje obsega pri kodiranju.
- Pritisnite tipko F5, da zaženete makro v Excelu
- Stolpec A1: A19 bo izbran
Na ta način lahko z uporabo VBA izberete kodo, da izberete stolpec do zadnje aktivne celice. Ko ne vemo, katera je zadnja aktivna celica, lahko to kodo uporabimo pri pisanju kode VBA za izbiro v programu Microsoft Excel.
Kako izbrati celotno vrstico prek VBA?
Imamo podatke v razponu A1: C19, v katerem stolpec A vsebuje ime, stolpec B Spol in stolpec C starost.
Če želite v teh podatkih izbrati celotno vrstico, sledite spodnjim korakom in kodi:-
- Odprite stran VBA pritisnite tipko Alt+F11
- Vstavite modul
- Napišite spodnjo kodo:-
Podvrsticeselect () Range ("A2"). EntireRow. Izberite End Sub
- Pritisnite tipko F5, da zaženete makro v Excelu
- Stolpec A bo izbran
Če želite, da so podatki izbrani do zadnje aktivne celice v vrstici, sledite spodnjim korakom in kodi:-
- Napišite spodnjo kodo:-
Podvrstaselect () Zatemni zadnji stolpec kot dolg zadnji stolpec = delovni listi ("Sheet1"). Celice (1, Columns.count) .End (xlToLeft) .Column Worksheets ("Sheet1"). Izberite End Sub
Koda Pojasnilo: V tej kodi smo najprej definirali zadnji stolpec, nato pa ga bomo uporabili za določitev obsega.
- Pritisnite F5, da zaženete makro v Excelu
- Prva vrstica bo izbrana do zadnje aktivne celice v vrstici
Na ta način lahko izberemo celotno vrstico ali pa izberemo vrstico do zadnje aktivne celice v programu Microsoft Excel prek VBA.
Kako izbrati celotne podatke prek VBA?
Vzemimo primer in razumemo:-
Imamo podatke v razponu A1: C19, v katerem stolpec A vsebuje ime, stolpec B Spol in stolpec C starost.
Če želite izbrati podatke iz prve celice v zadnjo aktivno celico, sledite spodnjim korakom in kodi:-
- Odprite stran VBA, pritisnite tipko Alt+F11
- Vstavite modul
- Napišite spodnjo kodo:
Podizbor zadnje celice () Zatemni zadnjo dolžino, zadnja kolona Kot dolga lastna stran = Delovni listi ("List1"). Celice (Vrstice.štetje, 1). Konec (xlUp). .count) .End (xlToLeft). Delovni listi stolpcev ("Sheet1"). Obseg ("A1", Celice (zadnja stran, zadnji stolpec)). Izberite End Sub
Koda Pojasnilo: Najprej smo opredelili ime predmeta kode, nato pa vse spremenljivke. Nato smo opredelili, kakšna bi bila naša zadnja vrstica in zadnji stolpec.
- Pritisnite tipko F5, da zaženete makro v Excelu
- Na delovnem listu bodo izbrani vsi podatki
Zdaj, če želite kopirati iste podatke in jih prilepiti, uporabite spodnjo kodo:-
Podizbor zadnje celice () Zatemni zadnjo dolžino, zadnja kolona Kot dolga lastna stran = Delovni listi ("List1"). Celice (Vrstice.štetje, 1). Konec (xlUp). .count) .End (xlToLeft). Delovni listi stolpcev ("List1"). Obseg ("A1", celice (zadnja stran, zadnji stolpec)). Kopiraj liste ("List2"). Obseg ("A1") Konec
Zaženite kodo, vsi podatki bodo kopirani in prilepljeni na list2.
Tako lahko zapišemo makro za izbiro podatkov iz prve celice v zadnjo aktivno celico in nato prilepimo na drug list v programu Microsoft Excel.
Če so vam bili naši blogi všeč, jih delite s prijatelji na Facebooku. Prav tako nas lahko spremljate na Twitterju in Facebooku.
Radi bi slišali od vas, nam sporočite, kako lahko izboljšamo, dopolnimo ali inoviramo svoje delo in ga izboljšamo. Pišite nam na spletnem mestu e -pošte.
