Excel munkalap másolása VBA

Excel munkalap másolása VBA
2010-06-09T16:23:04+02:00
2010-06-10T19:32:48+02:00
2022-10-28T21:40:36+02:00
HunWolf
Sziasztok!

Egy munkafüzet munkalapját akarom sokszorosítani VBA alól.

Probléma:
- Hogyan tudom a munkalapomat átmásolni ugyanabba a munkafüzetbe, a lapok végére, az általam megadott névvel.

For i = 1 To 3
'.....
Set NewSheet = Worksheets.Add
NewSheet.Name = i
sheets("Másolandó").copy
'.....

Itt akadtam meg, mert így meg új munkalapra akarja másolni. A copy metódust meg nem tudom paraméterezni.

Ebben kérném segítségetek.
Mutasd a teljes hozzászólást!
Szia!

Egy egyszerű példa:

Sub MunkalapotMasol() MasolandoNeve = InputBox("Melyik munkalapot másoljuk?") Sheets(MasolandoNeve).Visible = True Sheets(MasolandoNeve).Copy After:=Worksheets(Worksheets.Count) UjMunkalapNeve = InputBox("Az új munkalap neve?") ActiveWindow.ActiveSheet.Name = UjMunkalapNeve End Sub

Hibakezelés nincs benne.
Mutasd a teljes hozzászólást!

Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd