Necesito código macro, POR FAVOR!!!!

07/05/2004 - 10:04 por Ulises | Informe spam
Hola a todos.

Quiero hacer lo siguiente:

Tengo una plantilla en excel donde quiero poner una macro
que haga lo siguiente:

- Que pida si deseamos guardar el documento
- Si le hemos dicho que sí que nos pida el nombre del
documento y ubicación.
- Que guarde el documento.
- Y que salga de excel.

¿¿¿¿ Se puede hacer con una sola macro?????. Necesito ese
código si alguien lo tiene o que controle VB .

Gracias a todos desde Zaragoza, España.
 

Leer las respuestas

#1 Torrero
16/05/2004 - 03:09 | Informe spam
Desde Torrero-Zaragoza, saludos.

Prueba con algo así:

Dim pregunta As String
pregunta = MsgBox("Desea guardar el trabajo ?",
vbYesNo, "Mi aplicación")
If pregunta = vbYes Then
Do
fname = Application.GetSaveAsFilename
(InitialFilename:="librin.xls", fileFilter:="Excel Files
(*.xls), *.xls")
MsgBox fname
Loop Until fname <> False
Workbooks.Add.SaveAs Filename:=fname
Workbooks.Close
End If
Application.Quit


Hola a todos.

Quiero hacer lo siguiente:

Tengo una plantilla en excel donde quiero poner una macro
que haga lo siguiente:

- Que pida si deseamos guardar el documento
- Si le hemos dicho que sí que nos pida el nombre del
documento y ubicación.
- Que guarde el documento.
- Y que salga de excel.

¿¿¿¿ Se puede hacer con una sola macro?????. Necesito ese
código si alguien lo tiene o que controle VB .

Gracias a todos desde Zaragoza, España.
.

Preguntas similares