PDA

View Full Version : Solved: Automation error



nst1107
04-09-2009, 07:13 AM
Was experimenting with developing a pseudo-menu bar for a userform and ran into a problem I don't understand. I searched it online, but didn't come up with any solutions.

The error gives me the message

"Run-time error '-2147417848 (80010108)':

Automation error
The object invoked has disconnected from its clients."

I don't know at which line the error was triggered (debugger never showed me), but I'll attach the file. To re-create the error, run the userform and click one of the buttons at the top.

Thanks for any help.

nst1107
04-09-2009, 07:14 AM
Here in case you don't have 2007.

nst1107
04-10-2009, 09:03 AM
Any clues?

Kenneth Hobs
04-10-2009, 10:51 AM
If you F8, you will see it error on the Set frm line of ShowMenu().

mdmackillop
04-11-2009, 03:28 PM
Set fillRange = fillRange.Resize(fillRange.Offset(Rows.Count - 4, 1).End(xlUp).Row - 3, 3)


fillRange.Offset(Rows.Count - 4, 1).End(xlUp).Row is returning a value of 3, from which you subtract 3, giving you

Set fillRange = fillRange.Resize(0, 3)

which is causing an error.

nst1107
04-13-2009, 05:33 AM
Thanks!