<em>Excel</em>中调用<em>vba</em>里的funct

某个变量得到特殊值了？比如说空？

直接不可以，但你可以用自定义函数copy的方式 自定义函数很方便的 例如：vba有个函数dir可以检测文件是否存在 依此在模块里写个函数： function dirs(fileName) as string dirs=dir(fileName) if dirs="" then dirs="文件不存在" end function 然后就可以在zhidaoexcel单元格里引用这个函数了 =dirs（"C:\Documents and Settings\My Documents\title2.gif") 如果有些文件显示的结果是title2.gif 如果没有就不显示： 文件不存在
使用Application.WorksheetFunction.Lookup 进行调用
也是3个参数
通过选e5a48de588b67a686964616f331中Lookup，按F1调出帮助：
Excel 开发人员参考

WorksheetFunction.Lookup 方法
从单行或单列区域或者从一个数组返回值。LOOKUP 函数具有两种语法形式：向量形式和数组形式。
语法
表达式.Lookup(Arg1, Arg2, Arg3)
表达式 一个代表 WorksheetFunction 对象的变量。
参数名称 必选/可选 数据类型 说明
Arg1 必选 Variant Lookup_value - LOOKUP 在第一个向量中搜索的值。Lookup_value 可以是数字、文本、逻辑值、名称或对值的引用。
Arg2 必选 Variant Lookup_vector 或数组 - 在向量形式中，为只包含一行或一列的区域。lookup_vector 中的值可以是文本、数字或逻辑值。在数组形式中，为包含要与 lookup_value 进行比较的文本、数字或逻辑值的单元格区域。
Arg3 可选 Variant Result_vector - 只用于向量形式。只包含一行或一列的区域。它必须与 lookup_vector 大小相同。

返回值 Variant

public function test()

sheet1.cells(1,1)=sheet2.cells(1,1)
end function