VBA для вставки возврата каретки после существующего текста и вставки дополнительного текста

1

Я добавляю «Measure_1» в определенные ячейки. Это требует от меня двойного щелчка в ячейке, перехода к концу существующего текста, вставки возврата каретки (alt + ent) и вставки в MEASURE_1. Поэтому я пытаюсь автоматизировать это.

К сожалению, мой код VBA ниже переписывает существующий текст примером, который я использовал при записи макроса.

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

Как мне заставить это сказать:

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

Большое спасибо. Майкл.

RocketGoal
источник

Ответы:

1

Пытаться activecell.FormulaR1C1 = activecell.FormulaR1C1 & Chr(10) & "MEASURE_1"

Vladimir Tsuverkalov
источник
Вот и все. Работает отлично. Большое спасибо.
RocketGoal