excel - MsgBox 中的表格

Question

我正在编写一个宏，它比较两组值并警告用户是否存在任何差异。当发现差异时，我希望用户输入他们的评论。为了让他们更容易理解我在问什么，我想在我用来获取评论的 InputBox 中显示所有数字。我想获得的示例 InputBox 可能如下所示:

Difference between warehouse and accounting records! See details below, insert reason.

Product: Toyota Corolla

------------------------------
|Item   |Warehouse|Accounting|
------------------------------
|Wheel  |        3|         3|
------------------------------
|Engine |        2|         3|
------------------------------
|Door   |        7|         7|
------------------------------
|Gearbox|        5|         5|
------------------------------
|Roof   |        4|         3|
------------------------------

在这种情况下，警报是由 Roof 和 Engine 的不同值引起的。填写表格的数字存储在变量中。如何制作这样的表格，让必须输入评论的用户看得清楚？

Answer 1

经过一些额外的研究，我发现我缺少的关键命令是 vbTab
下面的代码返回一个输入框，表格的格式很好，可以清晰地显示数据。

Sub TestMsg()
    Dim testcom As String
    testcom = InputBox("Enter answer" & vbNewLine & "axx" & vbTab & "b" & vbNewLine & "c" & vbTab & "xxd")
    MsgBox testcom
End Sub