Kaip įterpti kelias tuščias eilutes į „Excel“

Makro kūrimas „Microsoft Excel“ suteikia vartotojams galimybę automatizuoti pasikartojančias ir nuspėjamąsias užduotis programoje, dažnai sutaupant valandų.

Tarp duomenų įrašų įdėkite tuščias eilutes

Jei norite sukurti makrokomandą, kuri po 2 duomenų įrašų į esamą skaičiuoklę įterptų 2 tuščias eilutes, yra prieinamas makro, kuris gali padėti jums tai padaryti. Galutinis rezultatas turėtų atrodyti taip:

Numatytasis išdėstymas:

 1 antraštinė dalis
2 antraštinė dalis
3 antraštinė dalis
4 antraštinė dalis 

Po makro:

 1 antraštinė dalis
2 antraštinė dalis
3 antraštinė dalis
4 antraštinė dalis 

Kelių tuščių eilučių įterpimas tarp esančių duomenų

Naudojant toliau pateiktą makrokomandą, bus gautas aukščiau pateiktas rezultatas:

 Sub bandymas ()
Dim j As Long, r Kaip diapazonas
j = InputBox („įveskite įterpiamų eilučių skaičių“)
Nustatyti r = intervalas („A2“)
Padarykite
Diapazonas (r.Offset (1, 0), r.Offset (j, 0)) EntireRow.Insert
Nustatyti r = ląstelės (r.Row + j + 1, 1)
„MsgBox r.Address“ (šios eilutės pradžioje esanti apaštalė neleidžia naudoti šios eilutės)
Jei r.Offset (1, 0) = "" Tada Exit Do
Loop
Pabaiga