[kapetang]

Καλησπέρα

Στον κώδικα της ΒΔ ExportTableToTableWord.mdb (βλ. μήνυμα #12), υπάρχει ο κώδικας.

appWord.Documents.Add CurrentProject.Path & "\" & DocName

Set doc = appWord.Documents(appWord.Documents.Count).

Είναι φλύαρος και μπορεί να δημιουργήσει προβλήματα, όταν το Word είναι ανοιχτό.

Και οι δύο γραμμές πρέπει να αντικατασταθούν από τη γραμμή.

Set doc = appWord.Documents.Add (CurrentProject.Path & "\" & DocName)

Στο μήνυμα #12 έγινε η σχετική αντικατάσταση του συνημμένου αρχείου.

Φιλικά/Γιώργος