Thema Datum  Von Nutzer Rating
Antwort
Rot VBA | Text und Tabelle nacheinander in Word Dokument einfügen
19.07.2021 13:33:09 Torsten
**
Solved
29.07.2021 10:11:18 Torsten
NotSolved
29.07.2021 13:22:36 Gast8101
**
NotSolved
30.07.2021 09:46:01 Torsten
NotSolved
30.07.2021 14:35:09 Torsten
Solved

Ansicht des Beitrags:
Von:
Torsten
Datum:
19.07.2021 13:33:09
Views:
76
Rating: Antwort:
 Nein
Thema:
VBA | Text und Tabelle nacheinander in Word Dokument einfügen

Hallo,

ich möchte in einem Word Dokument an einer Textmarke zunächst Text und darunter eine Tabelle einfügen. Ich habe schon viel ausprobiert, komme aber nicht auf die richtige Lösung. Aktuell wird bei mir Text eingefügt, darunter folgt eine Leerzeile und darunter dann erst die Tabelle. Wenn ich .insertbreak weglasse, so erscheint mein Text leider unter der Tabelle.

Sub TabelleUndText(AppWord As Microsoft.Office.Interop.Word.Application, wdDoc As Microsoft.Office.Interop.Word.Document)

...

Dim TMRange As Object
wdDoc.Bookmarks("bookmark").Select()
TMRange = AppWord.ActiveDocument.Bookmarks("bookmark").Range
TMRange.InsertBreak(6)
Appword.Selection.Next
AppWord.ActiveDocument.Bookmarks.Add("bookmark1", TMRange)

TMRange = AppWord.ActiveDocument.Bookmarks("bookmark").Range
TMRange.Text = "Text über Tabelle"

Dim wdTable As Object
Dim iNumRows As Integer
Dim iNumColumns As Integer

iNumRows = 9
iNumColumns = 2

wdTable = wdDoc.Tables.Add(AppWord.ActiveDocument.Bookmarks("bookmark1").Range, NumRows:=iNumRows, NumColumns:=iNumColumns)

...

End Sub

Im Prinzip ist dies auch nur ein Zwischenschritt für meine Endlösung, da ich die Textstellen mit Text über eine Tabelle dynamisch programmieren möchte. Zu Beginn  kenne ich die Anzahl der Tabellen nicht, daher gehe ich bisher davon aus, dass ich ausgehend von der ersten Textmarke mehrere weitere Textmarken einfügen müsste. Eventuell führt dies in der Handhabung auch nochmal zu einer etwas anderen Lösung.Über Hilfe wäre ich sehr dankbar.


Ihre Antwort
  • 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: Name: Email:

 
 

  • 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
Rot VBA | Text und Tabelle nacheinander in Word Dokument einfügen
19.07.2021 13:33:09 Torsten
**
Solved
29.07.2021 10:11:18 Torsten
NotSolved
29.07.2021 13:22:36 Gast8101
**
NotSolved
30.07.2021 09:46:01 Torsten
NotSolved
30.07.2021 14:35:09 Torsten
Solved