Aus EXCEL Zwischenablage im WORD löschen
07.02.2004 08:29:13
Marco W.
ich lese den Inhalt einer WORD-Datei in eine Stringvariable im EXCEL ein.
Word starten, wenn nötig funzt
Dokument öffnen funzt
'alles markieren und kopieren funz auch
wordapp.selection.wholestory
wordapp.selection.copy
Im Excel wird der Inhalt der Zwischenablage in eine Stringvaribale kopiert.
Soweit geht alles wunderbar, leider habe ich nun das Problem, dass der Inhalt der Zwischenablage wieder gelöscht werden soll, damit man diesen nicht manuell verwenden kann und keine Nachfrage nach Verwendung der Zwischenablage beim Beenden von Word kommt.
Folgenden Code habe ich probiert, funktioniert aber nicht (ich vermute, dass lediglich die Zwischenablage im EXCEl gelöscht wird, die im WORD zeigt sich unbeeindruckt).
Sub InhaltDerZwischenablageLoeschen2()
Dim oData As DataObject
Set oData = New DataObject
oData.SetText ""
oData.PutInClipboard
End Sub
Gibt es eine Möglichkeit diesen Code auf Word zu beziehen oder eine andere Möglichkeit aus dem Excel heraus die Zwischenablage im Word zu löschen?
(Die Lösung muss im Office 97 und höher funktionieren)
Vilen Dank im Voraus!
Marco