CreateObject Question
Can someone tell me why I am receiving an "Object Variable Not Set" error
when I get to the line that reads "TableObject.MoveFirst" (By the way, this is an ACT! 6.0 database I am trying to connect to Sub GetActData() Dim objDatabase As Object Set objDatabase = CreateObject("ACTOLE.DATABASE") objDatabase.Open "C:\Documents and Settings\MyName\My Documents\Raj\ibs.dbf" Dim TableObject As Object Set TableObject = objDatabase.Contact TableObject.MoveFirst Dim strOutput As String strOutput = TableObject.Data(CF_LastName) ThisWorkbook.Worksheets("Data").Range("A1") = strOutput Set TableObject = Nothing objDatabase.Close Set objDatabase = Nothing End Sub Thank you |
All times are GMT +1. The time now is 04:51 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com