Excelのこととか色々

マクロをどんな Excel ファイルにも実行できるように設定して、3秒かかる操作も1秒で完了。あといろいろ書いてみます・・・

【VBAスタンダードに挑戦!】エラー対策(エラー対応/On Error GoTo)

【VBAスタンダードに挑戦!】

f:id:tuna-kichi:20200614200940p:plain

 

本日の5分勉強の内容

 

 

********************************************************

エラー処理

・エラーが発生した場合の処理を準備しておき、
 エラーが発生したときのその処理を実行させる

On Error GoTo ラベル名 
 コードの最初、またはエラーが発生すると予想される箇所に記述する

ラベル名:(コロンも必要)
 コロン以下にエラーの時の処理を記述する

                    

Sub Sample100

 Dim Num As Long 

On Error GoTo Warn

 Num = InputBox("数字を入力してください")
 MsgBox Num & " です。"
 Exit Sub 'エラー処理に進んでしまうので、ここで終了させる

Warn: '数字が入力されなかった場合の処理
MsgBox "数字ではありません"

 

End Sub

 

 

_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

にほんブログ村 子育てブログ 幼稚園児育児へ
にほんブログ村
にほんブログ村 英語ブログ 初心者英語へ
にほんブログ村
にほんブログ村 IT技術ブログ VBAへ
にほんブログ村

==================================

  Graspyで無料プログラミング講座を受講する