マクロで同じフォルダにある画像を開くコードを教えてください。
JPGの画像ファイルに関連づけられているアプリケーションを起動して画像データを表示させたいのですが、データの場所が共有のネットワーク上にあり、エラーが出てしまいます。
そこで・・・同じフォルダ内にある画像データを開く設定にしたいのですが、どうしたらよいのかさっぱりわかりません。
どうぞご教授ください。
よろしくお願いします。
Sub Sample()
With CreateObject("Wscript.Shell")
.Run "共有ネットワーク上のデータ.JPG", 5
End With
End Sub
A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
以下のような感じでしょうか
Dim TargetPath
Dim TargetFileName
Dim TargetFilePath
TargetFileName="データ名.jpg"
Set objShell = CreateObject( "WScript.Shell" )
TargetPath = objShell.CurrentDirectory
Set objShell = Nothing
TargetFilePath = TargetPath + "\" + TargetFileName
CreateObject("Shell.Application").ShellExecute TargetFilePath
回答ありがとうございます。
助かります!!
すみません・・・・
ネットワーク上においても、デスクトップにおいても同様のメッセージで
C:\Users\PC名\Documentsデータ名.jpg が見つかりませんと出ます。
Documentsフォルダにおいていないとできませんか・・・?
No.2
- 回答日時:
おそらくVBSですよね
Dim TargetFilePath
TargetFilePath = "共有ネットワーク上のデータ.JPG"
CreateObject("Shell.Application").ShellExecute TargetFilePath
で、いけるとおもいます
回答ありがとうございます!!
VBSです・・・
データの場所を、特定せずに(C\フォルダ\データ名.jpgのように・・・)
データ名.jpg だけで表示することができますか??
エクセルデータの場所が変わることがあるので、一緒のフォルダに画像を置いておけば、画像が開くよういしたいのですが・・・
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 【マクロ】フォルダを2つのモニターの定位置に並べたい 2 2022/09/02 01:14
- Excel(エクセル) 【マクロ】フォルダを3つ、POモニター上に、決まった並べ方をしたい 4 2022/08/31 11:05
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/10 11:34
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 12:30
- Excel(エクセル) エクセルのマクロについて教えてください。 3 2023/02/07 14:47
- Excel(エクセル) エクセル VBA For Next 繰り返しの書き方を教えてください 6 2022/09/01 14:11
- Visual Basic(VBA) エクセルのマクロについて教えてください 物件ごとのフォルダを作成してます そのフォルダ内にサブフォル 2 2023/07/02 17:58
- Visual Basic(VBA) VBAでの共有パスにつきまして 1 2023/03/04 17:24
- Excel(エクセル) 【マクロ】フォルダAからダBへファイルを、ファイルの更新日時の条件で、1つづつ移動するには? 3 2022/08/25 09:56
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/05/26 17:13
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
教えて下さい
-
【エクセル】測定時間がバラバ...
-
エクセルで2つの時系列のデー...
-
配列でデータが入っている要素...
-
S9タイプからXタイプにデータ...
-
VBA 空白セルを削除ではない方...
-
バーコードリーダーの読込デー...
-
ActiveReportについて
-
ブレーカー落ちで壊れたりしな...
-
CString型の文字列連結について
-
この行は既に別のテーブルに属...
-
メモ帳(テキストデータ)をExc...
-
DataGridViewのデータの引渡し...
-
[エクセル]データの個数が2番目...
-
シーケンサにパソコンからアク...
-
ハミング窓関数とFFT(高速フー...
-
パースとはなんですか?
-
VB6でCSVの取込をする
-
send-recvで複数データの送受信
-
C# ソケット通信でデータ受信時...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
教えて下さい
-
配列でデータが入っている要素...
-
【エクセル】測定時間がバラバ...
-
メモ帳(テキストデータ)をExc...
-
この行は既に別のテーブルに属...
-
VBAを使ってOutlookメール本文...
-
VBA 空白セルを削除ではない方...
-
S9タイプからXタイプにデータ...
-
多量のSUMIF式を軽くしたい
-
Accessで該当データにフラグを...
-
[C言語] コメント文字列を無視...
-
[エクセル]データの個数が2番目...
-
エクセルで2つの時系列のデー...
-
特定のデータの抽出方法を教え...
-
外部データの更新がうまくでき...
-
ActiveReportについて
-
CString型の文字列連結について
-
ユーザーフォームのテキストボ...
-
カンマからスラッシュに
-
シーケンサにパソコンからアク...
おすすめ情報