Kako umetnuti više praznih redaka u Excelu

Stvaranje makronaredbe u programu Microsoft Excel korisnicima nudi mogućnost automatiziranja ponavljajućih i predvidivih zadataka u programu, često štedeći sate vremena.

Umetnite prazne retke između unosa podataka

Ako želite stvoriti makronaredbu koja će umetnuti 2 prazna retka u postojeću proračunsku tablicu nakon svaka 2 unosa podataka, postoji dostupna makronaredba koja vam može pomoći. Krajnji rezultat trebao bi izgledati ovako:

Zadani izgled:

 TITLE1
Naslov 2
Title3
Title4 

Nakon makronaredbe:

 TITLE1
Naslov 2
Title3
Title4 

Umetanje više praznih redaka između postojećih podataka

Koristeći sljedeću makronaredbu dobit ćete gore prikazani rezultat:

 Sub test ()
Dim J Kako dugo, r As Range
j = InputBox ("upišite broj redaka koji će se unijeti")
Postavi r = Raspon ("A2")
Čini
Raspon (r.Offset (1, 0), r.Offset (j, 0)). EntireRow.Insert
Postavi r = Ćelije (r.Row + j + 1, 1)
'MsgBox r.Address (apostrof na početku ovog retka čini ovu liniju neupotrebljivom)
Ako je r.Offset (1, 0) = "" Zatim izlazite
Petlja
Kraj pod