Probleme beim Einfügen in Word
11.01.2005 20:33:13
Svenna
ich habe mit Excel2000/Word2002 eine Datei geschrieben, welche u.a. mehrere Daten aus der Excel-Tabell in Word-Textfelder kopiert (siehe nachstehend). Das funktioniert auch wunderbar. Nun benötige ich diese Datei auch im Geschäft, dort haben wir allerdings Excel97/Word97. Zwar läuft das Programm, und die Daten werden auch in die Word Textfelder kopiert, allerdings macht er nach jeder eingefügten Textmarke eine neue Zeile?!
Ich bin noch am verzweifeln, habe Forum schon durchsucht, leider nur einen Beitrag gefunden mit dem gleichen Problem. Der User hat die Lösung aber selbst gefunden und leider nicht eingestellt...
Kann mir jemand dringend helfen? Die Datei sollte morgen im Geschäft laufen.
Vielen lieben Dank
Svenna
Dim oDoc As Document
Dim oWord As Word.Application
If oDoc Is Nothing Then
GoTo ende
Else
Sheets("Übersichtsblatt").Range("B18").Copy
oWord.Selection.Goto What:=wdGoToBookmark, Name:="Prüfungen1"
oWord.Selection.PasteSpecial Link:=False, DataType:=wdPasteText