1

我试图在 a 中显示 3 个值MsgBox

我的逻辑语句正在工作,它正在选择我想要的正确值 - 但是我无法让我的消息框显示 3 个单独的值,它们之间有空格。

问题:我需要每个值之间有空格,并且在我运行它时没有显示中间值。

WW = MsgBox(Application.Worksheets("Assembly1").Range("A" & Z) & Application.Worksheets("Assembly1").Range("B" & Z) & Application.Worksheets("Assembly1").Range("D" & Z), vbOKOnly, "HEY YOU HAVE SOMETHING NEW")
4

4 回答 4

4

只需& " " &在值之间使用

IE

Z = 1
WW = MsgBox(Application.Worksheets("Assembly1").Range("A" & Z) & " " & Application.Worksheets("Assembly1").Range("B" & Z) & " " & Application.Worksheets("Assembly1").Range("D" & Z), vbOKOnly, "HEY YOU HAVE SOMETHING NEW")
于 2013-07-23T11:57:32.570 回答
1

出于兴趣,您也可以使用

WW = MsgBox(Join(Application.Index(Worksheets("Assembly1").Range("A" & Z, "D" & Z), 0, Array(1, 2, 4)), " "), vbOKOnly, "HEY YOU HAVE SOMETHING NEW")
于 2013-07-23T12:52:07.477 回答
1

或者如果您需要换行符,请使用 msgbox ("A" & chr(10) & "B" & chr(10) & "C")

它将显示输出为:

一种

C

于 2013-07-23T13:12:25.800 回答
1

消息可以分行显示,便于阅读。

WW = MsgBox(Application.Worksheets("Assembly1").Range("A" & Z) +Chr(13)+ Application.Worksh

您可以在要引入空格的地方使用 Chr(13) 或 vbcrlf 来代替空格 (& " "&)。这将在不同的不同行中显示消息。

于 2013-07-23T14:29:25.537 回答