Excel - makro za iskalno celico in dodajanje nove vrstice

Težava

Želim ustvariti makro, ki bo pogledal na primer stolpec A in našel zadnjo vneseno številko, nato dodal vrstico pod njo in to naredil vsakič, ko bi tekel.

Rešitev

Ta makro lahko uporabite:

 Sub Insert_Row () Dim n As Integer n = Celice (Rows.Count, 1) .End (xlUp) .Row Rows (n) .Izberite Selection.Insert Shift: = xlUp End Sub 

Opomba

Hvala za akvarel za ta nasvet na forumu.