[ホーム] ＞ [VBScript FAQ 一覧] ＞ ["実行時エラー 5: プロシージャの呼び出し、または引数が不正です。"の原因と対処]

"実行時エラー 5: プロシージャの呼び出し、または引数が不正です。"の原因と対処 | VBScript / VBA FAQ

実行時エラー 5

テキストファイルから文字を読み込みExcelのセルに代入しようとしたところ、エラーが発生しました。

Excelの開発コードで実行した VBA (Visual Basic for Applications) コード。



With FSO.OpenTextFile("c:\temp\OpenTextFileTest.txt", iomode:=2, Create:=True)

.Write Range("D" & i).Value & vbCrLf

発生したエラー。



"実行時エラー 5: プロシージャの呼び出し、または引数が不正です。"

原因と対処

VBAの文字列はUFT-8として扱われるようです。この場合文字列にUTF-8に存在してShift-JISに存在しない文字列を書き出そうとした、かつファイルがShift-JISの場合このエラーが発生するようです。

ファイルをUTF-8で保存してから、以下のとおり開くファイルの種類をUnicode指定して改善するか確認してください。（Format:=-1で文字コードを指定）



With FSO.OpenTextFile("c:\temp\OpenTextFileTest.txt", iomode:=2, Create:=True, Format:=-1)

.Write Range("D" & i).Value & vbCrLf

format 引数の方法

format 引数は以下の通りです。

定数値説明
-2 システムの既定の設定でファイルを開く。
-1 Unicode 形式でファイルを開く。
0 Ascii 形式でファイルを開く。

[ホーム] ＞ [VBScript FAQ 一覧]

(ご注意) 本サイト内の内容を使用して発生したいかなる時間的損害、金銭的損害あるいはいかなる損害に対して、いかなる人物も一切の責任を負いません。あくまでも個人の判断で使用してください。
本サイト内掲載されている情報は、著作権法により保護されています。いかなる場合でも権利者の許可なくコピー、配布することはできません。
このページはリンクフリーです。(このページへの直接リンクも可能です。)
雑誌等での紹介は特に連絡は不要です。
Copyright(c) tooljp.com 2007-2019