excel - 从工作表名称和单元格地址中获取值

Question

很多时候，我需要从多张工作表中获取一个值(对于一些疯狂的工作簿 - 最多可达 200 张)。问题是所有这 200 张纸的结构都相同，即使它们的名字也一样，我很疯狂地通过这 200 张纸一张一张地链接。有没有办法创建一个用户定义的函数，比如

=getValue(sheetName,cell address)

我试过了

Function GetValue(sheetName As String, cellAddress As String) As Variant
   GetSheetValue = Range(sheetName & "!" & cellAddress).Value
End Function

在我在 Excel 文件之间切换之前效果很好。该函数开始返回#Value，我的感觉是它试图在其他打开的工作簿上搜索 SheetA、B、C、D @A1。

Answer 1

试试下面的代码

Function GetValue(sheetName As String, cellAddress As String) As Variant
   GetSheetValue = ThisWorkbook.Sheets(sheetName).Range(cellAddress)
End Function