Wie kopieren Sie rohe Microsoft Word-Feldcodes in ein anderes Textdokument?

7674
Faye Dyce

Ist es möglich, Text aus einem Word-Dokument zu kopieren, das Feldcodes enthält, so dass die FELD-CODES ALS RAW TEXT bleiben, wenn sie in eine andere Anwendung kopiert werden. dh so etwas

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

anstatt die Feldcodes entfernt zu haben?

0
Vielleicht habe ich es nicht sehr klar erklärt. Ich möchte nicht einzelne Feldcodes einzeln ausschneiden und einfügen, sondern den gesamten Text des gesamten Dokuments mit den Feldcodes, die erhalten bleiben. Faye Dyce vor 14 Jahren 0
Sie haben es geschafft, zwei Konten zu erstellen. E-Mail an team@superuser.com, um sie zusammenzuführen. ChrisF vor 14 Jahren 0

2 Antworten auf die Frage

0
WireGuy

Press Alt+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

In Office 2010 kann die ALT + F9-Version nicht mehr überprüft werden. integratorIT vor 12 Jahren 0
0
integratorIT

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
Damit dieser Code ausgeführt werden kann, müssen Sie dem Formular Microsoft 2.0-Verweise hinzufügen. Es befindet sich c: \ windows \ system32 \ FM20.dll. Obwohl der Code den Text kopiert, der den Feldcode darstellt, geht die Formatierung beim Kopieren leider verloren. Wenn Sie wieder einfügen, handelt es sich einfach um Text. TWood vor 6 Jahren 0

Verwandte Probleme