2015-10-13 5 views
1

У меня есть документ Word, который я хочу, чтобы пользователи могли вставлять другие файлы в.Как открыть браузер файлов и сохранить файл с помощью VBA?

Другие файлы будут разных типов и с собственных дисков пользователя, которые я не могу предсказать.

Вместо того, чтобы им приходится делать это вручную, есть способ кодирования командной кнопки для откройте Проводник, позволяет пользователю выбрать файл (ы), а затем вставлять эти файлы в документ Word,, чтобы позволить им отправить его как один полный документ?

ответ

0

Для файлового проводника, см Application.FileDialog

Чтобы встроить файлы, я предлагаю записать действие в виде VBA макросов, а затем адаптировать макрос для ваших нужд (то есть использовать файл, выбранный с помощью FileDialog).

1

Это должно быть хорошее место для вас, чтобы начать:

Sub SelectFilesToEmbed() 
    Dim dlgOpen As FileDialog, _ 
     objFile As FileDialogSelectedItems, _ 
     wdDoc As Word.Document 
    Set dlgOpen = Application.FileDialog(FileDialogType:=msoFileDialogFilePicker) 

    With dlgOpen 
     .Title = "Select the files to be embedded" 
     .AllowMultiSelect = True 
     .Show 
     If .Show = -1 Then 
      For Each objFile In .SelectedItems 
       wdDoc.Range.InlineShapes.AddOLEObject _ 
            ClassType:="Excel.Sheet.12", _ 
            Filename:=objFile, _ 
            LinkToFile:=False, _ 
            DisplayAsIcon:=False 
      Next objFile 
     Else 
     End If 
    End With 

End Sub 

Вы все еще должны решать проблемы: типы

  1. несколько файлов (здесь код для листа Excel)
  2. Установите текстовый документ, если код не помещается в
  3. Установите на место, куда вы хотите вставлять файлы (закладки или другом месте)

Ссылка, с которой я принял участие вложение: Embed a file into a Word doc using VBA

+0

Спасибо за это, как вы говорите, мне все еще нужно разрешите остальные 3 части. – SNewby

+0

«2» будет полностью прост, для «3» вы найдете много информации, просто использующей закладки в слове VBA. Для «1» лучшим решением будет использовать макрокоманд в Word ** для получения типа файлов (запустить макросъемку, а затем перейти к вкладкам «Вставить» и «Объект» **, затем создать новый объект для каждого типа и очистить код, чтобы иметь свой список). Вы можете отредактировать свой вопрос, чтобы отразить ваши результаты, и мы постараемся помочь вам добраться до вашей конечной цели!;) – R3uK

+0

Спасибо за вашу помощь @ R3uK – SNewby

0

Спасибо всем для чтения/помогающего. Этот проект, к сожалению, теперь был сложен, и поэтому это уже не текущее требование :(Просто не хотелось, чтобы люди тратили время на то, что не может быть сделано.

Смежные вопросы