お世話になります
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
VBSで指定行に挿入
その他(プログラミング・Web制作)
-
5
エクセルVBAで、PDFファイルを開きたい
Excel(エクセル)
-
6
メッセージボックスを前面に表示させるには?
Visual Basic(VBA)
-
7
PDFファイルを開かずに印刷したい
Visual Basic(VBA)
-
8
vbscriptで、ファイル選択ダイアログを前面に出したい。
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
このページの状態情報は無効で...
-
SQLサーバーへの接続に 接...
-
VB6でRDOに接続できない
-
[VB6.0] Inet OpenURLのエラー検出
-
SPI通信プロトコル
-
FileCopy時のエラー
-
yahoo検索で1位から、いきなり...
-
ASPでトランザクションをかける...
-
ソケット通信で同時受信の制限?
-
Response.Redirectで引数2つの...
-
式はメソッドではありませんと...
-
画面のリフレッシュを意図的に...
-
Tableを動的に増やしたい。
-
GETで渡されたパラメータを遷移...
-
ASPの実行タイミングを設定したい
-
ASP.NETの拡張子はなぜ「asp」...
-
1つのファイルの中身が多くな...
-
ASPからASPを呼び出す方法
-
ACCESSのAutoKeysマクロでアク...
-
パラメータの値を受け取ってSQL...
マンスリーランキングこのカテゴリの人気マンスリー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をイン...
-
fopenでエラーとなる
-
IIS7.5の設定の仕方
-
エラー内容について
-
ASPプログラミングでADODB.C...
-
ASP.NETで使用しているJavascri...
-
ASPからWscriptを利用して外部...
-
オブジェクト生成エラー
-
VB6でRDOに接続できない
-
オラクル接続をopenしようとす...
おすすめ情報