| |
▼かみちゃん さん：
>なぜ、組み込みダイアログを使いたいのでしょうか？
理由は無いのです･･･折角このようなテーマに出くわしたので
この方法も記憶に値するかなぁっと思ったのです。
だったら、拡張子の出し方とドライブ文字の指定の仕方
も分かれば･･･とあつかましい欲から聞きました。ごめんなさい。
>[50081]のご質問で、コメントさせていただきました
>GetOpenFilenameメソッドでも、できますよ。
>きちんとヘルプを調べられましたか？
FileName = Application.GetOpenFilename _
("Excel(*.xls),*.xls")
If FileName = "False" Then Exit Sub
このようなコードで美味く行きました。
これは拡張子までは指定できているのですが、ドライブ
レターが指定できておりません。
説明不足でしたが、データはMO(ドライブ文字G）にありまして、
異なる２ヶ所の該当月日のデータをMOを順次開け、貼付け、
その後マクロを
動作させていく一番適切な方法を検討しています。
>また、以下のＵＲＬも参考になると思います。
>ｈｔｔｐ://www.officetanaka.net/excel/vba/file/file02.htm
>
これから見させていただきます。
>> ファイルの場所→リムーバルディスクG
>
>媒体が接続もしくは挿入されていないなど、エラーになる可能性が大きい
>ので、やめたほうがいいと思いますが・・・
>また、外部媒体からExcelを開くこと自体、あまりおすすめできません。
>フロッピーディスクからExcelを開いて、フロッピーディスクを抜いたときに
>トラブルが起きることと同様です。
ありがとうございます。このようなトラブルは避けるようにしたい
のですが、現在必ずMOにデータを残しているので、MOの挿入をしないと
いうエラーの発生はありえないのです･･･でも万が一のことを考え
Exit Subを使ったつもりです。
>
>なお、初期ドライブ、フォルダをしたい場合は、
>ChDrive
>ChDir
>で、カレントドライブとカレントディレクトリを変更しておけばいいと思います。
これは少し調べて見たいと思います。
ありがとうございました。またアドバイス・コメントいただければ幸いです。
失礼します。
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
