把 剪貼簿(剪貼板)(Clipboard) 的內容 當作 純文字 (pure text) 貼到 插入點 (insertion point) 的位置; Paste Clipboard content as pure text

' -   -   -   -   -   -   -   -   -   -   -   -   -
' -   -   -   -   -   -   -   -   -   -   -   -   -
Public Sub PasteClipboardContentAsPureText_2009_0920_()
' (本段程式之目的) Purpose:
'     Paste Clipboard content as pure text
'
'     把 剪貼簿(剪貼板)(Clipboard) 的內容 當作 純文字 (pure text) 貼到 插入點 (insertion point) 的位置
'
' (本段程式是否已經在被使用中) In use: Yes
' (程式撰寫的進度) Developing: 100% (Mandatory)
' (程式堪用的程度) Workable: 80% (Threshold at 80%)
' (程式的測試程度) Code tested: 0% (max 99%)
' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
' (修改程式的日期) Revision Date: (2009 09 20 PM 02 47 51)
' (修改程式的人員) Revised by: WeiJin Tang (湯偉晉)
'     ok
' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

'    Selection.PasteAndFormat (wdPasteDefault)

    Selection.PasteAndFormat wdFormatPlainText
   
    Selection.TypeParagraph

End Sub ' PasteClipboardContentAsPureText_2009_0920_
' -   -   -   -   -   -   -   -   -   -   -   -   -
' -   -   -   -   -   -   -   -   -   -   -   -   -