Note: The other languages of the website are Google-translated. Back to English

¿Cómo deshabilitar o no permitir las opciones Guardar y Guardar como en Excel?

Normalmente, cuando hacemos clic en la función Guardar o Guardar como, nuestros datos modificados en el libro de trabajo se guardarán a la vez. Pero, a veces, otros usuarios no pueden modificar ni guardar su archivo de Excel cuando lo leen. Este artículo proporciona el método VBA para deshabilitar las opciones Guardar y Guardar como en Excel.

Deshabilite las opciones Guardar y Guardar como con código VBA


Deshabilite las opciones Guardar y Guardar como con código VBA

Puede ejecutar el siguiente código VBA para deshabilitar las opciones Guardar y Guardar como en Excel.

1. En el libro de trabajo, debe deshabilitar las funciones Guardar y Guardar como, presione otro + F11 teclas simultáneamente para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. En el Microsoft Visual Basic para aplicaciones ventana, haga doble clic ThisWorkbook en la barra izquierda, copie y pegue el siguiente VBA 1 en la ventana Código, y luego haga clic en el a Salvar botón. Ver captura de pantalla:

VBA 1: deshabilite las opciones Guardar y Guardar como en Excel

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    ThisWorkbook.Saved = True
End Sub

3. En la apertura Guardar como ventana, seleccione una carpeta para guardar el libro de trabajo, nombre el libro de trabajo como necesite y seleccione Libro de Excel habilitado para macros de Guardar como tipo lista desplegable, y finalmente haga clic en el a Salvar

4. Ahora copie y pegue el siguiente VBA 2 en el ThisWorkbook ventana de código. Ver captura de pantalla.

VBA 2: deshabilite las opciones Guardar y Guardar como en Excel

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim xName As String
xName = "CancelBeforeSave"

If Not Evaluate("=ISREF('" & xName & "'!A1)") Then
    Sheets.Add(after:=Worksheets(Worksheets.count)).Name = xName & ""
    Sheets(xName & "").Move after:=Worksheets(Worksheets.count)
    Sheets(xName & "").Visible = False
    Exit Sub
End If
    Cancel = True
End Sub

5. Haga clic en el a Salvar para guardar el código y luego cerrar el libro.

El libro de trabajo se ha guardado como un libro de Excel habilitado para macros con la a Salvar y Guardar como funciones inhabilitadas.

Nota:: Parece que los cambios se guardan en la hoja de trabajo actual cada vez que modifica y guarda el libro. Pero después de cerrar y volver a abrir el libro de trabajo, encontrará que los cambios no se pudieron guardar.


Las mejores herramientas de productividad de oficina

Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%

  • Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
  • Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
  • Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
  • Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
  • Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
officetab parte inferior
Comentarios (27)
Aún no hay calificaciones. ¡Sé el primero en calificar!
Este comentario fue minimizado por el moderador en el sitio
esto no funciona No puedo guardar el código, desaparece una vez que vuelvo a abrir el archivo. ¿Cómo guardo el código?
Este comentario fue minimizado por el moderador en el sitio
Estimado te,
Gracias por su pregunta. El artículo se actualizó para permitir guardar el código en el libro de trabajo ahora.
Este comentario fue minimizado por el moderador en el sitio
Estimado
el articulo no esta actualizado. no funciona
Este comentario fue minimizado por el moderador en el sitio
Hola Jen,
El artículo ha sido actualizado nuevamente con la resolución de problemas. Por favor, inténtalo. Gracias por tu comentario.
Este comentario fue minimizado por el moderador en el sitio
La actualización del código agrega una hoja, pero en realidad nunca verifica si hay un valor VERDADERO/FALSO en esa hoja. La actualización no soluciona nada, solo crea una hoja inútil dentro del libro de trabajo.

