Makró segítségével másolhat adatokat az Excel egyik munkalapjáról a másik munkafüzet másik lapjára
Szeretné átvinni egy terület tartalmát egyik munkalapról a másikra? Ez könnyen elvégezhető az Excel interaktív használatával. De hogyan kell elvégezni a munkát egy makróval? Hozzon létre egy ciklust, amely végigmásolja az összes másolni kívánt cellát. Így néz ki a makró:
Almásolási terület ()
Dim Quelltab munkalapként
Cél fül tompítása munkalapként
Dim Cell as Range
Hosszú tompított számláló
Számláló = 1
Tartomány = "A1: A10"
Forrás beállítása lap = ActiveWorkbook.Worksheets ("1. táblázat")
Cél beállítása lap = ActiveWorkbook.Worksheets ("Table2")
A SourceTab.Range minden cellájához ("A1: A10")
Céltábla Sejtek (számláló, 1) = cella
Számláló = számláló + 1
Következő cella
End Sub
A "Forrás lap" változó definíciójában adja meg a munkafüzeten belüli forrás tábla nevét. Ez az a munkalap, amelyről másolni szeretné az adatokat. A makróban ez a "Table1" lap.
A "Cél fül" címke segítségével határozza meg annak a munkalapnak a nevét, amelybe másolni szeretné az adatokat.
Az A1: A10 terület másolásra kerül a makróban. Ha más területet szeretne használni, akkor ennek megfelelően állítsa be a makrót.
A "Számláló" címkével szabályozhatja a céltábla azon sorát, amelyben a cellák beszúrását meg kell kezdeni. Az adatokat a cellák egymás alá másolják
A makró megadásához nyomja meg az ALT F11 billentyűt az Excelben a VBA szerkesztő megjelenítéséhez. Az INSERT - MODULE paranccsal üres modullapot helyezhet be. Ha közvetlenül a Excelből szeretné elindítani a makrót, használja az ALT F8 billentyűkombinációt.
Egy teljes munkalap másolása a munkafüzetbe
Lehetőség van arra is, hogy a munkafüzet teljes munkalapját másolja egy makró segítségével. Az aktuális munkafüzet aktív lapjának a munkafüzet végére történő másolásához használja a következő makrót:
Sub CopyActiveTable ()
ActiveSheet.Copy After: = Munkalapok (Worksheets.Count)
End Sub
A makró elindítása után egy munkalap kerül hozzáadásra az aktív munkafüzethez. Ez a munkalap másolata, amely a makró meghívásakor aktív volt. A két munkalap megkülönböztetése érdekében az Excel egy sorszámot hoz létre a másolt munkalap mögött. Az alábbi ábra azt mutatja, hogy ez hogyan néz ki a táblanyilvántartásban az "Értékesítés" munkalap másolása után:
