| 横レス失礼 田代正巳さんこんにちは
ここも拡張子が違います↓よ
> .xlsx ではなく .xis でした。
ファイル名の拡張子がxlsxやxls等複数あるならワイルドカードで
ファイル名を指定した方が良いですよ。
フォルダ名やファイル名をダイアログで選択して変数に代入するのが
間違いないですよ。
以下の一括はファイル名を指定する手続きです。
変数宣言 文字列{&初期値 = "D:\",&book}\
,整数{&ok}
手続き実行 フォルダ指定(&初期値)
if (&初期値 = #U )
確認 "フォルダーの指定が出来ませんでした！"
else
確認 "フォルダ名は " + &初期値 + " です"
&book = &初期値 + "*.xls*"
手続き実行 ブック名指定(&book)
if (&book = #U )
確認 "ブック名の指定が出来ませんでした！"
else
確認 "ブック名は " + &book + " です"
エクセル書き出し &book /* ←ワークブック名 */\
,"1234"/* ←ワークシート名 */，\
項目名行 = する,上書き = する,開く = する \
,書式反映 = する,表示 = する,終了状態 = &ok
if(&ok = 0)
確認 "エクセルは正常に終了しました"
else
確認 "エクセルのエラーは " + #str(&ok)+ " 番です"
end
end
end
Proc フォルダ指定(参照 str &フォルダ )
フォルダ名入力 初期値 = &フォルダ\
,プロンプト ="フォルダ名を指定して下さい"\
,許可作業 = *，&フォルダ
End
Proc ブック名指定(参照 str &fname )
ファイル名入力 初期値 = &fname \
,プロンプト = "ファイル名を指定して下さい" \
,許可作業 = * ,&fname
End
|
