在消息框中显示3个值,值之间有空格

时间:2013-07-23 11:54:31

标签: excel vba excel-vba

我正在尝试在MsgBox中显示3个值。

我的逻辑语句正在运行,它正在选择我想要的正确值 - 但是我无法让我的消息框显示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 个答案:

答案 0 :(得分:4)

在值

之间使用& " " &

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")

答案 1 :(得分:1)

感兴趣,您也可以使用

WW = MsgBox(Join(Application.Index(Worksheets("Assembly1").Range("A" & Z, "D" & Z), 0, Array(1, 2, 4)), " "), vbOKOnly, "HEY YOU HAVE SOMETHING NEW")

答案 2 :(得分:1)

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

它会将输出显示为:

A

B

C

答案 3 :(得分:1)

消息可以以单独的行显示,这些行可以清楚地阅读。

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

您可以在要引入空间的位置使用Chr(13)或vbcrlf,而不是空格(&“”&)。这将以不同的不同行显示消息。