お世話になります
Inputboxで指定したファイル名の一部を、指定したフォルダの中から検索し、部分一致したPDFファイルをAdobeReaderで開くという操作を行いたいのです。
自分でスクリプトを記載したのですが、アドビが開かれた時に「この文書を開くときにエラーが発生しました。ファイル名、ディレクトリ名、またはボリュームラベルの構文が間違っています。」というエラーが発生してしまいます。
以下のどこを修正したら良いのでしょうか?教えていただければ幸いです。
C:\Test フォルダにpdfファイルが入っているものとします
Set fso = CreateObject("Scripting.FilesystemObject")
Set sh = CreateObject("Wscript.Shell")
Set sha = CreateObject("Shell.Application")
FileName = Inputbox("ファイル名を入力してください")
Dim fi
Set fi = sha.NameSpace("C:\Test").Items()
For i = 0 to fi.Count-1
'ファイル名の一部にInputboxで入力した文字の一部が含まれていれば、そのPDFファイルを開く
IF (Instr(fi.Item(i),FileName)>=1) and (FileName<>"") then
sh.run "AcroRD32.exe ""C:\Test\"" & fi.Item(i)"
Exit For
End IF
Next
Set fso = Nothing
Set sh = Nothing
Set sha = Nothing
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
- Visual Basic(VBA) InputBoxでキャンセルボタンを押したらファイル自体を閉じたい 3 2022/07/23 17:52
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- Excel(エクセル) VBA フォルダ見える化のコードについて 2 2023/06/19 15:04
- Visual Basic(VBA) VBA★PDFをPDFアプリで印刷しようと思っていますが上手くゆきません 1 2022/06/06 22:04
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) あるフォルダーのファイルを違う親フォルダーのサブフォルダーに移したい 11 2023/02/15 19:00
- Visual Basic(VBA) サブフォルダ(データ)にある複数の.xlsxファイルのSheet3のA2セルの値で01から左側をB2 2 2022/08/14 15:46
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
VBscriptでPDFファイルを直接印刷できるようにするためには?
Microsoft ASP
-
VBSで起動したアプリが前面表示しない
Visual Basic(VBA)
-
PDFファイルを開き、印刷し、閉じるマクロ
Visual Basic(VBA)
-
-
4
エクセルVBAで、PDFファイルを開きたい
Excel(エクセル)
-
5
VBSで指定行に挿入
その他(プログラミング・Web制作)
-
6
PDFファイルを開かずに印刷したい
Visual Basic(VBA)
-
7
メッセージボックスを前面に表示させるには?
Visual Basic(VBA)
-
8
VBS パスに変数を入れたい
その他(プログラミング・Web制作)
-
9
vbscriptで、ファイル選択ダイアログを前面に出したい。
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【ExcelVBA】値を変更しながら...
-
VBAで大量のファイルをシート名...
-
VBA 何かしら文字が入っていたら
-
【マクロ】1つのマクロの中に...
-
VBA 別ブックからコピペしたい...
-
VBAを使用した時間管理
-
Excelのマクロでワードのテキス...
-
【PowerPoint VBA】緑色の文字...
-
ExcelのVBAコードについて教え...
-
2つのマクロでチェックボックス...
-
VB.net(VB)で、フォームにExcel...
-
FileCopy時のエラー
-
VBA ユーザーフォーム ボタンク...
-
エクセルについて
-
Vba SelStart、SelLen教えてく...
-
VBAで各列の"+"と"o"の合計数を...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
Excel VBA 定義されたプロージ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
C# try-catch でcatchに飛ばす方法
-
FileCopy時のエラー
-
エラー 'ASP 0115' について
-
EXECLマクロでshapeがグルーフ...
-
CreateObject("Excel.Applicati...
-
VBSからPDFファイルを開きたい...
-
winsock通信時エラーの回避
-
ASP.NET C# ローカルのパスが呼...
-
Outlookで添付ファイルの有無を...
-
エラー 'ASP 0115'
-
WinXPProにVC++6.0をイン...
-
IIS7.5の設定の仕方
-
エラー内容について
-
fopenでエラーとなる
-
ASPプログラミングでADODB.C...
-
ASP.NETで使用しているJavascri...
-
ASPからWscriptを利用して外部...
-
オブジェクト生成エラー
-
VB6でRDOに接続できない
-
オラクル接続をopenしようとす...
おすすめ情報