Excel VBA Guardar como formato de archivo (12 ejemplos adecuados)

  • Compartir Este
Hugh West

Almacenamos información importante en Excel libros de trabajo. También realizamos diversas operaciones según nuestras necesidades. Por lo tanto, es necesario guardar el archivo una vez que lo actualizamos. De lo contrario, podemos perder algunos datos valiosos. Existen algunas formas eficaces de Guardar un Libro Excel Además, guardar un Excel según nuestros deseos Formato o almacenar el archivo en el Ubicación es otra tarea vital. En este artículo, le mostraremos los ejemplos más útiles de Excel VBA Guardar como formato de archivo .

Descargar el cuaderno de prácticas

Descárgate el siguiente cuaderno de ejercicios para practicar por tu cuenta.

VBA Guardar como formato de archivo.xlsm

12 Ejemplos de Excel VBA Guardar como formato de archivo

Para ilustrarlo, utilizaremos el siguiente conjunto de datos como ejemplo. Por ejemplo, el conjunto de datos representa el Vendedor , Producto y Ventas netas de una empresa. Aquí, guardaremos este libro de trabajo aplicando Excel VBA Guardar como formato de archivo .

1. VBA para guardar como archivo de Excel

En nuestro primer ejemplo, le mostraremos un sencillo Código VBA para guardar un Excel Por lo tanto, siga los pasos que se indican a continuación para realizar la tarea.

PASOS:

  • En primer lugar, vaya a la página Ficha Desarrollador.
  • A continuación, seleccione Visual Basic .

  • En consecuencia, el VBA aparecerá una ventana.
  • A continuación, pulse Inserte .
  • A continuación, seleccione Módulo .

  • Por lo tanto, el Módulo aparecerá la ventana.
  • Después, copia el siguiente código y pégalo en la casilla.
 Sub Ejemplo_1() ActiveWorkbook.SaveAs End Sub 

  • Ahora, ejecuta el código pulsando F5 .
  • Por lo tanto, tendrás que introducir el nombre del archivo, el formato y otra información que se te pida.
  • Por último, guardará el archivo en la ubicación que especifiques.

Más información: Cómo guardar una hoja de cálculo como un nuevo archivo usando Excel VBA

2. Especificar la extensión del archivo con Excel VBA

En el ejemplo anterior, tuvimos que especificar manualmente la dirección Formato de archivo después de pulsar el comando de ejecución. Pero aquí, vamos a mostrar una forma más eficiente de aplicar Excel VBA Guardar como formato de archivo para guardar los libros de trabajo en el formato deseado. Simplemente especificaremos la extensión del archivo después del nombre del archivo. Así pues, inserte el código siguiente en el archivo Módulo ventana.

 Sub Example_2() Dim location As String location = "D:\SOFTEKO\excel vba save as file format.xlsm" ActiveWorkbook.SaveAs Filename:=location End Sub 

De este modo, puede ejecutar el código para obtener el archivo en el formato y la ubicación deseados. Para guarde el archivo en formato xlsx, tipo xlsx en lugar de xlsm .

Read More: Excel VBA Macro para guardar PDF en una carpeta específica (7 ejemplos ideales)

3. Excel VBA para utilizar el código de formato de archivo

Sin embargo, podemos introducir el Formato de fichero Código numérico en lugar de especificar la extensión del archivo. Algunos códigos útiles son: .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 Por lo tanto, copie el siguiente código y péguelo en el archivo Módulo caja.

 Sub Example_3() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=52 End Sub 

