macro para salir

Necesitariamos más datos, que deseas hacer cambiarle el nombre?,
guardarlo con otro nombre?, etc.. etc.. etc

On 27 abr, 09:48, Angel wrote:

Estimados compañeros/as:

Me gustaría que me proporcionaran el código para poder hacer una macro para
un botón que me permitiera, pulsándolo, salir del archivo.

Gracias

Buenas noches Peluchon:

Es verdad que me quedé un poco "cojo" en la descripción, pero lo que quiero
exactamente es lo siguiente:

- Cuando pulsemos preguntar "Guardar" (no Guardar como) y salir. Es un
fichero que está compartido y la macro es únicamente para asegurarme que se
guardan todos los cambios.

Por eso, simplemente como si fuéramos al menu archivo y guardar archivo.

Gracias,

"Peluchon" escribió:

Necesitariamos más datos, que deseas hacer cambiarle el nombre?,
guardarlo con otro nombre?, etc.. etc.. etc

On 27 abr, 09:48, Angel wrote:
> Estimados compañeros/as:
>
> Me gustaría que me proporcionaran el código para poder hacer una macro para
> un botón que me permitiera, pulsándolo, salir del archivo.
>
> Gracias

hola, Angel !

... codigo para poder hacer una macro para un boton que me permitiera, pulsandolo, salir del archivo.

... me quede un poco "cojo" en la descripcion, pero lo que quiero exactamente es lo siguiente:
- Cuando pulsemos preguntar "Guardar" (no Guardar como) y salir.
Es un fichero que esta compartido y la macro es unicamente para asegurarme que se guardan todos los cambios.
Por eso, simplemente como si fueramos al menu archivo y guardar archivo.

OJO: al 'preguntar'... se supone/espera/asume/... que el usuario 'puede decidir' [por lo tanto]...
-> podrias 'perder' la seguridad de si se guardaron 'todos los cambios' [si llegara a 'contestar' NO !!!] -???-

si lo que quieres es 'estar seguro' de que SI sean guardados todos los cambios... por que 'preguntar' al usuario ?

-> prueba a 'forzar' un guardado 'normal' del libro en el evento '_beforeclose' en el modulo ThisWorkbook :))

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Hector, por favor, estoy aprendiendo a programar VBA y aún estoy muy verde
¿podrías indicarme el código exacto para realizarlo?

beforeclose ????????????????
application.quit

Muchísimas gracias.

"Héctor Miguel" escribió:

hola, Angel !

> ... codigo para poder hacer una macro para un boton que me permitiera, pulsandolo, salir del archivo.
>> ... me quede un poco "cojo" en la descripcion, pero lo que quiero exactamente es lo siguiente:
>> - Cuando pulsemos preguntar "Guardar" (no Guardar como) y salir.
>> Es un fichero que esta compartido y la macro es unicamente para asegurarme que se guardan todos los cambios.
>> Por eso, simplemente como si fueramos al menu archivo y guardar archivo.

OJO: al 'preguntar'... se supone/espera/asume/... que el usuario 'puede decidir' [por lo tanto]...
-> podrias 'perder' la seguridad de si se guardaron 'todos los cambios' [si llegara a 'contestar' NO !!!] -???-

si lo que quieres es 'estar seguro' de que SI sean guardados todos los cambios... por que 'preguntar' al usuario ?

-> prueba a 'forzar' un guardado 'normal' del libro en el evento '_beforeclose' en el modulo ThisWorkbook :))

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

hola, Angel !

... estoy aprendiendo a programar VBA y... muy verde
podrias indicarme el codigo exacto para realizarlo?
beforeclose ????????????????
application.quit

1) hablando de libros 'compartidos', debes saber que sus codigos NO se pueden estar modificando...
-> mientras el libro siga como compartido [a menos que lo quites de compartido y pierdas el historial de cambios] :-((

2) si solo quieres asegurarte que sea guardado cualquier cambio sin 'molestar' al usuario, prueba copiando...
-> en el modulo de codigo del libro [ThisWorkbook] en el evento '_beforeclose' alguna de las siguientes alternativas:

op1: se grabaran los cambios siempre y cuando los hubiera y se cierra el libro...
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Close True
End Sub

op2: se graba el al archivo [aun si no hubo cambios] y se cierra el archivo...
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Save
Me.Close
End Sub

op3: si quieres 'proveer' algun boton para realizar las acciones...

a) si se trata de un boton de la barra de herramientas 'cuadro de coltroles'...
usas las mismas instrucciones en el modulo de codigo de la hoja donde incrustes el boton en el evento '_click' del msmo

b) si se trata de cualquier otro objeto [p.e. un boton de la barra de herramientas 'formularios']...
escribes una macro en un modulo de codigo 'estandar' y cambias la palabra 'Me' por -> ThisWorkbook

3) la instruccion: Application.Quit -> sirve para dar por terminada la sesion de excel [pero]...
-> deberas considerar si hubiera otros libros abiertos [quizas el usuario los necesite] si se han de cerrar o no [junto con tu libro] -?-

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.