Excel och intelligenta funktioner: Ett makro för att infoga flera rader
Microsoft Office-applikationerna utmärker sig genom sin genomtänkta design, vilket verkligen underlättar mitt dagliga arbete. Det är inte bara min personliga åsikt, utan en objektiv observation. Jag noterade nyligen hur smidigt man kan infoga YouTube-videor i Office 2013, men saknaden av detta alternativ i Excel kändes helt korrekt – det behövs helt enkelt inte där. Den här typen av funktionsmedvetenhet, där man enbart fokuserar på relevanta verktyg för varje applikation, är verkligen imponerande. Men en aspekt som förvånade mig var att Excel inte erbjuder ett direkt sätt att välja antalet rader man vill infoga i ett kalkylblad. Det finns visserligen andra metoder, som att markera ett befintligt antal rader och sedan använda infogningsfunktionen eller att manuellt upprepa infogningssteget flera gånger. Även om detta är funktionellt, kan det bli repetitivt. Med lite tidsinvestering kan ett litet makro göra denna process mycket smidigare.
För att kunna använda ett makro, måste du först spara din fil som en makroaktiverad Excel-fil. Det gör du genom att i ”Spara som”-fönstret välja ”Excel Macro Enabled Workbook (*.xlsm)” från rullgardinsmenyn ”Filformat”.
Därefter är det dags att skapa makrot. Gå till fliken ”Visa” och klicka på ”Makron” för att skapa ett nytt. Ge makrot ett passande namn och klicka på ”Skapa”. Ett nytt fönster kommer att öppnas.
De viktiga raderna här är ”Sub” och ”End Sub”. ”Sub”-raden innehåller namnet på ditt makro, medan ”End Sub” markerar slutet på de kommandon som tillhör makrot. När du skapar ett nytt makro är utrymmet mellan dessa rader tomt. Kopiera och klistra in följande kod mellan dessa rader:
Dim CurrentSheet As Object
' Gå igenom alla valda blad
For Each CurrentSheet In ActiveWindow.SelectedSheets
' Infoga 5 rader längst upp i varje blad
CurrentSheet.Range("a1:a5").EntireRow.Insert
Next CurrentSheet
Denna kod lägger till fem rader från toppen av kalkylbladet, vilket definieras av intervallet A1:A5. Du kan justera koden efter behov. Det första värdet i intervallet anger var infogningen ska ske. Om du ändrar det till exempelvis A100, kommer raderna att läggas till efter de 99 första raderna. Efter att ha definierat startpunkten måste du ange hur många rader du vill lägga till.
Antalet rader definieras av cellintervallet A1:A5, vilket lägger till fem rader. För att infoga ett annat antal rader, till exempel 25 rader från A99, lägger du till 25 till referenspunkten (A99) och minskar resultatet med 1, vilket blir A123. Alltså A99 + 25 = A124, A124-1 = A123, vilket ger oss intervallet A99:A123. Kom ihåg att du lägger till rader, så kolumnbokstaven förblir densamma. Makrot kan behöva uppdateras för varje nytt antal rader du vill infoga, men det är en liten justering som sparar mycket tid.