collapse

* Benutzer Info

 
 
Willkommen Gast. Bitte einloggen oder registrieren. Haben Sie Ihre Aktivierungs E-Mail übersehen?

* Wer ist Online

  • Punkt Gäste: 81
  • Punkt Versteckte: 1
  • Punkt Mitglieder: 2
  • Punkt Benutzer Online:

* Forenstatistik

  • stats Mitglieder insgesamt: 13972
  • stats Beiträge insgesamt: 66528
  • stats Themen insgesamt: 8970
  • stats Kategorien insgesamt: 5
  • stats Boards insgesamt: 17
  • stats Am meisten online: 415

Autor Thema: Beispieldatenbank funktioniert nicht  (Gelesen 103 mal)

Offline Micharius

  • Access-User
  • *
  • Beiträge: 69
Beispieldatenbank funktioniert nicht
« am: Juni 22, 2018, 07:47:06 »
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
 

Online DF6GL

  • Global Moderator
  • Access-Oberguru
  • *****
  • Beiträge: 23340
Re: Beispieldatenbank funktioniert nicht
« Antwort #1 am: Juni 22, 2018, 09:16:01 »
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

Offline Micharius

  • Access-User
  • *
  • Beiträge: 69
Re: Beispieldatenbank funktioniert nicht
« Antwort #2 am: Juni 22, 2018, 11:17:46 »
Ha super, nun funzt es! Ganz herzlichen Dank für die schnelle Hilfe!