Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
The directory property cannot be found in the cache 8000500d
I get this error when access the record attributes of the oObj. The crash
happens when the oObj.Get(Attributes(LoopCounter)) tries to pull data from an attribute that has no value or a null, I am guessing. The database being addressed used ADO to connect to and search an LDAP database. I have tried a number of error handling techniques available to VBA for Excel but no good. Still throws an exception that I cannot seem to trap so that I can reset and just carry on to the next attribute. I am not new to development but fairly new to VB and VBA specifically. The number of rows of data I am pulling with this function ends up at 850 rows with about 30 attributes. This crashes on any attribute with a null value. Any ideas would be greatly appreciated. I am still surfing the web looking to see if others have already discovered the answer. MSDN wasn't much help as yet either. Function PopulateRow(ByVal rsObj As Object, ByRef Attributes() As String, ByVal _ RowNumber As Integer, ByVal columnNumber As Integer) Dim LoopCounter As Integer On Error Resume Next ' Populate a row of the spreadsheet with the Attributes from the Metadirectory Set CurrentCell = Cells(RowNumber, columnNumber) LoopCounter = 0 ' Go through the list of Attributes and add the Metadirectory value to the spreadsheet While (Len(Attributes(LoopCounter)) 0) Set Value = Nothing Value = rsObj.Get(Attributes(LoopCounter)) ' Put the value in the spreadsheet cell CurrentCell.Value = Value ' Get the next attribute LoopCounter = LoopCounter + 1 ' Move over to the next cell (column) Set CurrentCell = CurrentCell.Offset(0, 1) Wend End Function Thanks, Bryan44 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Run-Time Error (8000500d) - The directory property cannot be found | Excel Programming | |||
Change current directory to the directory that the workbook loads from! | Excel Programming | |||
Setting CommandText property of PivotCache fails if cache has 1 PivotTable | Excel Programming | |||
Creating a macro that lists directory names within a directory.... | Excel Programming | |||
Check if directory empty OR no of files in directory. | Excel Programming |