vb提示用户定义类型未定义

你的VB工程要引用“Microsoft Excel xx.x Object Library”才行。

或者不引用，而改成下面这样也行：

Dim objXLApp As Object

下面那个objWorkBook也要改为：

Dim objWorkBook As Object

Set objWorkBook = CreateObject("Excel.WorkBook")

1、需要定义的类型不存在，如：dim a as xx，而xx是没定义的（可能xx写错了）,需要先定义xx类型。
2、工具：vb6
3、用户定义类型未定义错误分三类：
a)写错了默认变量类型名，如：dim a as intege，改成dim a as integer即可。
b)写错了自定义变量类型名，如自定义变量a1，写成了al，改正成a1即可。
c)定义了某种引用类型的变量类型，而未引用该对象，如：
dim conn as ADODB.Connection，
而未在工程中引用Microsoft ActiveX Data Objects 2.5 Library，工程中引ADO即可。

4、注意：引用必须是定义类型相应的对象，引用错误是无效的。