如何使用 VB.net 将 Excel 参数传递给用户定义的 Excel 公式？
使用 vb.net，我想在 Excel 中选择 4 个单元格，然后将这些单元格值与 1 个按钮标记一起传递到 Excel 中的公式。
我按下一个带有月份的按钮，以文本形式说出“五月”。我想在 Excel 中获取一个标记为“May1t”的单元格，其值是截至 5 月的小时数。这是我正在使用的代码。
xlsWB.Worksheets(2).Range(Month1 & "1t").Value
我可以设置一个变量以此作为值，但是，
我想传递这个单元格（它将随着时间倒计时而更新）并且3 个其他类似指定的单元格以及 Excel 公式的按钮标记。
我有这样的东西：
Private Sub F_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles F.Click
xlsWB.Worksheets(4).Range("B2").Formula = "=MyFunction()"
xlsWB.Worksheets(1).Range(Month1 & "1t").Select()
End Sub
公式按顺序接受参数：MyFunction(Cell,Tag,Cell,Cell,Cell)。
With vb.net I would like to select 4 cells in Excel and then pass those cell values along with 1 button tag to a formula in Excel.
I press a button with a month, say "May" as text. I want to grab a cell in Excel labeled "May1t" the value of which is the number of hours until may. This is the code I'm using.
xlsWB.Worksheets(2).Range(Month1 & "1t").Value
I am able to set a variable with this as the value but,
I want to pass this cell (which will be updating as the time counts down) and 3 other similarly specified cells along with the button tag to an Excel formula.
I have something like this:
Private Sub F_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles F.Click
xlsWB.Worksheets(4).Range("B2").Formula = "=MyFunction()"
xlsWB.Worksheets(1).Range(Month1 & "1t").Select()
End Sub
The formula takes the parameters in the order: MyFunction(Cell,Tag,Cell,Cell,Cell).
如果你对这篇内容有疑问，欢迎到本站社区发帖提问 参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱，如果其他用户或者作者回复了您的评论，将不能在第一时间通知您！
发布评论
评论（1）
假设细胞和标签是字符串，你可以直接走吗？：
Assuming Cell & Tag are strings, can you just go?: