Kā lietot makro ierakstītāju programmā Excel 2016

Viens veids, kā iegūt kodu VBA modulī, ir ierakstīt savas darbības, izmantojot Excel makro ierakstītāju. Viena lieta, kas jums jāatceras, ir tāda, ka varat ierakstīt tikai tās lietas, kuras varat veikt tieši programmā Excel. Ziņojuma lodziņa parādīšana nav iekļauta Excel parastajā repertuārā. (Tā ir VBA lieta.) Makro ierakstītājs ir noderīgs, taču daudzos gadījumos jums, iespējams, būs jāievada vismaz kāds kods manuāli.

Tālāk ir sniegts detalizēts piemērs, kurā parādīts, kā ierakstīt makro, kas ievieto jaunu darblapu un paslēpj visas, izņemot pirmās desmit rindas un visas, izņemot pirmās desmit kolonnas. Ja vēlaties izmēģināt šo piemēru, sāciet ar jaunu, tukšu darbgrāmatu un veiciet šīs darbības:

Aktivizējiet darblapu darbgrāmatā.

Derēs jebkura darblapa.

Noklikšķiniet uz cilnes Izstrādātājs un pārliecinieties, vai nav iezīmēta opcija Izmantot relatīvās atsauces .

Šis makro tiks ierakstīts, izmantojot absolūtās atsauces.

Izvēlieties Izstrādātājs → Kods → Ierakstīt makro vai noklikšķiniet uz ikonas blakus Gatavības indikatoram statusa joslas kreisajā galā.

Programmā Excel tiek parādīts dialoglodziņš Ierakstīt makro.

Dialoglodziņā Makro ierakstīšana piešķiriet makro nosaukumu TenByTen un nospiediet taustiņu kombināciju Shift+T, lai ievadītu īsinājumtaustiņu.

Makro var izpildīt, nospiežot Ctrl+Shift+T.

Noklikšķiniet uz Labi, lai sāktu ierakstīšanu.

Programma Excel projektā automātiski ievieto jaunu VBA moduli, kas atbilst aktīvajai darbgrāmatai. No šī brīža programma Excel pārvērš jūsu darbības VBA kodā. Ierakstīšanas laikā ikona statusa joslā kļūst par nelielu kvadrātu. Šis ir atgādinājums, ka darbojas makro ierakstītājs. Varat arī noklikšķināt uz šīs ikonas, lai apturētu makro ierakstītāju.

Pēdējās lapas cilnes labajā pusē noklikšķiniet uz ikonas Jauna lapa.

Excel ievieto jaunu darblapu.

Atlasiet visu kolonnu K (11. kolonnu) un nospiediet Ctrl+Shift+labā bultiņa; pēc tam ar peles labo pogu noklikšķiniet uz jebkuras atlasītās kolonnas un īsinājumizvēlnē izvēlieties Slēpt.

Programma Excel slēpj visas atlasītās kolonnas.

Atlasiet visu 11. rindu un nospiediet Ctrl+Shift+lejupbultiņa; pēc tam ar peles labo pogu noklikšķiniet uz jebkuras atlasītās rindas un īsinājumizvēlnē izvēlieties Slēpt.

Programma Excel slēpj visas atlasītās kolonnas.

Atlasiet šūnu A1.

Izvēlieties Izstrādātājs → Kods → Pārtraukt ierakstīšanu vai noklikšķiniet uz pogas Pārtraukt ierakstīšanu statusa joslā (mazajā kvadrātā).

Programma Excel pārstāj reģistrēt jūsu darbības.

Lai skatītu šo tikko ierakstīto makro, nospiediet Alt+F11, lai aktivizētu VBE. Logā Projekts atrodiet darbgrāmatas nosaukumu. Jūs redzat, ka projektā ir norādīts jauns modulis. Moduļa nosaukums ir atkarīgs no tā, vai, uzsākot makro ierakstīšanu, darbgrāmatā bija kādi citi moduļi. Ja to nedarījāt, modulis tiks nosaukts Module1. Varat veikt dubultklikšķi uz moduļa, lai skatītu moduļa koda logu.

Šis ir jūsu darbību ģenerētais kods:

Sub TenByTen()
'
TenByTen makro
'
Tastatūras īsinājumtaustiņš: Ctrl+Shift+T
'
  Sheets.Add After:=Active Sheet
  Kolonnas (“K:K”). Atlasiet
  Diapazons(Atlase, Atlase.Beigas(xlToRight)).Atlasiet
  Selection.EntireColumn.Hidden = True
  Rindas (“11:11”). Atlasiet
  Diapazons(Atlase, Atlase.Beigas(xlUz leju)).Atlasiet
  Selection.EntireRow.Hidden = True
  Diapazons (“A1”). Atlasiet
Beigu apakš