VBA에서 선택한 텍스트를 얻는 방법

Question

선택한 텍스트를 변경하는 매크로가 있으며 버튼에 할당되어 있습니다.

시각적 기본에서 직접 실행하면 완벽하게 작동하지만 단추를 클릭하면 단추가 포커스를 가져오고 텍스트는 더 이상 선택되지 않으므로 매크로는 선택한 요소를 (단추)로 변경합니다.

어떻게 텍스트를 선택하고 버튼을 클릭하여 매크로를 실행할 수 있습니까? 여전히 텍스트를 선택 했습니까?

Answer 1

버튼이 문서에 삽입되어 있습니까? Word 창이나 메뉴/도구 모음 위에로드되는 폼에 놓아야 할 수 있으므로 클릭하면 문서 자체의 선택에 영향을주지 않습니다.

편집 :
나는 당신이 필요로 무엇을 얻을 수 Application.Selection.Previous을 사용할 수 있다고 생각합니다. 이를 사용하여 클릭 이벤트 후 선택 영역을 복원하거나 문서의 해당 섹션 또는 두 가지 모두에 대해 작업 할 수 있습니다.

나는이 이전 버전의 Word에서 사용할 수 있다고 가정 만이 작업을 수행하는 방법 2007 년

Answer 2

에있는 그것의 존재를 확인 False에있는 명령의 설정 TakeFocusOnClick 속성을 설정하는 것입니다있다. 다음은 내가 사용하는 코드입니다.

Private Sub CommandButton1_Click() 
    Dim Sel As Selection 
    Set Sel = Application.Selection 
    If Sel.Type <> wdSelectionIP Then 
     MsgBox Sel.Text 
    End If 
End Sub 

Answer 3

버튼 환경 설정에서 TakeFocusOnClick을 "False"로 변경해야합니다.