컴파일 오류가 발생했습니다. 인수가 선택 사항이 아닙니다.

Question

내가 할 수없는 문제를 발견 할 것입니다. 아래에서 내가 문제가있는 코드의 이력서를 볼 수 있습니다. combobox1의 값을 변경하면 노란색 "Sub ComboBox1_Change()"및 파란색 "Call TextBox4_Exit"가 강조 표시되어 "컴파일 오류. 인수가 선택 사항이 아닙니다"라는 오류가 표시됩니다. 필요한 인수가 잘못되어 있지만 처리 방법을 모르겠다 고 생각합니다.

도움 주셔서 감사합니다.

먼저

---

Sub ComboBox1_Change() 
If TextBox4.Visible = True And TextBox4.Value <> "" Then 
    Call TextBox4_Exit 
End If 

Sub TextBox4_Exit(ByVal cancel As MSForms.ReturnBoolean) 
    Dim placas As String 
    placas = TextBox4.Value 
    I = 3 
While Range("E" & I).Value <> "" 
    If Range("E" & I).Value = mensaje Then 
     If Range("L" & I).Value = mensaje2 Then 
      If sheet1 = "SIC" Then 
       Range("X" & I).Value = placas 
       TextBox11.Value = Range("Y" & I).Value 
       TextBox10.Value = Range("Z" & I).Value 
      Else 
       Range("U" & I).Value = placas 
       TextBox11.Value = Range("AN" & I).Value 
      End If 
     End If 
    End If 
I = I + 1 
Wend 
End Sub 

Answer 1

, 서브 TextBox4_Exit (MSForms.ReturnBoolean으로 취소 BYVAL) 하나 개의 인수가 있고 TextBox4_Exit를 호출 할 수있는 매개 변수를 전달해야합니다 있도록이 옵션으로 표시되지 것.

둘째, ComboBox1_Change()의 End Sub가 누락 되었습니까?