我怎样才能引用内置的MS Exceltypes与OLE
我的应用程序应该在Excel中执行一些简单的操作，比如添加图表，列表对象等等。 我正在使用OLE连接。 问题是，一些Excel方法将内置types（枚举）作为参数。 对于提及他们我没有任何想法。 例如：
WorkBook.ActiveSheet.ListObjects.Add(xlSrcRange, Range("$D$5:$J$15"), , xlNo).Name = "Table1" xlSrcRange和xlNo属于内置的枚举。 我试图用下面的方式来提及他们
ExcelApp.xlSrcRange ExcelApp.XlListObjectSourceType.xlSrcRange ExcelApp.XlListObjectSourceType
此代码会导致错误“对象不支持属性或方法ExcelApp.xlSrcRange ”
New XlListObjectSourceType.xlSrcRange new xlSrcRange
此代码也会导致错误（未知variablesXlListObjectSourceType和xlSrcRange）
我正在使用QTP，脚本语言是VB脚本
.wsf脚本可以通过Excel.Sheet参考访问xl *常量：
type xlconst.wsf <?xml version="1.0" standalone="yes" encoding="iso-8859-1" ?> <package> <job id="xlconst"> <reference object="Excel.Sheet" reference="true"/> <script language="VBScript"> <![CDATA[ ' ############################################################################ For Each arg In WScript.Arguments.Unnamed WScript.Echo "Const " & arg & " = " & Eval(arg) Next ' ############################################################################ ]]> </script> </job> </package>
输出：
cscript xlconst.wsf xlNo xlYes Const xlNo = 2 Const xlYes = 1
普通的VBScript不能。 如果QTP仅限于普通的VBScript，则必须手动添加/定义常量。 也许上面的.wsf会使这个任务更容易。
如何使用完全合格的名字？
dim sourceType As Excel.XlListObjectSourceType sourceType = Excel.XlListObjectSourceType.xlSrcRange
编辑:(在VBScript）
dim sourceType sourceType = 1