☰

VBA 在现有文本后插入回车符并粘贴更多文本

tag-icon • tag-icon microsoft-excel microsoft-excel-2010 macros vba
VBA 在现有文本后插入回车符并粘贴更多文本

我正在某些单元格中添加“Measure_1”。这需要我双击单元格，转到现有文本的末尾，插入回车符（alt+ent），然后粘贴 MEASURE_1。因此，我尝试自动执行此操作。

不幸的是，下面的 VBA 代码用我在录制宏时使用的示例覆盖了现有文本。

activecell.FormulaR1C1 = "D4)" & Chr(10) & "MEASURE_1"

我该如何让它说：

activecell.FormulaR1C1 = **ANY TEXT WITHOUT CHANGING** & Chr(10) & "MEASURE_1"

非常感谢，迈克尔。

答案1

尝试activecell.FormulaR1C1 = activecell.FormulaR1C1 & Chr(10) & "MEASURE_1"

相关内容