2010-01-05 5 views
0

현재 Excel VB 응용 프로그램을 만들고 있습니다. 그러나, 나는 지금 붙어있다. 두 OptionButtons 사이의 선택을 강제로 만들려고합니다. OptionButton.Value가 선택되었는지 확인하려면 어떻게해야합니까?

나는 코드

If Me.PWebOption.Value = False & Me.BWebOption = False Then 
     MsgBox "Please choose a type of website" 
     Exit Sub 
End If 

을 시도하지만 나에게 필요한 결과를 제공하지 않습니다. 나는 그것들을 괄호 안에 넣고 모든 것을 넣으려고했으나 여전히 붙어있었습니다. 나는 이것이 사소한 대답이라고 확신하지만, VB를 제대로 이해하고 있으므로 용서 해주십시오.

미리 감사드립니다.

답변

1

내가 코드를 시도하고 당신이에 & 그리고을 변경 경우가 작동합니다. 나는 2 개의 OptionButton을 만들고 이름을 지정하고 "And"로 문제없이 코드를 실행했습니다.

  • 당신은에 액세스 : 당신의 OptionButtons의

    • 하나 또는 둘 모두가

    거짓되지 않습니다 : 그것은 여전히 ​​한 후 작동하지 않는 경우

    은 내 생각이다 잘못된 OptionButtons.

그것은 모두가 false를 돌려

Debug.Print Me.PWebOption.Value 
Debug.Print Me.BWebOption.Value 
Debug.Print Me.PWebOption 'just for fun' 
Debug.Print Me.BWebOption 

보십시오. 또한 코드의 머리에 Option Explicit을 넣어 실제로 존재하는 객체에만 액세스하고 있는지 확인하십시오.

참고 : 있음 VBA &은 연결에 대해서만 사용되며 : 그리고 And, Not는 논리 연산자입니다.

+0

건배 그것은 내가해야 할 일이었습니다. – Seedorf

1

복사/붙여 넣기 오류인지 여부는 확실치 않지만 첫 번째 부분에서는 .Value으로 전화하고 두 번째 부분에서는 옵션 자체 만 사용하고 있습니다. 코드가 대신해야합니다

If Me.PWebOption.Value = False & Me.BWebOption.Value = False Then 
     MsgBox "Please choose a type of website" 
     Exit Sub 
End If 

(이 두 옵션 모두에서 .Value를 사용하고 있습니다.)

관련 문제