Código VB cómo guardar un nuevo archivo EXCEL

1. Abra el software EXCEL, primero haga clic en "Herramientas de desarrollo", luego haga clic en "Ver código" para abrir la ventana de VBA.

2. Copie y pegue el siguiente código en el área de edición de código de la tabla recién abierta y luego haga clic en el botón del triángulo verde.

Código:

Sub Crear nuevo archivo ()

Atenuar excelApp, excelWB como objeto

Atenuar savePath, saveName como cadena

Establecer excelApp = CreateObject(" Excel.Application")

Establecer excelWB = excelApp.Workbooks.Add

savePath = "C:\Users\wDesktop\VBA Test Carpeta\" ?La ruta para guardar el archivo recién creado

saveName = "VBA creó file.xlsx" ?El nombre del nuevo archivo

excelWB.SaveAs savePath & saveName

excelApp.Quit

End Sub

3. Además de hacer clic en el botón del triángulo verde, también puede hacer clic en "Macro" en las "Herramientas de desarrollo" en la ventana de datos del botón del archivo de Excel y luego haga clic en el botón "Ejecutar" para ejecutar.

4. Una vez completada la ejecución, podemos verificar la ruta correspondiente y encontrar que VBA ha creado automáticamente un nuevo archivo de Excel.