На главную Наши проекты:
Журнал   ·   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
  
> Подскажите как в диалоге при сохранении файла указать папку и тип файла , Подскажите как в диалоге при сохранении файла Ворд как указать папку и тип файла
    ExpandedWrap disabled
      'диалог при сохранении файла
      With Dialogs(wdDialogFileSaveAs)
             .Name = "" ' имя файла
             .Show 'показать
             ???'папка
             ???'тип файла
       End With
      Цитата Ципихович Эндрю @
      ExpandedWrap disabled
              .Name = "" ' имя файла

      Для папки просто так:
      ExpandedWrap disabled
              .Name = "C:\" ' имя файла


      Добавлено
      Для типа файла:
      ExpandedWrap disabled
              .Format = 1 ' 2, 3, 4, ...
      Сообщение отредактировано: coder -
        Спасибо!!!!!!
        ExpandedWrap disabled
          'диалог при сохранении файла
          With Dialogs(wdDialogFileSaveAs)
          'тип сохраняемого файла
          '0 - Документ Word
          '1 - Шаблон документа
          '2 - Обычный текст
          '3 - Обычный текст
          '4 - Обычный текст
          '5 - Обычный текст
          '6 - Текст в формате RTF
          '7 - Обычный текст
          '8 - Вэб-страница
          '9 - Вэб-страница в одном файле
          '10 - Вэб-страница с фильтром
          '11 - XML-документ
          '12 - Word 97-2003 & 6.0/95 - RTF
          '13 - Word 97-2003 & 6.0/95 - RTF
          '14 - Works 6.0 & 7.0
                 .Format = 0 '0 - Документ Word, можно заремарчить или удалить данную строку, что означает .Format = 0
                 .Name = "" 'имя сохраняемого файла ""
                 .Name = "C:\" 'место сораняемого файла, имя сохраняемого файла ""
                 .Name = "C:\Имя" 'место сораняемого файла, имя сохраняемого файла "Имя"
                 .Show 'показать диалог сохранения файла, указываем эту строчку последней
                        
          End With
        0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
        0 пользователей:


        Рейтинг@Mail.ru
        [ Script execution time: 0,0216 ]   [ 16 queries used ]   [ Generated: 27.06.25, 16:59 GMT ]