2013-10-22 1 views
-1

사용자 입력을받는 데 사용되는 Excel-VBA 사용자 양식이 있습니다. 사용자가 입력 값을 다시 정의 할 수 있도록 오류가 발생하면이 사용자 양식을 표시해야합니다.오류 발생시 사용자 양식을 표시하는 방법

의사 코드 :

Sub() 
    userform.Show 
    Call Execute 
End Sub 

Sub Execute() 
    Validate the input 
    If input is wrong 
    MsgBox "reselect the input" 
    -here I need to disply the userform- 
End sub 

내가 GoTo Userform 시도 나에게 오류를 정의되지 않음 레이블을 제공합니다. 어떤 제안?

내가 정의 폼 만든
+1

귀하의 질문은 불완전한 조금 불분명하다 당신이 우리가 당신을 위해 너무 많은 코드를 작성 할 것 같습니다. 만약 당신이 정말로 'On Error' 솔루션을 찾길 원한다면 여기서 [VBA] On Error GoTo를 찾거나 [THIS LINK]를 확인하십시오. (http://msdn.microsoft.com/en-us/library/office/gg251688% 28v = 사무실 .14 % 29.aspx). –

답변

0

:

명령 버튼 클릭에 enter image description here

입력이 잘못되면, 입력에 대한 코드를 검사하고,이 메시지 상자에 오류가 표시 한 후 리디렉션을 userform.

개인 서브 CommandButton1_Click()

If TextBox1.Value = "" Then 

    MsgBox ("Please provide the value") 

    UserForm1.Show 

    UserForm1.Repaint 

End If 

최종 하위

PS : 사용자 정의 폼에 "거짓"의 ShowModal 속성을 변경하십시오.

enter image description here

관련 문제