Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Tabelle von Excel nach Word übertragen |
20.09.2008 17:50:26 |
Rolf |
|
|
|
22.09.2008 14:29:45 |
Holger |
|
|
|
23.09.2008 17:51:27 |
rolf |
|
|
|
24.09.2008 12:34:35 |
Holger |
|
|
|
25.09.2008 11:35:08 |
Rolf |
|
|
|
26.09.2008 10:42:45 |
Holger |
|
|
Von:
Rolf |
Datum:
20.09.2008 17:50:26 |
Views:
3433 |
Rating:
|
Antwort:
|
Thema:
Tabelle von Excel nach Word übertragen |
Hallo zusammen,
ich benutze ein Programm, mit dem ich Text aus einer Excel Tabelle in ein Word-Dokument übertrage. Siehe Code
Sub TabelleNachWord()
Dim appWord As Object
Dim LV_Text As Object
Dim zeile As Long
Set appWord = CreateObject("Word.Application")
Set LV_Text = appWord.Documents.Add("C:\Test.dot")
appWord.Visible = True
LV_Text.Activate
For zeile = 110 To 3 Step -1
LayoutPageBreak = True
LV_Text.Bookmarks("Text1").Range.Text = Cells(zeile, 2)
Next zeile
Set LV_Text = Nothing
Set appWord = Nothing
End Sub
Nachdem der Text der ersten Zelle im Word Dokument an der Textmarke Text1 eingefügt wurde, wird der nächste Text wieder an der gleichen Textmarke, und damit vor dem vorher eingefügten Text , eingefügt.
Dadurch gehen mir die Zeilenumbrüche verloren. Außerdem werden Formatierungen, z.B. Fettdruck bei Überschriften nicht mitgenommen. Ich hab diese Lösung gewählt, weil hier die Tabelle gleich in Text umgewandelt wird. Ich brauch die Umwandlung also nicht "zu Fuß" machen.
Wer weiß eine Lösung?
Über Eure Hilfe würd ich mich freuen
mfg Rolf |
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Tabelle von Excel nach Word übertragen |
20.09.2008 17:50:26 |
Rolf |
|
|
|
22.09.2008 14:29:45 |
Holger |
|
|
|
23.09.2008 17:51:27 |
rolf |
|
|
|
24.09.2008 12:34:35 |
Holger |
|
|
|
25.09.2008 11:35:08 |
Rolf |
|
|
|
26.09.2008 10:42:45 |
Holger |
|
|