2012-02-10 3 views
1

확인란을 클릭했는지 여부에 따라 다른 텍스트가 표시되는 확인란 (ckeckable)과 텍스트 상자 (텍스트 필드)가있는 MS Word 2010 문서를 만들고 싶습니다. ...Word 2010의 텍스트 상자를 수정하기위한 확인란

나는 그것을 위해 검색을 시도했지만 어떻게 든 모든 제안은 체크 박스 질문에 대한 솔루션으로 의미되지 않습니다

내가 솔루션 Visual Basic에서 사용하는 것을 생각?

답변

2

이와 비슷한?

Private Sub CheckBox1_Change() 
    If CheckBox1.Value = True Then 
     TextBox1.Text = "Checked!" 
    Else 
     TextBox1.Text = "Unchecked." 
    End If 
End Sub 

이것은 당신이 CheckBox1라는 체크 박스와 TextBox1라는 텍스트 상자를 가정합니다. 위의 코드는 ThisDocument 모듈에 있습니다.

결과는 다음과 같습니다. enter image description here 및이 enter image description here.

EDIT 나는 Excel에서 이러한 사진을 만들었습니다 ... 오, 음, Word에서 거의 동일하게 보입니다.

EDIT 이제 요구 사항을 변경했으며 확인란을 선택 취소하면 텍스트 상자가 "숨겨지기를"원했습니다. 이 공식적인 방법을 "숨기기"텍스트 상자는 없지만, 당신은 그것의 배경과 구별되도록은 "침몰"특수 효과뿐만 아니라 포함 된 텍스트, 즉 눈에 보이는 기능을 제거 할 수 있습니다

Private Sub CheckBox1_Change() 
    If CheckBox1.Value = True Then 
     TextBox1.Text = "Checked!" 
     TextBox1.SpecialEffect = fmSpecialEffectSunken 
    Else 
     TextBox1.Text = "" 
     TextBox1.SpecialEffect = fmSpecialEffectFlat 
     'Textbox is now "invisible" 
    End If 
End Sub 
+0

예, 그런 식으로,하지만 내가 그것을 인쇄하고 싶을 때, 상자는 여전히 종이에 빈 공간의 간격을 남겨두고 있습니다 - 그것은 "숨겨진 상자가 활성화되어 있지 않을 때 해결할 수 있습니까?" 또는 그런 무엇인가? – Nowacki

+0

방금 ​​테스트 한 결과 나에게 잘 인쇄됩니다 ... 확인란이 인쇄됩니까? BTW이 답변이 유용하다고 생각되면 왼쪽에있는 체크 표시를 클릭하여 동의하십시오. –

+0

Jean, Francis, 체크 박스가 선택되어 있지 않을 때 텍스트 상자를 숨기고 싶습니다. 체크 할 때 표시됩니다. 어떻게 할 수 있는지 알고 계십니까? 그렇다면, 나는 botton에게 답을 해 주었으면 좋겠다 :-) – Nowacki

관련 문제