[abu_hisham7]

السلام عليكم ورحمة الله وبركاته 

كيفكم ياشباب إن شاء الله انكم  بخير 

لدينا مشكلة في تعديل كود زر (طباعة DGV)  عند النقر عليه يطبع السجل الحالي 

وانا اريد طباعة ما بداخل الداتا جريد فقط ..

حيث ان اسم الداتا جريد (dgv_TestMoh) وجزاكم الله خير .

   

            "Dim fileName As String = "C:\TestEmail\TestEmail\bin\Debug\sample.dotx

            Dim myApp1 As New Application

            Dim myDoc1 As New Document

            myDoc1 = myApp1.Documents.OpenNoRepairDialog(fileName)

            myDoc1.Activate()

            Dim bk As Bookmarks = myDoc1.Bookmarks

            bk("ID").Range.Text = ID.Text

            bk("EmpName").Range.Text = EmpName.Text

            bk("EmpKusem").Range.Text = EmpKusem.Text

            bk("EmpMantiq").Range.Text = EmpMantiq.Text

            bk("EmpEmail").Range.Text = EmpEmail.Text

            bk("EmpNum").Range.Text = EmpNum.Text

            bk("EmpNote").Range.Text = EmpNote.Text

        Catch ex As Exception

            Exit Sub

        End Try

    End Sub