Automation error

[Giordano Bruno]

I click a button im my workbook and a multipage UserForm appears. I click one of the Options and a Tree View form appears. I work through the branches and select an item from the tree. This dumps the relevant code for that item in my workbook. I then use this code to pull data from an closed workbook and dump it into my workbook.

Now comes the tricky part. I try to apply data validation to a cell in my workbook based on the data downloaded. At the line starting .Add Type:= in the following code section:

<font face=Courier New>    <SPAN style="color:#00007F">With</SPAN> Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=R" & aR & "C24:R" & aR & "C" & Lim
    <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">With</SPAN>
    </FONT>

The code is halted with the message:  Run-time error '2147417848(800 10 108)': Automation error  The object invoked has disconnected from its clients.

If anyone has any experience with this error message, I would be most grateful for their help

 

[dave3009]

Sounds more like an activeX issue than an Excel issue can you confirm if this is the a likely case. If so which OS and Excel version are you using

KR

Dave

 

[Giordano Bruno]

Hi dave3009,

Using windows XP Professional version 2002 and xl2003. I thought that it might be related to an activeX. I am using ADO to copy data from the closed workbook. Can anything be done about it?

 

[dave3009]

I'm afraid my knowledge of VBA and ActiveX draws a blank. I only knew the error as it was not a normal thing.

If you wish I can remove my posts and return the post to an unsolved state.

Your call

Dave

 

[Giordano Bruno]

Hi dave3009,

My knowledge of removing posts draws a blank. Does it do any good. I would imagine that anyone who sees the title and knows anything useful would read it anyway.

Your call

Thanks

 

[dave3009]

Hi Giordano

Might help leaving it in place

Hope you get a solution