اعزائي السلام عليكم حاولت ربط قاعدة معلوماتي بجدول صفحة وورد بحيث يظهر فيها جميع مافي قاعدة البيانات ولكن لايظهر لي الا معلومات الصف الأول من الجدول مع العلم ان القاعدة تحوي اكثر من 45 صفحة أرجوا المساعدة
Dim Myrs1 As Recordset
SQL_Query = "Select * From [MyTable] "
Set Myrs1 = MyDB.OpenRecordset(SQL_Query, dbOpenDynaset)
Myrs1.MoveLast
Myrs1.MoveFirst
Dim MyWord As Word.Application
Set MyWord = New Word.Application
'New Document
MyWord.Documents.Add PathName & "MyTemplate.dot"
With MyWord.ActiveDocument.Bookmarks.Item("name").Range
.Text = Myrs1.Fields("name")
.Font.Name = "simplified arabic"
.Font.ColorIndexBi = wdBlack
.Font.SizeBi = 14
.Font.BoldBi = True
End With