如何在单元格中的文本之间添加垂直线，vba excel

Question

例如，现在我有一个像这样的单元格：

但我想要这样。

excel VBA有可能吗？ 谢谢!!

Answer 1

使用“数据”选项卡下的“文本到列”功能将其分为2列。然后，如果您确实需要一条线，请选择最后一列并添加左边框。

Answer 2

这些数据是否都在一个单元格中？

无论有没有VBA，你都很难让它正确对齐 - 每个角色占据的宽度略有不同。 已编辑嗯，正如Tim Williams所建议的那样，使用固定宽度的字体可能会表现得更好，但我仍然怀疑它是否能够始终如一地运作。 （您只能插入空格和管道'|'字符，但它不会正确排列。）

此数据属于两列，多行，两行之间有边框。