Más información: [¿Por qué Excel no guarda mi formato? (7 posibles razones)

4. Guardar en el mismo directorio con VBA

En este ejemplo, mostraremos cómo Guardar en el Mismo directorio donde ya está el archivo con Excel VBA Por lo tanto, inserte el código en el campo Módulo ventana.

 Sub Example_4() ActiveWorkbook.SaveAs Filename:="excel vba guardar como formato de archivo" End Sub 

Más información: Excel VBA: Elegir ubicación y guardar como PDF

5. VBA para almacenar en un nuevo directorio

Sin embargo, es posible que también necesitemos guardar el archivo en una carpeta Nuevo directorio Por lo tanto, escriba el siguiente código en el campo Módulo y ejecútelo.

 Sub Example_5() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location End Sub 

6. Solicitar contraseña para abrir un archivo Excel

Además, puede solicitar Excel VBA Guardar como formato de archivo para pedir un Contraseña a Abrir archivo Excel Por lo tanto, inserte y ejecute el siguiente código.

 Sub Example_6() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", Password:="one" End Sub 

Más información: Cómo guardar un archivo Excel con contraseña

Lecturas similares

  • Excel VBA para Guardar Archivo con Nombre Variable (5 Ejemplos)
  • Cómo guardar Excel como PDF (con pasos rápidos)
  • Excel VBA para guardar como archivo utilizando la ruta de la celda (con pasos rápidos)
  • Código VBA para el botón Guardar en Excel (4 Variantes)
  • [Archivo CSV de Excel no guarda los cambios (6 posibles soluciones)

7. Añadir contraseña para editar en Excel

Además, puede solicitar un Contraseña para Edición de en Excel Sin la contraseña, sólo se abrirá en formato de sólo lectura. Copia el código y pégalo. Luego, ejecuta el código.

 Sub Example_7() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", WriteRes:="one" End Sub 

8. Abrir en formato de sólo lectura

De nuevo, para abrir un archivo en Sólo lectura Formato escriba el código siguiente y pulse F5 para ejecutarlo.

 Sub Example_8() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", _ ReadOnlyRecommended:=True End Sub 

Más información: Cómo abrir un documento de Word y guardarlo como PDF o Docx con VBA Excel

9. Cuadro de diálogo "Guardar como

Otra operación útil de Excel VBA para guardar como formato de archivo es generar Cuadro de diálogo Guardar como Por lo tanto, inserte el siguiente código.

 Sub Example_9() Application.GetSaveAsFilename End Sub 

Más información: Macro Excel para Guardar como PDF (5 Ejemplos Adecuados)

10. VBA para Crear & Guardar Nuevo Libro de Trabajo

Además de guardar un archivo, también podemos Crear & Guardar Nuevo Libro de Trabajo con VBA Para ello, escriba el código siguiente en el campo Módulo y pulse F5 .

 Sub Example_10() Dim book As Workbook Set book = Workbooks.Add Application.DisplayAlerts = False book.SaveAs Filename:="D:\SOFTEKO\excel vba save as file format.xlsm" Application.DisplayAlerts = True End Sub 

Read More: Excel VBA: Guardar Hoja como Nuevo Libro sin Abrir

11. Guardar el libro activo en Excel

Del mismo modo, podemos guardar el libro de trabajo activo donde ya está almacenado. Para realizar la operación, inserte el código muy simple.

 Sub Example_11() ActiveWorkbook.Save End Sub 

Más información: Cómo guardar una macro para todos los libros en Excel (con sencillos pasos)

12. VBA para guardar como formato PDF en Excel

Por último, podemos utilizar la función PDF en nuestro VBA código para guardar en Formato PDF Por lo tanto, aplique Excel VBA Guardar como formato de archivo A continuación, ejecute el código pulsando F5 .

 Sub Example_12() ActiveSheet.SaveAs Filename:="excel vba guardar como archivo formato.pdf" End Sub 

Más información: Cómo guardar Excel como PDF (6 formas útiles)

Conclusión

A partir de ahora, podrá guardar archivos con Excel VBA Guardar como formato de archivo siguiendo los ejemplos descritos. Sigue utilizándolos y dinos si tienes más formas de realizar la tarea. Sigue el ExcelWIKI No olvides dejarnos tus comentarios, sugerencias o dudas en la sección de comentarios.

Hugh West es un capacitador y analista de Excel altamente experimentado con más de 10 años de experiencia en la industria. Tiene una Licenciatura en Contabilidad y Finanzas y una Maestría en Administración de Empresas. Hugh tiene una pasión por la enseñanza y ha desarrollado un enfoque de enseñanza único que es fácil de seguir y comprender. Su conocimiento experto de Excel ha ayudado a miles de estudiantes y profesionales en todo el mundo a mejorar sus habilidades y sobresalir en sus carreras. A través de su blog, Hugh comparte su conocimiento con el mundo, ofreciendo tutoriales gratuitos de Excel y capacitación en línea para ayudar a las personas y empresas a alcanzar su máximo potencial.