Ievietojiet pielāgotu rindu skaitu programmā Excel, izmantojot šo vienkāršo makro

MS Office lietotnes ir izstrādātas ļoti saprātīgi, un es to nesaku tikai tāpēc, ka tās padara manu darbu bezgalīgi vieglu. Es to saku, jo tā ir patiesība. Pēc dažām dienām mēs ievietojām ziņu par YouTube videoklipu ievietošanu Office 2013 un atzīmējām, ka opcija MS Excel nebija pieejama tikai tāpēc, ka tā tur nebija vajadzīga. Šis ir intelekta veids, par kuru es runāju; zinot, kuras funkcijas ir vajadzīgas noteikta veida lietotnēs. Tas pārliecinās, ka nekas nebūtisks nepadara to par galīgo piedāvājumu. Tomēr es biju pārsteigts, ka tur, kur Excel ļauj darblapā ievietot vairāk rindu, tas neļauj izvēlēties pievienojamo rindu skaitu. Lai to paveiktu, jums ir citas darba problēmas, piemēram, atlasiet pievienojamo rindu skaitu no esošajām un pēc tam izmantojat ievietošanas funkciju. Vai arī jūs varētu atkārtot rindas ievietošanas darbību tik daudz rindu, cik vēlaties. Tas atkārtojas, bet, ja vēlaties nopelnīt piecas minūtes, šis mazais makro var rūpēties par darbu jūsu vietā.

Tā kā tas prasa makro, jums tas būs jāsaglabā kā makro iespējots Excel fails. Lai to izdarītu, logā Saglabāt kā noklikšķiniet uz nolaižamās izvēlnes “Saglabāt kā tipu” un atlasiet “Excel Marco iespējota darbgrāmata” (* xlsm).

Tālāk ir pienācis laiks rakstīt makro. Atveriet cilni Skats un noklikšķiniet uz Makro, lai izveidotu jaunu. Nosauciet to kā vien vēlaties un noklikšķiniet uz Izveidot. Šis logs tiks atvērts automātiski.

Šeit būtiskas ir līnijas “Sub” un “End Sub”. Apakšējā rindiņā būs makro nosaukums, savukārt beigu apakšdaļa apzīmēs komkrāsu beigas šajā makro. Tā kā jūs tikko to izveidojāt, starp šīm rindiņām nedrīkst būt nekā, piemēram, iepriekš redzamajā ekrānuzņēmumā. Starp šīm divām rindām ielīmējiet sekojošo.

Dim CurrentSheet as Object 'Pārveidot visas atlasītās lapas. Katrai pašreizējās lapas ActiveWindow. SelectedSheets ”katras lapas augšpusē ievietojiet 5 rindas. Pašreizējā lapa. Diapazons ("a1: a5"). EntireRow. Ievietot nākamo pašreizējo lapu. 

Šis kods ievietos piecas rindas no augšas. Kodā uz to norāda kā A1: A5. Lai to rediģētu atbilstoši jūsu vajadzībām, jums jārediģē šis diapazons. Pirmā vērtība kalpo kā atsauce uz vietu, kur tiks ievietotas rindas. Ja maināt to uz A100, rindas tiks ievietotas pēc pirmajām deviņdesmit deviņām rindām. Pēc atskaites punkta iestatīšanas jums jāievada rindu skaits.

Rindu numurus nosaka šūnu diapazons A1: A5. Šajā diapazonā tiks ievietotas 5 rindas. Lai atrastu pareizo rindu diapazonu, piemēram, jūs vēlaties ievietot 25 rindas no A99, atskaites punktam pievienosiet 25, lai tas būtu A99 un mīnus viens šūna no tā. T. i. A100 + 99 - 1 = A198. Jūs pievienojat rindas, nevis kolonnas, tāpēc mainīsies tikai numurs, nevis kolonnas burts. Makro ir jāatjaunina katru reizi, kad ir jāieliek rindas, bet tas ir tikai mazs labojums un darbojas tiešām labi, tāpēc tas ir pavadītā laika vērts.

Makro, izmantojot Microsoft atbalstu