[Ātrs padoms] Kā programmā Excel atlasīt 500 šūnas/rindas (ar vienu klikšķi)

Skatieties video - atlasiet 500 šūnas/rindas programmā Excel (ar vienu klikšķi)

Pirms dažām dienām es strādāju ar datu kopu, kurā man bija vairākas lapas, kas bija pilnas ar datiem. Man bija jāizvēlas pirmās 500 šūnas vienā reizē no katras darblapas un jākopē.

Pēc tam man bija jāielīmē šie dati manā izmantotajā rīkā.

Tagad to izdarīt manuāli nav grūti, bet, tā kā man bija vairākas darblapas, es sāku domāt par ātrāku veidu, kā to izdarīt.

Šajā apmācībā es jums parādīšu divas ātrākas metodes (ar un bez VBA).

Izmantojot nosaukuma lodziņu, atlasiet 500 rindas/šūnas

Formulu joslas kreisajā pusē ir nosaukuma lodziņš.

Tas parāda aktīvās šūnas atsauci, un to var arī izmantot, lai izveidotu nosauktos diapazonus.

Mēs to varam izmantot arī, lai ātri atlasītu blakus esošo šūnu diapazonu, vienkārši ievadot diapazona atsauci.

Lai vienā reizē atlasītu 500 šūnas, veiciet tālāk norādītās darbības.

1. Noklikšķiniet lodziņā Vārds.
2. A1 tips: A500.
3. Nospiediet Enter.

Tiklīdz es nospiedīšu taustiņu Enter, tas atlasīs pirmās 500 šūnas kolonnā.

Šeit ir daži citi veidi, kā to izmantot:

• Lai atlasītu pirmās 500 rindas, izmantojiet atsauci 1: 500
• Lai atlasītu pirmās 500 šūnas četrām kolonnām - A1: D500

Izmantojot VBA, atlasiet 500 rindas/šūnas

Lai gan iepriekš minētā metode ir ātra, ar VBA jūs to varat viegli padarīt par vienu klikšķi.

Vispirms ļaujiet man norādīt kodu, kas to darīs:

Sub Select500Cells () Diapazons (ActiveCell, ActiveCell.Pārvietojums (500, 0)). Atlasiet Beigt apakš.

Tagad redzēsim, kur ievietot šo kodu, un padarīsim to par vienu klikšķi.

1. Kopējiet iepriekš minēto VBA kodu.
2. Dodieties uz cilni Izstrādātājs.
3. Noklikšķiniet uz Visual Basic.
4. VB redaktorā ar peles labo pogu noklikšķiniet uz jebkura darbgrāmatas objekta.
5. Dodieties uz Ievietot un noklikšķiniet uz moduļa.
6. Modulī ielīmējiet iepriekš minēto VBA kodu.
7. Aizveriet VB redaktoru.

VBA kods tagad ir daļa no darbgrāmatas.

Ja jūs izpildāt šo makro kodu tagad, tas atlasīs 500 šūnas (sākot no aktīvās šūnas).

Tagad, lai vēl vairāk vienkāršotu šo procesu, varat pievienot šo makro ātrās piekļuves rīkjoslai (QAT).

Tas ļaus jums atlasīt 500 šūnas ar vienu klikšķi (sākot no aktīvās šūnas).

Lai pievienotu VBA makro QAT, veiciet tālāk norādītās darbības.

1. Noklikšķiniet uz ikonas Pielāgot ātrās piekļuves rīkjoslu.
2. Atlasiet “Vairāk komandu”.
3. Dialoglodziņa Excel opcijas dialoglodziņā “Izvēlēties komandu no” atlasiet “Makro”.
4. Noklikšķiniet uz makro, kuru vēlaties pievienot QAT.
5. Noklikšķiniet uz pogas Pievienot.
6. Noklikšķiniet uz Labi.

Iepriekš minētās darbības pievienotu makro QAT.

Tagad, lai vienā reizē atlasītu 500 šūnas, viss, kas jums jādara, ir atlasīt pirmo šūnu un noklikšķināt uz makro QAT.

Šeit ir daži makro koda varianti, kas var būt noderīgi.

Izmantojot VBA, atlasiet 500 rindas

Zemāk esošais kods atlasīs 500 rindas - sākot no aktīvās šūnu rindas.

Sub Select500Rows () Diapazons (ActiveCell, ActiveCell.Oset (500, 0)). EntireRow. Atlasiet End Sub

Atlasiet un kopējiet 500 šūnas, izmantojot VBA

Zemāk esošais kods kopēs 500 šūnas - sākot no aktīvās šūnas.

SubCopy500Cells () Diapazons (ActiveCell, ActiveCell.Oset (500, 0)).

Izmantojot VBA, atlasiet pirmās 500 šūnas

Zemāk esošais kods atlasīs pirmās 500 šūnas - sākot no šūnas A1.

Sub SelectFirst500Cells () Diapazons (Diapazons ("A1"), Diapazons ("A1"). Nobīde (500, 0)). Atlasiet Beigt apakš.