• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:エクセルVBAでの呼出操作をマクロ化するには?)

エクセルVBAでの呼出操作をマクロ化する方法

このQ&Aのポイント
  • エクセル2000でのVBAを使用して、ファイルの呼出(開く)操作をマクロ化する方法を教えてください。
  • 呼び出すファイル名は決まっていなくて、フォルダ名は固定です。具体的には、ドライブDの「作業用」フォルダを開きたいです。
  • 現在のコードでは、ChDir関数を使用してフォルダを指定し、Workbooks.OpenText関数でファイルを開こうとしていますが、正しく動作しません。どのように修正すればよいでしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
  • watabe007
  • ベストアンサー率62% (476/760)
回答No.1

Dim strRet As String ChDrive "D:\作業用" ChDir "D:\作業用" strRet = Application.GetOpenFilename(Title:="ファイル名を選択して下さい") If strRet = "False" Then   MsgBox "キャンセルが選択されました。処理を中止します。", vbCritical   Exit Sub Else   Workbooks.Open Filename:=strRet End Sub

SHI-UE
質問者

お礼

早々なるご回答ありがとうございます。 また、ご親切にも、キャンセル時まで組み込んでいただき助かりました。 プロですね!また宜しくお願い致します。

関連するQ&A

専門家に質問してみよう