Excel: Exempel på makro för att infoga flera rader

Microsoft Excel är värd för ett antal funktioner som gör att användarna kan skapa arbetsblad helt anpassade till deras behov. Bland dessa funktioner är möjligheten att skapa ett makro, vilket gör det möjligt för användare att göra beräkningar och data manipuleringar utan att gå igenom repeterande rörelser.

Infoga flera rader i Excel-arbetsbladet

Excel-uppgift

Nedanstående tips gör att du kan infoga flera rader mellan befintliga rader i ett Excel-kalkylblad. Med detta makro kan du infoga en viss mängd tomma rader i kalkylbladet och kan ändras enligt dina behov.

Innan makro:

 Titel 1
title2
TITLE3
TITLE4 

Efter makro:

Titel 1
title2
TITLE3
TITLE4 

Provmakro

Här är den makrokod som behövs för att utföra ovanstående uppgift:

 Delprov ()
Dimma så länge som räckvidd
j = InputBox ("ange antalet rader som ska införas")
Ställ r = Range ("A2")
Do
Område (r.Offset (1, 0), r.Offset (j, 0)). TotalRow.Insert
Ange r = celler (r.Row + j + 1, 1)
MsgBox r.Address
Om r.Offset (1, 0) = "" Gör sedan Avsluta
Slinga
Slutdel