«
»

複数ファイル取得 VBA


GetOpeFilename が Word にはないので、
Excelを利用するらしい。

Sub test()
Dim varFile As Variant
With CreateObject("Excel.application")
varFile = .GetOpenFilename(FileFilter:="Wordファイル,*.doc", MultiSelect:=True)
End With
End Sub

This entry was posted on 水曜日, 10月 24th, 2007, 12:52 PM and is filed under Word. You can follow any responses to this entry through RSS 2.0. You can leave a response, or trackback from your own site.

  1. No comments yet.
(will not be published)
  1. No trackbacks yet.