在MsgBox中的表

我正在编写一个macros来比较两组值，并在出现差异时警告用户。 当find差异时，我希望用户input他们的评论。 为了方便他们理解我所问的内容，我想显示我用来获取评论的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的不同值引起的。 填充表格的数字存储在variables中。 如何制作这样的表格，对于需要input评论的用户来说，看起来很清楚？

Answer 1

经过一些额外的研究，我发现我错过的关键命令是vbTab

下面的代码返回一个input框，其格式足够清晰的数据表示。

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