25/07/2008, 02:56
|
 | | | Fecha de Ingreso: julio-2008 Ubicación: donde me dejan
Mensajes: 34
Antigüedad: 16 años, 9 meses Puntos: 2 | |
| total filas i columnas de un excel desde VB 6.3
buenos dias!!!!
tengo estas sentencias k si no stoy ekivocado me crean un objeto y en este objeto se carga la hoja de excel k le especifico.
lo k me falta es la propiedad??? k me diga el total de filas con datos y el total de columnas.
gracias forofos!!!
Set Obj_Excel = CreateObject("Excel.Application")
' Abre el libro pasandole el path
Obj_Excel.Workbooks.Open FileName:=Path_XLS
' si es la versión de Excel 97, asigna la hoja activa ( ActiveSheet )
If Val(Obj_Excel.Application.Version) >= 8 Then
Set Obj_Hoja = Obj_Excel.ActiveSheet
Else
Set Obj_Hoja = Obj_Excel
End If |