Creo que se olvidó de verificar si hay un valor VERDADERO/FALSO en esa hoja.
Este comentario fue minimizado por el moderador en el sitio
Como publicó TEE, ¿cómo guardamos el archivo con la macro? No está allí cuando vuelvo a abrir. Ahora también recibo un error en el bit ThisWorkbookSaved = True.
Este comentario fue minimizado por el moderador en el sitio
Estimado Les,
Gracias por su pregunta. El artículo se actualizó para permitir guardar el código en el libro de trabajo ahora.
Este comentario fue minimizado por el moderador en el sitio
Como publicaron TEE y LES, ¿cómo guardamos el archivo con la macro?
Este comentario fue minimizado por el moderador en el sitio
Hola,
Gracias por su pregunta. El artículo se actualizó para permitir guardar el código en el libro de trabajo ahora.
Este comentario fue minimizado por el moderador en el sitio
Solo para ayudar a cualquier otra persona que lea este artículo en busca de ayuda para suprimir el botón Guardar, pensé en colocar la respuesta aquí, ya que "Crystal" no parece estar respondiendo la pregunta...


Si coloca el libro de trabajo en "Modo de diseño" y luego presiona GUARDAR, debería funcionar.
Este comentario fue minimizado por el moderador en el sitio
Estimado pícaro,
Me pierdo el punto del problema. Muchas gracias por tu ayuda y compartir.

Atentamente
Este comentario fue minimizado por el moderador en el sitio
Sigo recibiendo un error de depuración
Este comentario fue minimizado por el moderador en el sitio
Buenos días,
¿Qué versión de Excel usas?
Este comentario fue minimizado por el moderador en el sitio
Hola, soy fanático de este sitio web... Solía ​​​​probar el código. Funciona perfectamente. Pero también deshabilita la "Opción Guardar". No puedo guardar la hoja de Excel. Lo que necesito es deshabilitar solo la función "Guardar como". También leo los comentarios del otro usuario. ThisWorkbookSaved = True tampoco me funciona. ¿Podrias ayudarme por favor? Muchas gracias por todos sus aportes.
Este comentario fue minimizado por el moderador en el sitio
Por favor, no quiero que nadie copie o guarde mi archivo de Excel, ¿cómo puedo eliminar guardar o guardar como?
Este comentario fue minimizado por el moderador en el sitio
Traté de usar el código para NO GUARDAR el archivo. Pero no funcionó. Guarda el archivo.
Este comentario fue minimizado por el moderador en el sitio
Gracias por su respuesta. Altamente apreciado. Quiero que me guíen cómo enviar un archivo guardado a un amigo que puede abrir mi archivo pero solo leerlo o editarlo, pero no puede guardar el archivo en ninguna carpeta.
1. Por ejemplo, tengo un archivo guardado, que quiero enviar a "A". Él abre el archivo guardado, pero después de abrirlo, lee o hace cambios en mi archivo, no puede guardarlo en ninguna carpeta.
2. Tengo un código de Internet que no permite guardar. Pero en este caso cuando copio y pego el código, el archivo no se guarda. Entonces no puedo enviarle el archivo.
3. ¿Cómo puedo enviar el archivo a la Parte "A" con un código guardado con la esperanza de que no pueda guardar el archivo?
Este comentario fue minimizado por el moderador en el sitio
Brillante!   
Este comentario fue minimizado por el moderador en el sitio
Para todos aquellos que encontraron el error después de haber hecho esto una vez, cuando intentan hacerlo de nuevo, el código no se guarda:

Vaya a la parte inferior del archivo de Excel donde muestra las hojas
Haga clic derecho en las hojas
Presiona Mostrar
Eliminar la hoja llamada CancelBeforeSave
Este comentario fue minimizado por el moderador en el sitio
Hola, muchas gracias, esto es exactamente lo que necesito, para evitar que otros guarden o guarden como un archivo en cualquier lugar, y me está funcionando, gracias al comentario sobre "Modo de diseño".

