
Labelにフォルダのパスが入っていて、開くのボタンを押した時に
すでに開いていればそれを表示させたいのですが、
エクスプローラがどこのフォルダを開いているか調べる方法で苦戦しております。
実行中のプロセスをすべて取得して、ひとずつプロセス名を調べて
EXPLORERだったらメインウィンドウタイトルを取得しようと思った
のですが、EXPLORERはフォルダが複数あっても1つしか出ないので
この方法ではだめだと思いました。
そこで、FindWindowというAPIでLabelにある文字列を使って
ウィンドウを探して特定しようと思ったのですが、
これだとC:\だった場合、ウィンドウタイトルに不明なボリューム名が
入るので、まずドライブのボリューム名を調べないとならないのかと
思っているのですが、これ以外の方法で開いているフォルダを調べて
System.Diagnostics.Process型の変数に割り当てる方法がありましたら、
ご教授頂ければ幸いです。
No.1ベストアンサー
- 回答日時:
Shell32.dllとShDocVw.dllを参照設定して
Dim sh As New Shell32.Shell
Dim objWins As SHDocVw.IShellWindows = sh.Windows
For Each oWeb As SHDocVw.InternetExplorer In objWinds
Debug.Print(oWeb.LocationName & " " & oWeb.FullName)
Next
といった具合で取得できますよ
redfox63様いつもご回答をありがとうございます。
今回もこの方法で完璧でした。
便利な手法を教えて頂きましてありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Windows10でコマンドプロンプト...
-
【マクロ】フォルダにファイル...
-
Excelvbaでブックをコピー名前...
-
フォルダを開いて、閉じるのプ...
-
複数選択フォルダの配列への格納
-
バッチファイル フォルダを...
-
デスクトップの画像をhtmlに表...
-
【コマンドプロンプト】名前順...
-
[VBS] Unicodeの文字化けを防ぎ...
-
ファイル名と同名のフォルダを...
-
保存先のフォルダ名を指定した...
-
Excelで指定したフォルダに保存...
-
[VB.net 2003] FileDialogでデ...
-
MATLABで複数のフォルダから情...
-
Debug フォルダは消していいの?
-
機種依存文字を含むフォルダ/フ...
-
フォルダ内のファイルの作成日...
-
VBAでファイル名を指定して保存...
-
エクセルマクロで指定フォルダ...
-
ディレクトリ名変更してコピー...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Windows10でコマンドプロンプト...
-
VBA 最新のフォルダ取得
-
デスクトップの画像をhtmlに表...
-
ファイル名と同名のフォルダを...
-
会社のネットワーク上のファイ...
-
ExcelのVBAでフォルダ指定がで...
-
Excelで指定したフォルダに保存...
-
VBA フォルダの複数選択ができない
-
【マクロ】ファイル名の日付に...
-
VB.NRT FolderBrowserDialogを...
-
【マクロ】フォルダにファイル...
-
ThisWorkbookがあるフォルダ更...
-
ディレクトリ名変更してコピー...
-
(C#)フォルダを指定するダイ...
-
VB6で7-ZIPのAPIを使用した圧縮...
-
VBプロジェクトでのフォルダ構...
-
パス名に2バイト文字(マルチバ...
-
Debug フォルダは消していいの?
-
フォルダにリンクを貼りたい
-
フォルダAから1つのファイルだ...
おすすめ情報