VBAユーザーフォームは機能を認識しませんか？

Question

Private Sub ROLparameter_Click() 
Line1: RolLow = InputBox("Please enter the lower bound percentage for ROL calculation between 0 and 100 (initially " & RolLow * 100 & "%):") 

If Not 0 <= RolLow <= 100 Then GoTo Line1 
End If 

End Sub 

私はユーザフォームボタンを持っていますが、これを押すとこのサブフォームに入ります。問題は "if if without if"というエラーが発生することです。私は最後のifを削除すると、それは不思議に動作します。

など。

ユーザーが80を入力するとRolLowの値が「80」と認識されます。それがend subに向かわない場合、私は "if"だけを使うと、常に1行目に向かいます。値のチェックがありません。

このコードは通常、モジュールで動作します。

何が問題なのですか？

（変数は潜水艦の前に国民に定義されています）

（私もmodule.variableの事を試してみました）

Answer 1

これは、あなたが実行しようとしているコードです： ユーザーが0よりも小さい値を入力した場合または100は、InputBox関数バックに行く

Private Sub ROLparameter_Click() 

Line1: Rollow = CLng(InputBox("Please enter the lower bound percentage for ROL calculation between 0 and 100 (initially " & Rollow * 100 & "%):")) 

If Not ((0 <= Rollow) And (Rollow <= 100)) Then 
    GoTo Line1 
End If 

End Sub