Sin embargo, todavía necesito poder editar el archivo periódicamente y guardar los cambios. ¿Debo eliminar el código VBA primero, hacer los cambios, Guardar y luego volver a agregar el código VBA para evitar que otros lo guarden? ¿O hay una forma más sencilla de realizar ediciones y guardar mientras se deja intacto el código VBA?
Este comentario fue minimizado por el moderador en el sitio
Hola Rocheley,
Gracias por tus comentarios. El código VBA se ha actualizado de la siguiente manera. Necesitas:
1. presione el otro + F11 teclas para abrir el Visual Basic editor.
2. En el Visual Basic editor, haga doble clic ThisWorkbook En la izquierda Oficial y luego copie el siguiente código VBA en ThisWorkbook (Código) ventana.
3. Guarde el código y guarde el libro de trabajo como un libro de trabajo habilitado para macros de Excel.
Notas:
1) En el código, "Prueba Win10x64" representa el nombre de usuario en su sistema operativo. Cámbielo por su propio nombre de usuario.
2) Después de agregar el código, puede editar el libro de trabajo y guardarlo como de costumbre. Pero si alguien más obtiene este libro de trabajo, las opciones Guardar y Guardar como no estarán disponibles.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updated by Extendoffice 20220930
    ThisWorkbook.Saved = True
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim xName As String
xName = "Win10x64Test" 'The username in your operating system

If xName <> Environ("username") Then
Cancel = True
End If
End Sub
Este comentario fue minimizado por el moderador en el sitio
Acabo de descubrir que tan pronto como coloco un acceso directo a este archivo en otra ubicación (donde los demás van a acceder a él), todas mis protecciones ya no funcionan. La hoja no está protegida (que configuré previamente), el libro de trabajo no está protegido (que también configuré previamente) y la capacidad Guardar-Guardar como ahora está allí, como si el código VBA no estuviera allí en absoluto. Si voy al archivo original, todo sigue funcionando.

¿Qué tiene el atajo que está eliminando todas las protecciones?
Este comentario fue minimizado por el moderador en el sitio
Hola Rocheley,
El código de VBA no puede determinar de qué manera se abre el libro de trabajo. Por lo tanto, no puede evitar que otros cambien el archivo al abrirlo a través de un acceso directo.
Lo siento, no puedo ayudar con este problema.
Para el primer problema que mencionó anteriormente, necesito tiempo para ver si puedo manejarlo.
Este comentario fue minimizado por el moderador en el sitio
Es posible que el usuario que reciba el archivo deshabilite las macros y el control no funcione. Por favor, ayuda a entender.
Este comentario fue minimizado por el moderador en el sitio
Hola Deepak Kachare,
Si no desea que otros usuarios deshabiliten las macros después de recibir el archivo, puede ocultar el código de la macro para que nadie pueda abrirlo y verlo.
Vea si el método en el siguiente artículo puede ayudarlo.
Cómo proteger y ocultar macros de Excel
Este comentario fue minimizado por el moderador en el sitio
Gracias por su respuesta. Creo que el enlace es erróneo. Podrías ayudarme con el enlace.
Este comentario fue minimizado por el moderador en el sitio
Hola DEEPAK KACHARE,
Lo siento por el error. Para proteger y ocultar macros de Excel, debe configurar de la siguiente manera.
1. Haga clic en el otro + F11 teclas para abrir el editor de VBA.
2. En el editor, haga clic en Herramientas > Propiedades de VBAProject.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/vba3.png
3. En el Propiedades de VBAProject cuadro de diálogo, vaya al Protección pestaña, verifique Bloquear el proyecto para verlo caja, introduzca la contraseña y, finalmente, haga clic en OK.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/vba4.png
A partir de ahora, cualquier persona (incluido usted mismo) que desee abrir el editor VBA de este libro de trabajo necesitará una contraseña.
No hay comentarios publicados aquí todavía
Deje sus comentarios
Publicar como invitado
×
Califica esta publicación:
0   Personajes
Ubicaciones sugeridas

Siganos

Copyright © 2009 - www.extendoffice.com. | Reservados todos los derechos. Energizado por ExtendOffice, | Mapa del Sitio
Microsoft y el logotipo de Office son marcas comerciales o marcas comerciales registradas de Microsoft Corporation en los Estados Unidos y / o en otros países.
Protegido por Sectigo SSL