![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
No.2ベストアンサー
- 回答日時:
もう一つ
Function 子() as Integer
Dim i As Integer
子 = 0
For i = 0 To 5
If 3 < i Then
'' ここで親も終了したい
子 = -1
Exit Function
End If
MsgBox i
Next
End Sub
Sub 親()
if 子=0 Then
MsgBox "エラーならここまで来ないで"
End If
End Sub
No.1
- 回答日時:
Endをいれてみては?
Sub 子()
Dim i As Integer
For i = 0 To 5
If 3 < i Then
'' ここで親も終了したい
End
End If
MsgBox i
Next
End Sub
Sub 親()
子
MsgBox "エラーならここまで来ないで"
End Sub
この回答へのお礼
お礼日時:2004/10/01 14:50
End!
そんなステートメントがあったんですね。
Excel VBAリファレンス書2冊ほどひっくり返してみたのですがわかりませんでした。ありがとうございました!上のFunction返しパターンもありがとうございます!!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) なぜExit Subがあるのかわかりません 4 2023/02/19 12:34
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) オブジェクトが見つかりません 1 2023/06/24 19:43
- Visual Basic(VBA) 動きっぱなしです。止め方とプロシージャの間違いを教えて下さい! 5 2022/08/15 23:08
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
- Visual Basic(VBA) ①ExcelVBAでカレンダーを作り、別のユザーフォームで日付を入力したいのですがエラーになります。 1 2023/02/17 18:39
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
- Visual Basic(VBA) VBA 行削除した連番 4 2023/06/27 16:00
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
UserForm1.Showでエラーになり...
-
String""から型'Double'への変...
-
文字列内で括弧を使うには
-
VBAでfunctionを利用しようとし...
-
マクロで"#N/A"のエラー行を削...
-
VBA データ(特定値)のある最...
-
【VBA】ワークブックを開く時に...
-
実行時エラー 438 の解決策をお...
-
On ErrorでエラーNoが0
-
「実行時エラー '3167' レコー...
-
ApplicationとWorksheetFunctio...
-
paizaで下記コードを提出すると...
-
実行時エラー'-2147467259(8000...
-
【VBAエラー】Nextに対するFor...
-
エクセルVBA 「On Error GoTo...
-
VB.net 重複チェックがしたいです
-
error C2664: 'LPCTSTR' に変換...
-
VB2008 comboboxを連動させた...
-
インポート時のエラー「データ...
-
お助けください!VBAのファイル...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
UserForm1.Showでエラーになり...
-
String""から型'Double'への変...
-
マクロで"#N/A"のエラー行を削...
-
VBAでfunctionを利用しようとし...
-
文字列内で括弧を使うには
-
実行時エラー 438 の解決策をお...
-
エクセル関数を教えてください
-
On ErrorでエラーNoが0
-
お助けください!VBAのファイル...
-
VBA データ(特定値)のある最...
-
【VBA】ワークブックを開く時に...
-
インポート時のエラー「データ...
-
実行時エラー'-2147467259(8000...
-
マクロの「SaveAs」でエラーが...
-
WindowsでのPythonの挙動について
-
ApplicationとWorksheetFunctio...
-
Excel vbaについての質問
-
エクセルVBA 「On Error GoTo...
-
Filter関数を用いた結果、何も...
-
ACCESSで値を代入できないとは?
おすすめ情報