Как сохранить форматирование текста при выполнении действия копирования-вставки в PowerPoint с использованием VBA? - PullRequest
0 голосов
/ 02 февраля 2012

В моем последнем вопросе " Найти номер из текста в powerpoint с помощью vba? " я создал код, и он отлично работает (спасибо Тони Даллимор ).Но в этом процессе я сталкиваюсь с некоторыми неожиданными вещами, такими как:

  1. Если мое текстовое поле содержит текст с маркерами и подпунктами.
  2. Если оно содержит ссылки http с некоторым цветом шрифта.

Потом после запуска моего кода.он показывает мне данные без какого-либо форматирования текста, как указано выше, форматирование текста исчезает.

Теперь я знаю, почему это происходит.Потому что в моем коде я собираю весь текст в одну переменную и затем выполняю действие, а затем заменяю его на старый в ppt.

Так что мой вопрос: «Есть ли способ запустить код в текстовом поле, поэтому упомянутая проблемабудет решена? "

Для кода, пожалуйста, перейдите на предыдущий вопрос .

Спасибо

1 Ответ

0 голосов
/ 05 февраля 2012

больше подсказки, чем ответа:

объекты диапазона имеют свойство ".duplicate", которое копирует форматирование. Посмотрите, применимо ли это к вашему сценарию.

например.

создать новый документ. Отформатируйте первый абзац так, как вам удобно. то:

set dup = ActiveDocument.Paragraph(1).Format.Duplicate

Documents.Add
Selection.InsertAfter "This is a new paragraph."
Selection.Paragraphs.Format = dup

текст на новой странице будет отформатирован как раньше

...