Hallo zusammen
Aufgrund eines Tipps in einem früheren Posting habe ich die Beispielsdatenbank AccToWordtabelle heruntergeladen - siehe Attachment zu diesem Post. Der Aufruf der Sub btnFuellen funktioniert darin leider aber nicht, ich kriege einen "13: Typen unverträglich" Error. Sieht vielleicht jemand, woran das liegt und kann mir weiterhelfen? Selber schaffe ich nicht herauszufinden, was falsch im Code ist.
Sonnige Grüsse
Micharius
Hallo,
entferne set ......
'Tabelle hat Textmarke 'XTabelle'
Set wdRange = wdDoc.Range(wdDoc.Bookmarks("XTabelle").Start, _
wdDoc.Bookmarks("XTabelle").End)
For j = 1 To anzZ - 1
wdRange.Rows.Add ' Zeilen anfügen
Next j
Ha super, nun funzt es! Ganz herzlichen Dank für die schnelle Hilfe!