【问题标题】:Displaying function value + text in MsgBox在 MsgBox 中显示函数值 + 文本
【发布时间】:2018-04-19 21:04:02
【问题描述】:

我想显示一个消息框来显示这两个东西:

1)hlookup 计算的结果 2)一般文字

hloohup 本身正在工作(我只用它测试了消息框)但我不知道如何连接“文本”+ hllokup 结果。

错误是:无效的过程调用或参数

任何帮助将不胜感激!

这是我现在所拥有的:

Sub bet_result()
Dim lookarray As Range
Dim rng2 As Range
Dim ws As Worksheet

Set ws = Sheets("XXX")
Set rng2 = ws.Range("C7")
Set lookarray = ws.Range("K5:Q38")



MsgBox rng2.Value & " " & "Text" & WorksheetFunction.Hlookup(rng2, lookarray, 34, False) 



End Sub

【问题讨论】:

  • 这段代码没有问题。
  • 也适用于我,当代码因错误而中断时检查变量值以确保没有任何移动。

标签: vba excel lookup msgbox


【解决方案1】:

尝试添加一个变量并为其分配 Hlookup 值

Sub bet_result()
Dim lookarray As Range
Dim ws As Worksheet

Set ws = Sheets("XXX")
rng2 = ws.Range("C7").value
Set lookarray = ws.Range("K5:Q38")
lookup = WorksheetFunction.Hlookup(rng2, lookarray, 34, False)

MsgBox rng2 & " " & "Text" & lookup 

End Sub

抱歉我在阿根廷的英语不好

【讨论】:

    猜你喜欢
    • 1970-01-01
    • 1970-01-01
    • 2015-04-24
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    相关资源
    最近更新 更多