Devcafe: 새 문서: ===autoit 선택된 문자 복제 함수 === * msdn 함수 Sub GetSelectedText() On Error Resume Next Err.Clear Dim oText As TextRange ' Get an object reference to the selected text range. Set oText = Activewindow.Selection.TextRange ' Check to see whether error occurred when getting text object ' reference. If Err.Number <> 0 Then MsgBox "Invalid Selection. Please highlight some text " _...

2024-10-04T17:26:47Z

새 문서: ===autoit 선택된 문자 복제 함수 === * msdn 함수 <source lang=sql> Sub GetSelectedText() On Error Resume Next Err.Clear Dim oText As TextRange ' Get an object reference to the selected text range. Set oText = Activewindow.Selection.TextRange ' Check to see whether error occurred when getting text object ' reference. If Err.Number <> 0 Then MsgBox "Invalid Selection. Please highlight some text " _...

새 문서

===autoit 선택된 문자 복제 함수 ===
* msdn 함수
<source lang=sql>
Sub GetSelectedText()

On Error Resume Next
Err.Clear

Dim oText As TextRange

' Get an object reference to the selected text range.
Set oText = Activewindow.Selection.TextRange

' Check to see whether error occurred when getting text object
' reference.
If Err.Number <> 0 Then

MsgBox "Invalid Selection. Please highlight some text " _
& "or select a text frame and run the macro again.", _
vbExclamation
End

End If

' Display the selected text in a message box.
If oText.Text = "" Then
MsgBox "No Text Selected.", vbInformation
Else
MsgBox oText.Text, vbInformation
End If

End Sub
</source>
[[category:autoit]]

Autoit 선택된 문자 복제 함수 - 편집 역사