1. Набираем команду codeby webinar. Набираем команду для организации и проведения вебинаров. Подробнее ...

    Скрыть объявление
  2. Требуются разработчики и тестеры для проекта codebyOS. Требования для участия в проекте: Знание принципов работы ОС на базе Linux; Знание Bash; Крайне желательное знание CPP, Python, Lua; Навыки системного администрирования. Подробнее ...

    Скрыть объявление
  3. Получи 30.000 рублей. Для получения денег необходимо принять участие в конкурсе авторов codeby. С условиями и призами можно ознакомиться на этой странице ...

    Внимание! Регистрация авторов на конкурс закрыта.

    Скрыть объявление

Перевод текста на другую строку

Тема в разделе "Базы данных и администрирование", создана пользователем -, 9 дек 2010.

  1. Гость

    Репутация:
    0
    Подскажите плизззз, как можно в коде указать перевод текста на другую строку при выводе в PowerPoint???

    Код:
    PowerPoint.Presentations.Item(1).Slides.Item(2).Shapes(2).TextFrame.TextRange.In
    sertAfter(строка("ggggggрр"));	
    PowerPoint.Presentations.Item(1).Slides.Item(2).Shapes(2).TextFrame.TextRange.In
    sertAfter(строка("Texte de premier niveau"));
    При выводе получается: ggggggррTexte de premier niveau

    Надо, чтоб было так:
    ggggggрр
    Texte de premier niveau
     
  2. TimeDontWait

    TimeDontWait Well-Known Member

    Репутация:
    0
    Регистрация:
    4 янв 2010
    Сообщения:
    367
    Симпатии:
    0
    Попробуй так:
    Код:
    PowerPoint.Presentations.Item(1).Slides.Item(2).Shapes(2).TextFrame.TextRange.In
    sertAfter(Chr$(CharCode:=13));
    И вообще есть такая маленькая но полезная вещь "Макросы", включаеш на запись, делаеш что хочеш, пишеш строчку, делаеш пробелы, с новой строки, далее макрос "стоп" - лезеш в VB - там весь код
     
  3. Гость

    Репутация:
    0
    Попробовала, но так ошибки выдаЁт, не получается...
    Может по-другому как-то можно..
     
  4. Гость

    Репутация:
    0
    Не надо, уже нашла)))
     
  5. KiR

    KiR НЕ шибка опытный програмер)

    Репутация:
    0
    Регистрация:
    11 сен 2007
    Сообщения:
    1.581
    Симпатии:
    0
    Если нашла - может стоит поделиться с остальными решением вопроса - может для кого-нибудь это будет полезным
     
  6. Гость

    Репутация:
    0
    slide.Shapes(2).TextFrame.TextRange.InsertAfter(строка(Выборка)+ Символы.ПС);

    Вот, пожалуйста!
     
Загрузка...

Поделиться этой страницей