تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب فى تصدير بيانات 2 داتا جريد فيو الى الاكسل
#1
احبتى فى الله اتمنى ان تكونى بصجحه وخير كبير
انى استعمل هذا الكود فى تصدير البيانات الى الاكسيل من داتا جريد فيو ولدى فى الفورم 2 داتا جريد فيو فهل من طريقه عرض بيانات الداتا جريد فيو الاولى والثانيه او اكثر الى نفس ورقه الاكسيل 
كود :
Try


           Dim MsExcel = CreateObject("Excel.Application")


           MsExcel.Workbooks.Add()


           For i As Integer = 0 To DataGridView1.Columns.Count - 1
           
               MsExcel.Cells(i + 1).Value = DataGridView1.Columns(i).HeaderText


           Next


           For i As Integer = 0 To DataGridView1.Columns.Count - 1


               For j As Integer = 0 To DataGridView1.Rows.Count - 1
 
                   MsExcel.Columns.HorizontalAlignment = 3


                   MsExcel.Columns.Font.Name = "Times New Roman"


                   MsExcel.Rows.Item(j + 1).Font.Bold = 1


                   MsExcel.Rows.Item(j + 1).Font.size = 14
               
                   MsExcel.Cells(j + 1).ColumnWidth = 14
                           
                   MsExcel.Cells(j + 2, i + 1).Value = DataGridView1.Rows(j).Cells(i).Value


               Next


           Next


           MsExcel.Visible = True


       Catch ex As Exception


           MsgBox(ex.Message)


       End Try


ولكم منى جيل الشكر
الرد
تم الشكر بواسطة:
#2
السلام عليكم اخي خالد
الامر نناقشه بالمنطق
ورقة الاكسل هي جدول له اعمدة وصفوف وعند تصدير اي داتا غرايد الى ورقة الاكسل تتشكل اعمد وصفوف مثل الداتا غرايد
الان اذا اردنا تصدير اي داتا غرايد اخرى يجب ان تكون اعمدتها نفس اعمدة الداتا غرايد الاولى حتى تعتبر كصفوف اضافية
 ولعمل ذلك يجب انشاء داتا غرايد ثالثة نظهر فيها الاولى والثانية ثم يتم تصديرها الى الاكسل
اما ان تصدر كل واحدة على حدة الى نفس الورقة 
فاعتقد لايمكن الا اذا قمنا باضافة الداتا غرايد الثانية الى ورقة الاكسل كبيانات متممة للاولى
اي كسجلات تحفظ في الورقة مثل التعامل مع قاعدة بيانات اكسل
اما ان تصدر كل داتا غرايد ومختلفة في الاعمدة فلا يمكن حسب ماعرفت
هذا حد معرفتي والله اعلم ومن بعده من له معرفة اكثر بهذا الامر
اعمل الخير واجرك لاتنتظره فالله خير من اليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد
تم الشكر بواسطة: اسامه الهرماوي


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  إضافة بيانات جدول ثالث أثناء طباعة صفحة التقرير عبد العزيز البسكري 2 94 08-07-20, 03:24 PM
آخر رد: عبد العزيز البسكري
  تحديد عمود في الداتا جريد و اختباره هل هو فارغ ام لا بسام محمدغانم 1 70 05-07-20, 07:17 PM
آخر رد: WaeLx
  عرض الداتا جريد فيو mostafa nada 10 374 03-07-20, 11:29 AM
آخر رد: ابراهيم ايبو
  [VB.NET] داتا كريت فيو EMADSSS 3 226 02-07-20, 12:49 PM
آخر رد: EMADSSS
  اريد نقل التركيز على السجل فى الداتا جريد new_programer 1 67 02-07-20, 12:24 PM
آخر رد: معاند الحظ
  كيف افحص عمود في الداتا جريد بسام محمدغانم 0 61 01-07-20, 01:16 AM
آخر رد: بسام محمدغانم
  تعبئة الداتا جريد فيو alshandodi 1 77 30-06-20, 09:05 PM
آخر رد: asemshahen5
  خطأ تنسيق التاريخ في الداتا جريد فيو في حاله انه فارغ alshandodi 2 146 30-06-20, 03:57 PM
آخر رد: alshandodi
  [VB.NET] لمن يبحث على كود طباعة اي صف في داتا قريد تفضل rochdi191 0 66 30-06-20, 12:07 AM
آخر رد: rochdi191
  سؤال بالدتا جريد اليوم السابع 1 73 26-06-20, 09:14 PM
آخر رد: ابراهيم ايبو

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم