Oprettelse og navngivning et regneark ved hjælp af en makro

Jeff vil oprette en kopi af sin "master" regneark, bede om et navn på den nye regneark, og flytte den til slutningen af ​​faner i regneark, alle fra inden for en makro. Han forsøgte at indspille en makro til at gøre dette, men det virkede ikke.

Det forhold, at den indspillede makro fungerede ikke er frygtelig overraskende. Når du optager en makro, du fortæller Excel til at registrere de skridt du tager. Disse trin (i dette tilfælde), omfattede navngivningen af ​​regnearket, så navnet blev indspillet i makroen. Prøv at køre makroen for anden gang, og du vil få en fejl, fordi det regneark, du forsøger at skabe på den anden pass allerede blev oprettet på den første.

I dette tilfælde er du nødt til at skrive en makro manuelt. Du kan starte med at optage processen, og du vil få en kode som følgende:

Sub Macro1 ()
Sheets ("master"). Vælg
Sheets ("master") kopi efter:. = Sheets (3)
Sheets ("Master (2)") Vælg.
Sheets ("Master (2)"). Name = "NewMaster"
End Sub

Bemærk, at koden placerer regnearket (efter tredje ark) og så altid navne det samme. Der er en masse at ændre her. Hvad du ønsker at gøre, er at ændre det til noget i retning af følgende:

Sub CopyRename ()
Dim SNAME As String
Dim wks As arbejdsark
Regneark ("Master") kopi efter:. = Sheets (Worksheets.Count)
Set wks = ActiveSheet
Gør Mens SNAME <> wks.Name
SNAME = Application.InputBox _
(Spørg: = "Indtast nyt regneark navn")
Ved fejl Resume Next
wks.Name = $ name
Ved fejl GoTo 0
Loop
Set wks = Nothing
End Sub

Denne makro vil kopiere regnearket med navnet "Master" til slutningen af ​​arket listen (uanset hvor mange ark du har i projektmappen) og fortsætte med at bede om et nyt regneark navn, indtil et gyldigt navn indtastes.

ExcelTips er din kilde til omkostningseffektiv Microsoft Excel træning. Dette tip (3898) 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: Oprettelse og navngivning et regneark ved hjælp af en makro.


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