UWSCを使っていますが、エラーが出て停止してしまいます。

エラー内容;
XLGETDATA Erro 例外が発生しました
9行目 dd = XLGETDATA(Excel, "Q2")

エラーが出ないようにするか、又はエラーが出てもスクリプトがストップしないようにしたいのですがどのように対処すれば良いでしょうか。

スクリプト内容:
soundfile1="d:\rs01.wav"
soundfile2 = "d:\ピロロン.wav"

Excel = XLOPEN("D:\データ.xlsm")
XLACTIVATE(Excel, "Sheet1")
aa=1

while 1
dd = XLGETDATA(Excel, "Q2")

if dd=1 then
sound(soundfile1,true)
if aa=1 then
Exec("2500_up")
aa=aa+1
endif
endif

if dd=-1 then
sound(soundfile2,true)
if aa=1 then
Exec("2500_down")
aa=aa+1
endif
endif

if dd="" then aa=1

wend

回答の条件
  • 1人5回まで
  • 13歳以上
  • 登録:2013/02/21 11:23:16
  • 終了:2013/02/21 13:35:28

ベストアンサー

id:taknt No.1

きゃづみぃ回答回数13481ベストアンサー獲得回数11982013/02/21 11:36:41

ポイント1000pt

エラー処理は UWSCのヘルプから引用して

 // TRY - EXCEPT 実行時エラーが起きた時に実行されます
 TRY
   処理(エラー)
 EXCEPT
   処理
 ENDTRY


となりますので

dd = XLGETDATA(Excel, "Q2")


TRY
dd = XLGETDATA(Excel, "Q2")
EXCEPT
dd=0
ENDTRY

といったような感じにすると エラーになったとき 取得した値が
0だったということになります。

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません