На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! Организуем VBA-FAQ! Если у Вас есть предложения, выскажитесь здесь: Пишем FAQ, интересно Ваше мнение
Популярные разделы FAQ:    user posted image Общие вопросы    user posted image Особенности VBA-кода    user posted image Оптимизация VBA-кода    user posted image Полезные ссылки

1. Старайтесь при создании темы указывать в заголовке или теле сообщения название офисного приложения и (желательно при работе с Office 95/97/2000) его версию. Это значительно сократит количество промежуточных вопросов.
2. Формулируйте вопросы как можно конкретнее, вспоминая (хотя бы иногда) о правилах ВЕЛИКОГО И МОГУЧЕГО РУССКОГО ЯЗЫКА, и не забывая, что краткость - сестра таланта.
3. Не забывайте использовать теги [сode=vba] ...текст программы... [/code] для выделения текста программы подсветкой!
4. Темы с просьбой выполнить какую-либо работу полностью за автора здесь не обсуждаются и переносятся в раздел ПОМОЩЬ СТУДЕНТАМ.
Модераторы: Old Bat, MIF
  
> Копирование макросов из Normal.dot
    Собственно сабж.
    Мне нужно скопировать макросы из Normal.dot в документ.
    Т.е. я хочу чтобы при создании документов у меня на машине в них автоматом добавлялись некоторые макросы, находящиеся в Normal.dot на случай если я эти доки на другой машине смотреть буду.
    Так вот пишу:
    ExpandedWrap disabled
      Application.OrganizerCopy NormalTemplate.FullName, ActiveDocument.FullName, "MyMacro", wdOrganizerObjectProjectItems

    А в ответ получаю "Run-time error '4198' Ошибка команды"
    Интересно что из документа в шаблон так копируется нормально.
    Собственно вопрос как всё-таки скопировать?
    Что здесь не верно, или может есть другой способ.
    Подскажите кто сталкивался.
    Заранее спасибо.
    PS: Word2000
      есть такая проблема, используй обходные пути - Import/Export или вставку строк в модуль
      Работа с модулем в VBE
        Спасибо, просто я думал что-то неправильно делаю с OrganizerCopy...
        Сделал через Export/Import в Envir("TEMP")+"\temp.tmp"
        Плюс Kill Envir("TEMP")+"\temp.tmp"
        Всё работает.
        Спасибо.
          Цитата cppasm @
          я думал что-то неправильно делаю с OrganizerCopy...

          да нет, все верно, а сей фокус, вероятно, связан с политикой ms по отношению к вирусописателям
          1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
          0 пользователей:


          Рейтинг@Mail.ru
          [ Script execution time: 0.0545 ]   [ 15 queries used ]   [ Generated: 24.07.26, 11:00 GMT ]