Het verwerken van informatie geplakt uit een PDF-bestand

Zach is voortdurend plakken van citaten uit PDF-bestanden naar het lichaam van zijn Word-documenten. Hij wil graag een macro specifiek hebben voor het plakken van PDF die plakt zonder enige opmaak en verwijdert automatisch de paragraaf pauzes die aan het eind van elke regel van de geplakte tekst.

Het is relatief eenvoudig om te werken met tekst op deze manier in een macro. Het enige wat u hoeft te doen is de informatie uit het Klembord te verplaatsen naar een string variabele. Zodra het in de variabele, is er niet langer enige opmaak in verband met de tekst en u kunt zoeken naar en vervang de paragraaf pauzes. De volgende macro voert beide stappen:

Sub PastePDFClean ()
Dim MyData Zoals DataObject
Dim sTextIn als Koord
Dim x As Integer
Dim y As Integer

Stel MyData = Nieuwe DataObject
MyData.GetFromClipboard
sTextIn = MyData.GetText

x = InStr (sTextIn, vbCr)
y = 1
Terwijl x> 0
sTextIn = Links (sTextIn, x - 1) & Mid (sTextIn, x + 1)
y = x + 1
x = InStr (y, sTextIn, vbCr)
Zich begeven

Selection.TypeText sTextIn
Stel MyData = Nothing
End Sub

Vergeet niet; de macro werkt op wat er in het Klembord. Dus, om de macro goed te draaien op een PDF-selectie, moet u de selectie naar het klembord en de schakelaar te kopiƫren naar uw Word-document voordat u de macro uitvoert.

WordTips is uw bron voor kosteneffectieve Microsoft Word training. (Microsoft Word is de meest populaire tekstverwerker in de wereld.) Deze tip (583) van toepassing op Microsoft Word 97, 2000, 2002 en 2003. U kunt een versie van deze tip voor de ribbon-interface van het Woord (Word 2007 en later) hier: verwerken van informatie geplakt uit een PDF-bestand.