amigo tengo este codigo:
Dim oex As Object
Dim obook As Object
Dim osheet As Object
Dim a As Integer, X As Integer
Dim i As Long
obook.Application.DisplayAlerts = False
Set oex = CreateObject("excel.application")
Set obook = oex.Workbooks.Add(App.path & "planillascheques.xls")
oex.Visible = True
a = obook.ActiveWorkbook.Sheets.Count
no me funciona me puedes ayudar a descubrir la falla, necesito asignar el valor a una variable tu codigo funciona, pero necesito obtener el resultado en una variable
gracias