if/then 내의 대문자로 선택

Question

사용자 정의 폼에 ToggleButton (TB) 및 ComboBox (CB)가있는 경우 TB.value = True 인 경우 올바른 파일을 삽입하기위한 CB.value를 결정해야합니다.

TB.value를 처리하기 위해 if/then 문을 사용하고 있습니다. (저는 이것을 userform의 다른 토글에 사용했으며 독자적으로 효과적이었습니다 .CB.value를 처리하기 위해 시도하고 있습니다. 선별 된 case 문을 사용합니다.

을 나는 경우/다음 문 내에서 선택 case 문으로 스크립트를 실행하면, 내가 파일 삽입지고 있지 않다. 여기

을 포함, 내 코드의 예입니다 CB 초기화를 나열하는 방법 :

Private Sub CommandButton1_Click() 

CreateObject (Word.Application.Documents.Add) 

If ToggleButton1.Value = True Then 
Select Case File 
    Case ComboBox1.Value = "File A" 
     Selection.InsertFile FileName:="C:\File A" 
    Case ComboBox1.Value = "File B" 
     Selection.InsertFile FileName:="C:\File B" 
    End Select 
Else: 
    ToggleButton1.Value = False 
End If 

Unload Me 

End Sub 



Private Sub Userform_Initialize() 

With ComboBox1 
    .AddItem "File A", 0 
    .AddItem "File B", 1 
    End With 

End Sub 

누군가 내가 왜 위의 방법을 사용하여 파일을 삽입 할 수 없는지 알아내는 것을 도울 수 있다면, 그것은 인정 될 것입니다. 이렇게하는 더 좋은 방법이 있다면, 나는 또한 그것을 듣고 싶습니다!

미리 감사드립니다.

Answer 1

당신의 선택의 경우는 오류가 :

Select Case ComboBox1.Value 
    Case "File A" 
     Selection.InsertFile FileName:="C:\File A" 
    Case "File B" 
     Selection.InsertFile FileName:="C:\File B" 
    End Select 

당신은 당신이 선택 케이스 라인과 사례 라인의 가능한 결과에 테스트하는 것을 넣어.