Inicio » VBA-Ejemplos » VBA y libros Excel

VBA y libros Excel

Share

Cerrar libro Excel (guardar cambios)

ActiveWorkbook.Close
ActiveWorkbook.Close Savechanges:=True
ActiveWorkbook.Close(True)

Cerrar libro Excel (sin guardar cambios)

ActiveWorkbook.Close(False)
ActiveWorkbook.Close Savechanges:=False

Cerrar libro Excel (variable, sin guardar cambios)

Application.DisplayAlerts = False
Windows(Libro_mayor).Close
Application.DisplayAlerts = True
 
<h2>Abrir libro Excel (ruta fija)</h2>
<pre lang="vb">Workbooks.Open FileName:="C:\Trabajo\Informe.xls"

Abrir libro Excel (diálogo)

Msg = MsgBox("Elija archivo para abrir.", vbOKOnly, (""))
 
strArchivo = Application.GetOpenFilename
On Error GoTo 99
 
Workbooks.OpenText Filename: = strArchivo
If strArchivo = "" Then Exit Sub
strArchivo = ActiveWindow.Caption
99:
Exit sub

Devolver nombre del libro Excel

strNombre = ActiveSheet.Parent.FullName
MsgBox ActiveWorkbook.FullName