VBA-új munkafüzet létrehozása (munkafüzetek.Add) – Automate ExcelAutomate Excel
új munkafüzet létrehozása
új munkafüzet létrehozásához egyszerűen használja a munkafüzeteket.Add hozzá:
Workbooks.Add
az újonnan hozzáadott munkafüzet most az ActiveWorkbook.
ezt a kóddal láthatja:
Sub AddWB()Workbooks.AddMsgBox ActiveWorkbook.NameEnd Sub
új munkafüzet létrehozása & hozzárendelése az objektumhoz
az ActiveWorkbook objektumot használhatja az új munkafüzetre való hivatkozáshoz. Ezzel hozzárendelheti az új munkafüzetet egy változóhoz:
Dim wb as WorkbookWorkbooks.AddSet wb = ActiveWorkbook
de jobb, ha a munkafüzetet egy változóhoz rendeljük a munkafüzet létrehozásakor:
Dim wb As WorkbookSet wb = Workbooks.Add
most hivatkozhat az új munkafüzetre a
MsgBox wb.Name
új munkafüzet létrehozása & mentés
új munkafüzetet is létrehozhat, és azonnal elmentheti:
Workbooks.Add.SaveAs Filename:="NewWB"
Ez a munkafüzetet an-ként menti el .xlsx fájl az alapértelmezett mappába (pl. Saját Dokumentumok). Ehelyett testreszabhatja a SaveAs-t a munkafüzetek mentésének útmutatójával.
most már hivatkozhat a munkafüzetre a neve szerint:
Workbooks("NewWB.xlsx").Activate
Ez a kód aktiválja a ” NewWB.xlsx”.
új munkafüzet létrehozása & lapok hozzáadása
munkafüzet létrehozása után szerkesztheti. Itt csak egy példa arra, hogy két lapot adjon az új munkafüzethez (feltételezve, hogy ez az ActiveWorkbook):
ActiveWorkbook.Worksheets.Add Count:=2
Leave a Reply