A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
質問事項を勘違いしているかもですけど。
エクスプローラーを閉じておいてVBAを実行し、最後に
VBAからエクスプローラーを開く
https://e-vba.com/vbatips-3/
を実行するように書いてみるとか?
リンク先のものを試しましたが、エクスプローラを開いていてもダブって開いてしまうので別のやり方で出来ました。
AppActivate とSendKeys を使いました。
On Error GoTo 0 'エクスプローラを閉じた状態で実行した場合AppActivateでエラーになるのを無視する
Dim twPath As String
Dim pos As Long
twPath = ThisWorkbook.Path 'コードが記載してあるExcelファイルがあるパスを指定
pos = InStrRev(twPath, "\")
twPath = Mid(twPath, pos + 1) 'パスの最後のフォルダ名(エクスプローラのタイトルバー)
'指定したフォルダをアクティブにして、「ALT+F5」を実行しフォルダ内容更新
AppActivate twPath, False
SendKeys "%{F5}", True
'SendKeys バグ対策(NUMLOCKが勝手にoffされるので戻す)
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "{NUMLOCK}"
Set WshShell = Nothing
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) VBA 最新のフォルダ取得 1 2022/04/15 15:51
- Excel(エクセル) ファイル一覧表を使ったファイルの移動 5 2022/08/10 15:37
- Excel(エクセル) Excel VBAでフォルダが何層にもなっていて最下層の中にCSVファイルがあり最上層のファイルを指 4 2022/06/08 20:41
- Excel(エクセル) フォルダAから1つのファイルだけを、フォルダBへを移動するVBAについて 2 2022/07/25 11:45
- Excel(エクセル) 【VBA】指定フォルダに格納中のテキストファイルをエクセルで処理し結果のエクセルを新規フォルダに保存 1 2022/03/25 14:19
- Visual Basic(VBA) Excelのマクロについて教えてください。 作業フォルダ内に2つのファイルがあります。 このファイル 2 2023/07/09 13:40
- グループウェア 一太郎がイントラで開けません。対処方法を知りたいです。 3 2023/04/04 13:30
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/02 11:48
- Excel(エクセル) ExcelVBA メモ帳を起動し名前を付けて指定フォルダに保存 2 2022/04/18 13:15
- Excel(エクセル) Excel VBAどこが間違ってますか? 4 2023/07/17 10:04
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
エクセルで参照しているデータを常に最新の状態にしたい
Excel(エクセル)
-
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
エクセルでエラーが出て困っています。
Excel(エクセル)
-
-
4
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
5
VBA 最新のフォルダ取得
Excel(エクセル)
-
6
コマンドボタンやイメージにマウスをのせるとボタン名を表示したい
Excel(エクセル)
-
7
VBAで、なぜかSendkeyが効きません。
PowerPoint(パワーポイント)
-
8
VBAでネットワークコンピュータのファイルにアクセスできない(XL2000)
Access(アクセス)
-
9
「Columns(A:C")」の列文字を数字にして表記したい"
Excel(エクセル)
-
10
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
11
エクセルVBAでマルチページの切り替え方法の件で
Excel(エクセル)
-
12
エクセルVBAで5行目からオートフィルタモードに設定したいたい
Excel(エクセル)
-
13
ファイルを開かずにマクロを実行
Excel(エクセル)
-
14
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
15
エクセルで1列に500行並んだデータを5列毎に改行
Excel(エクセル)
-
16
VB.NETでフォルダの一覧を更新する方法
Visual Basic(VBA)
-
17
指定したフォルダーを最前面表示にする方法
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Windows10でコマンドプロンプト...
-
ファイル名と同名のフォルダを...
-
フォルダにリンクを貼りたい
-
ディレクトリ名変更してコピー...
-
保存先のフォルダ名を指定した...
-
平日出力されるログを月次処理...
-
pythonでDepixを起動
-
フォルダ選択ダイアログ:ネッ...
-
VBA 最新のフォルダ取得
-
EXPLORERで開いているフォルダ...
-
Excel VBA マクロ リストボックス
-
エクセルマクロで指定フォルダ...
-
Access VBA で フォルダ権限...
-
エクセルのデータをメモ帳に貼...
-
Pythonの作業環境・作業フォル...
-
Excelで指定したフォルダに保存...
-
会社のネットワーク上のファイ...
-
指定フォルダからファイルを全...
-
ツリービューを使って、エクス...
-
フォルダのサイズを一覧にした...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Windows10でコマンドプロンプト...
-
windowsでテキストファイルの各...
-
VBA 最新のフォルダ取得
-
ファイル名と同名のフォルダを...
-
VBA フォルダ名に特定の文字を...
-
デスクトップの画像をhtmlに表...
-
Excelのハイパーリンクについて...
-
フォルダ内のPDFファイル名を変...
-
Excelで指定したフォルダに保存...
-
会社のネットワーク上のファイ...
-
【マクロ】ファイル名の日付に...
-
保存先のフォルダ名を指定した...
-
多量のファイルをフォルダに自...
-
パス名に2バイト文字(マルチバ...
-
ディレクトリ名変更してコピー...
-
Access VBA で フォルダ権限...
-
C ファイル出力で、フォルダが...
-
サーバ内のフォルダ名と各フォ...
-
フォルダにリンクを貼りたい
-
vbsで選択ダイアログを表示した...
おすすめ情報