按键精灵怎么在路径中增加变量？

下面是代码。输入框中文本内容的原始值为空。事件表单1.充电表单1.输入框。Text=“End”Event//定义要调用的按钮以选择文件路径事件form1。按钮1。单击//定义按钮变量dim file path//调用系统文件查找插件，并将找到的文件路径保存到文件路径变量filepath=plugin。file Selectfile（）//输入框的文本内容将重新分配给filepathform1变量。文本=文件路径事件

分类: 电脑/网络 >>程序设计 >>其他编程语言

问题描述:

本人是菜鸟，下面是一个有效的自定义函数，取指定 sheet 名的 指定单元格的数据。

Function GetSheet(ST As String, Rg As Range)

GetSheet = Worksheets(ST).Range(Rg.Address)

End Function

例如：工作簿中 有 SHEET1 ,SHEET2 两个工作表

sheet1.A1="你好吗"

sheet2.B5="SHEET1"

在 SHEET2.C5单元格中输入公式 getsheet(b5,a1)

则 SHEET2.C5返回值为 “你好吗”

现在我想把这个公式扩展一下，比如说：

C:\BOOK1.XLS.A1="你好吗"

C:\BOOK2.XLS\sheet2.B5="C:\BOOK1.XLS.A1"

我想在book2中引用BOOK1 的数据，

也就是说，我想把这个公式扩展到绝对路径，如何定义公式，谢谢？

解析:

Function GetSheet(path as string ,ST As String, Rg As Range)

GetSheet = WorkBook(path).Worksheets(ST).Range(Rg.Address)

End Function

---