How do you copy raw Microsoft Word fields codes to another text document?

Question

Is it possible to copy text from a Word document containing field codes, so that when asted into another application, the FIELD CODES REMAIN AS RAW TEXT. i.e. something like

This is about whales { XE "Cetations:Whales" }. This is about dolphins { XE "Cetations:Dolphins" }.

rather than have the field codes stripped out?

Answer 1

Press Shift+F9 to show the field code, then highlight all the text inside the braces {}. You can they copy and paste this text.

Here's a link to a macro someone wrote to do all the work: Copy and Pasting Field Codes

Answer 2

Add macro to document, select text, run macro, You can now copy fields codes to clipboard.

Ps. in office 2010 ALT+F9 is used to display fields codes.

Sub StuffFieldCode()
    Dim sField As String
    Dim sTextCode As String
    Dim bSFC As Boolean
    Dim MyData As DataObject
    Dim sTemp As String
    Dim J As Integer

    Application.ScreenUpdating = False

    If Selection.Fields.Count = 1 Then
        bSFC = Selection.Fields.Item(1).ShowCodes
        Selection.Fields.Item(1).ShowCodes = True
        sField = Selection.Text
        sTextCode = ""
        For J = 1 To Len(sField)
            sTemp = Mid(sField, J, 1)
            Select Case sTemp
                Case Chr(19)
                    sTemp = "{"
                Case Chr(21)
                    sTemp = "}"
                Case vbCr
                    sTemp = ""
            End Select
            sTextCode = sTextCode & sTemp
        Next J

        Set MyData = New DataObject
        MyData.SetText sTextCode
        MyData.PutInClipboard

        Selection.Fields.Item(1).ShowCodes = bSFC
    End If

    Application.ScreenUpdating = True
End Sub