As a guess you have

Option Explicit
Dim Excel(1 To 3) As UserDefinedType
Dim ADODB(1 To 19) As UserDefinedType2

in a module somewhere and your UDT's in the Class??? Then a couple of
things. You can not declare a UDT in a Class. Since your UDT are declared
private you need to have all of the declarations in one module... Try this.
Start a new spreadsheet and add a module to it. Paste the following and it
will compile just fine...

Option Explicit
Dim objExcel(1 To 3) As UserDefinedType
Dim objADODB(1 To 19) As UserDefinedType2

Public Type UserDefinedType
Application As Object
Workbook As Object
Worksheet As Object
End Type

Private Type UserDefinedType2
Connection As Object
Command As Object
Parameter As Object
Recordset As Object
End Type
--
HTH...

Jim Thomlinson


"Trebor" wrote:

I am trying to debug existing code and the following declaration won't work.

Private x2App As Excel.Application

I keep getting an error msg stating "user defined type not defined"

Here is the Type statement I have in the declaration section of my class
module.

Private Type UserDefinedType
Application As Object
Workbook As Object
Worksheet As Object
End Type

Private Type UserDefinedType2
Connection As Object
Command As Object
Parameter As Object
Recordset As Object
End Type

Option Explicit
Dim Excel(1 To 3) As UserDefinedType
Dim ADODB(1 To 19) As UserDefinedType2

Any solutions?
--
TWN