«
»

複数ファイル取得 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. #1 by 西澤 - 12月 4th, 2019 at 10:10

    AutoCADのVBAで複数のExcelファイルおよびその中のシートをExcelのVBAの様に自由操作できないのでしょうか。

    上記の方法は試してないのですが、ほとんどの例題は既にアクティブになっているExcelシートを読んでデータを入手しAutoCADVBAで図面を作成するというものです。

    一般には、色々なExcelデータ（シート）からデータを入手したり出力することができないと汎用的なシステムができません。

    自由にExcelシートを扱う方法を、ご存じないでしょうか。

    ‘** 下記はExcelからデータを受けるときに宣言する **
    Set ExcelApp = GetObject(, “Excel.Application”)

    ファイル名およびシート名をセットするには、どうしたらよいのでしょうか。

    Quote

  2. #2 by yuri - 12月 12th, 2019 at 10:30

    すみません、VBAは初心者なもので・・・お役にたてないと思います。

    Autodesk Knowledgeのコミュニティに投稿していただいた方が、
    回答がつく可能性が高いと思います。
    https://forums.autodesk.com/t5/autocad-ri-ben-yu/bd-p/515

    Quote
(will not be published)

  1. No trackbacks yet.