Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


43924 / 76732 ←次へ | 前へ→

【37834】Re:別シートのPublic関数からのエラー取得
お礼  小川  - 06/5/19(金) 20:57 -

引用なし
パスワード
   ▼ichinose さん:

ご指示頂いた方法でもうまくいきました。

別シートへの呼び出しが頻繁にある場合など
以下の方が簡潔で具合がよいですね。

丁寧なフォロー有難うございます。


>>>----------------------------------------------------
>>><Sheet1>
>>>Public Sub test()
>>>On Error GoTo ERR_ROUTINE
> dim sht as object
> set sht=sheet2
> sht.testSub
>>'としもOKでした
>>'因みに
>'このtestsubをThisworkbookに置いたばあいも
>' dim wbk as Object
>' Set wbk=thisworkbook
>'  wbk.testsub
>'でOKです。
>
>>>
>>>Exit Sub
>>>ERR_ROUTINE:
>>>  Debug.Print Err.Description
>>>End Sub
>>>
>>> <Sheet2>
>>>Public Sub testSub()
>>>  Call Err.Raise(10003, , "test1")
>>>End Sub
>>>
>>>----------------------------------------------------
>>
>>
>
>
>これも試してみて下さい。

2 hits

【37829】別シートのPublic関数からのエラー取得 小川 06/5/19(金) 18:34 質問
【37831】Re:別シートのPublic関数からのエラー取得 ichinose 06/5/19(金) 19:28 発言
【37832】Re:別シートのPublic関数からのエラー取得 小川 06/5/19(金) 20:36 お礼
【37833】Re:別シートのPublic関数からのエラー取得 ichinose 06/5/19(金) 20:42 発言
【37834】Re:別シートのPublic関数からのエラー取得 小川 06/5/19(金) 20:57 お礼

43924 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free