Also, ich habe ein Makro für Word gefunden, der die E-Mailadressen, und die ganze Zeile gelb hinterlegt. Nun möchte ich aber diese so markiert haben, dass man die Ausschneiden kann also Copy/Paste. Kann einer dieses Makro umändern?
Sub Test()
Dim para As Word.Paragraph
For Each para In ActiveDocument.Paragraphs
If InStr(1, para.Range.Text, "@", vbBinaryCompare) > 0 Then
para.Range.HighlightColorIndex = wdYellow
End If
Next para
End Sub
Subtest() und endsub gehören noch dazu !!