如何通过名称引用 Excel sheet 以使用 LotusScript 将 Excel 数据导入 Notes 应用程序？
How do I refer to an Excel sheet by name to import Excel data into a Notes app using LotusScript?
我正在尝试在 excel sheet 中查找一些数据以按需填充 Lotus Notes 应用程序中的字段。我正在使用 LotusScript 的操作按钮，如下所示：
Dim v As String
Dim v2 As String
'Open XL sheet for access to data
Set oExcel = CreateObject ( "Excel.Application" )
v="\msp2\mi\CSD\Confidential\IT and PPST budget.xlsm"
Msgbox("opening " & v)
Set oWorkbook = oExcel.workbooks.open(v)
Set oWorkSheet= oWorkbook.worksheets (4)
v2=Cstr(oWorkSheet.Cells(1,1).value)
Messagebox(v2)
此代码确实有效，因为它从单元格 A1 中提取数据 - 但是 sheet?
包含我想要的数据的 sheet 被 "Sheet4" 重命名为 "Logic-Detail" 但是如果我像上面那样使用 4 作为参数，我会从左边的第 4 个 sheet 获取数据。我还需要能够应对 sheets 被隐藏的情况。我在 MSDN 的 excel 对象模型 "help" 上花了 20 分钟一无所获:-(
我相信当你知道答案时一定很容易！
猜测正确的语法令人沮丧，不是吗？在 Excel-VBA 中引用 sheets 时有几个选项：
- 您可以按索引号列出它们，就像您在问题的代码示例中所做的那样
- 你可以通过它的名字来引用它，在你的情况下这可能是
oWorkbook.Worksheets("Logic-Detail")
- 您可以通过代号来引用它，在您的情况下可能是
oWorkbook.Sheet4。在 VBA 编辑器中查看作品sheet 的属性时可以更改代号。
可能还有更多方式来指代 sheet，但目前想到的就是这些。从问题和评论中我们知道，至少前两个选项在 LotusScript 中也有效。
我正在尝试在 excel sheet 中查找一些数据以按需填充 Lotus Notes 应用程序中的字段。我正在使用 LotusScript 的操作按钮，如下所示：
Dim v As String
Dim v2 As String
'Open XL sheet for access to data
Set oExcel = CreateObject ( "Excel.Application" )
v="\msp2\mi\CSD\Confidential\IT and PPST budget.xlsm"
Msgbox("opening " & v)
Set oWorkbook = oExcel.workbooks.open(v)
Set oWorkSheet= oWorkbook.worksheets (4)
v2=Cstr(oWorkSheet.Cells(1,1).value)
Messagebox(v2)
此代码确实有效，因为它从单元格 A1 中提取数据 - 但是 sheet?
包含我想要的数据的 sheet 被 "Sheet4" 重命名为 "Logic-Detail" 但是如果我像上面那样使用 4 作为参数，我会从左边的第 4 个 sheet 获取数据。我还需要能够应对 sheets 被隐藏的情况。我在 MSDN 的 excel 对象模型 "help" 上花了 20 分钟一无所获:-(
我相信当你知道答案时一定很容易！
猜测正确的语法令人沮丧，不是吗？在 Excel-VBA 中引用 sheets 时有几个选项：
- 您可以按索引号列出它们，就像您在问题的代码示例中所做的那样
- 你可以通过它的名字来引用它，在你的情况下这可能是
oWorkbook.Worksheets("Logic-Detail") - 您可以通过代号来引用它，在您的情况下可能是
oWorkbook.Sheet4。在 VBA 编辑器中查看作品sheet 的属性时可以更改代号。
可能还有更多方式来指代 sheet，但目前想到的就是这些。从问题和评论中我们知道，至少前两个选项在 LotusScript 中也有效。