如何向单元格添加新行，以便将新数据附加到新行上的先前数据

Question

我有一个循环，其中一个单元格被覆盖。

单元格可以说在一个特定的计数器中包含文本xxx。在下一个计数器中，它由yyy覆盖。当细胞被覆盖时，我最终只能看到yyy。我想要做的是保留原始xxx并在同一单元格中的下一行上放置yyy。就像通过按 Alt + Enter 手动输入数据一样。

有人可以帮我识别这段代码逻辑的正确语法吗？

Answer 1

使用以下内容：

Range("A1").Value = CStr(Range("A1").Value) + Chr(10) + "yyy"

CStr确保将（在此示例中）A1的可能数值转换为字符串，否则+运算符可能会失败。

Chr(10)负责添加换行符。 "yyy"当然是你的新文字。如果此文本恰好是数值，请使用CStr(yyy)。