У меня есть диапазон ячеек со строками, которые я хотел бы скопировать и вставить в предварительно отформатированный текст, названный в PPT.Я хотел бы вставить его как «Keep Text Only». Я знаю, что могу сделать это вручную, но я не могу найти способ сделать это через VBA.
Вот фрагмент кодакод:
ActiveWorkbook.Worksheets("Sheet1").Range("A" & startRow & ":A" & endRow).Copy
oPPTApp.ActivePresentation.Slides(17).Shapes("ShapeName").TextFrame.TextRange.PasteSpecial DataType:=ppPasteText
Я получаю сообщение об ошибке с этим кодом: Ошибка времени выполнения '-2147024809 (80070057)': указанное значение выходит за пределы диапазона
Я проверилбуфер обмена и данные, безусловно, там.Когда я делаю шаг по коду и останавливаюсь перед ошибкой, я вижу, что могу вставить его вручную в PPT как «Сохранить только текст».
Нет ли другого способа, кроме как перебирать строку за строкой в моем диапазоне?
Редактировать: я рассмотрел потенциальный дубликат поста, но он все еще не устранил проблему после проверки, что текстовое поле имеет текстовый фрейм первым.Это как если бы прошлый специальный текст для сохранения не работал, только когда это диапазон ячеек?
Спасибо!