jueves, 27 de octubre de 2016

Excel – Excel VBA Macro Trabajar con libros

Como referirse al objeto libro de trabajo:

-Libro Activo – Activeworkbook
-Libro con el código en ejecución –Thisworkbook
-Libro N por número de índex en la colección de libros 
workbooks(1) ,workbooks(N+1)…

-Libro X por nombre en la colección de libros
workbooks(“Libro1.xls”) ,workbooks(“Libro2.xlsx”)…


Ejemplos:
Sub Prueba1()
MsgBox "El nombre es " & ActiveWorkbook.Name
‘si tienes varios libros puedes obtener el nombre asi…
MsgBox "El nombre es " & workbooks(1).Name
MsgBox "El nombre es " & workbooks(2).Name
‘Si tienes un solo libro abierto obtendrás un error..porque no existe el libro 2
End Sub

‘cerrar un libro sin guardar
Sub Prueba2()
ActiveWorkbook.Close false
End Sub
‘cerrar el libro guardando cambios
Sub prueba3()
ActiveWorkbook.Close True
End Sub

‘guardar como en otra ruta…
Sub prueba4()
Dim s_name as string,ruta as string
Ruta=” C:\”
s_name=”VentasNuevo.xls”
ActiveWorkbook.SaveAs ruta & s_name
End Sub


No hay comentarios: