Excel VBAに効く Vitamin E
フォルダを指定してフォルダ参照ダイアログ(SHBrowseForFolder)を開く[97,2000,2002]
WinAPIのSHBrowseForFolderを使って「フォルダ参照ダイアログ」を開きます。もちろんVB、AccessVBAでも使用できます。
WinAPIのSHBrowseForFolderを使って「フォルダ参照ダイアログ」を開きます。フォルダを指定するには次の2つの方法があります。
1.定数を指定する。SDKには17の定数が指定されています。
2.任意のフォルダを指定する。原因はわかりませんがWinXPでは正常に動作しない場合があります。
Excel97では任意のフォルダを指定できません。これはVBのAddressOf 演算子がサポートされていないためです。
 Source
 SHBrowseForFolder.xlsのダウンロード(SHBrowseForFolder.LZH)

(UPD:02/06/18)