Indsættelse og Kopiering Rækker

Som du redigerer regneark, kan du opleve, at nogle af dit arbejde er gjort på grundlag af arbejde, du har gjort før. For eksempel kan du have en række data, som du har indtastet i en tidligere Excel-session. I denne session, skal du kopiere den række data og bruge det som udgangspunkt for dine nye data, men med nogle få ændringer.

I en sådan situation, ville det være rart at have en hurtig måde at indtaste en tom række efter den aktuelle række, og kopiere dataene i den aktuelle række til den nye tomme række. Der er ingen iboende kommandoer i Excel til at gøre dette, men en makro kan gøre det meget behændigt. Overvej følgende eksempel:

Sub InsertCopyRow1 ()
ActiveCell.EntireRow.Select
Selection.Copy
Selection.Insert Shift: = xlDown
End Sub

For at kunne bruge makroen, alt du behøver at gøre er at vælge en celle i en række. Når makroen køres, er en kopi af den aktuelle række indsat lige under den række du er i.

Det eneste problem med denne løsning er, at den forlader Excel interface en lidt "rodet" (i mangel af et bedre ord). Når det er gennemført, er en komplet række stadig er markeret, og den nye række har den "marcherende myrer" markeringsramme omkring det.

Dette problem kan overvindes ved at inkludere kommandoer til at kollapse udvælgelse og flytte det til den ønskede placering. En anden måde er simpelthen at bruge en anden makro, der bygger på forskellige VBA-kommandoer. Følgende makro vil også indsætte og kopiere en række, men det efterlader den celle, du valgte aktive:

Sub InsertCopyRow2 ()
ActiveCell.Offset (1, 0) .EntireRow.Insert
ActiveCell.EntireRow.Copy ActiveCell.Offset (1, 0) .EntireRow
End Sub

ExcelTips er din kilde til omkostningseffektiv Microsoft Excel træning. Dette tip (2042) gælder for Microsoft Excel 97, 2000, 2002, og 2003. Du kan finde en version af dette tip til båndet grænseflade Excel (Excel 2007 og nyere) her: Isætning og Kopiering Rækker.


© 2020 Zajacperrone.com | Contact us: webmaster# zajacperrone.com