تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تصديراعمده DataGridView الى الاكسيل
#1
السلام عليكم 



محتاج كود تصدير بعض الاعمدة من DataGridView الى الاكسيل 



فقط بعض الاعمدة 


جزاكم الله خير جزاء 
الرد
تم الشكر بواسطة:
#2
(01-04-15, 10:13 PM)الدريساوي كتب : السلام عليكم 
محتاج كود تصدير بعض الاعمدة من DataGridView الى الاكسيل 
فقط بعض الاعمدة 
جزاكم الله خير جزاء 

PHP كود :
Try
 
           Dim MsExcel CreateObject("Excel.Application")
 
           MsExcel.Workbooks.Add()
 
           For i As Integer 0 To 4
                MsExcel
.Cells(1).Value DataGridView1.Columns(i).HeaderText
            Next
            For i 
As Integer 0 To 4
                For j 
As Integer 0 To DataGridView1.Rows.Count 1
                    MsExcel
.Columns.HorizontalAlignment 3
                    MsExcel
.Columns.Font.Name "Times New Roman"
 
                   MsExcel.Rows.Item(1).Font.Bold 1
                    MsExcel
.Rows.Item(1).Font.size 14
                    MsExcel
.Cells(1).ColumnWidth 14
                    MsExcel
.Cells(21).Value DataGridView1.Rows(j).Cells(i).Value
                Next
            Next
            MsExcel
.Visible True
        Catch ex 
As Exception
            MsgBox
(ex.Message)
 
       End Try 


ربما تغمض عينيك في سقف غرفتك فلا تفتحها الا أمام جبار السماوات والأرض يوم القيامه ... 
 " لا تنس آخرتك "
الرد
تم الشكر بواسطة: الدريساوي
#3
جزاك الله خير جزاء [b]Dr.Sherif Alazizi[/b]


على سبيل مثال عندي 10 اعمدة  واحتاج تصدير فقط العمود /8/2/4/5/7 فقط 


مشكور اخي على هذا الكود 
الرد
تم الشكر بواسطة:
#4
(01-04-15, 10:43 PM)الدريساوي كتب : جزاك الله خير جزاء [b]Dr.Sherif Alazizi[/b]
على سبيل مثال عندي 10 اعمدة  واحتاج تصدير فقط العمود /8/2/4/5/7 فقط 
مشكور اخي على هذا الكود 

لا تحزن
تم تعديل الكود ليقوم بما تريد


حمل المرفقات
ستجد المثال
وشرح للكود وطريقة عمله بالفيديو

موفق ان شاء الله


الملفات المرفقة
.rar   Video - ExporStelectedColumnsToExcel.rar (الحجم : 2.27 م ب / التحميلات : 119)
.rar   Example.rar (الحجم : 66.33 ك ب / التحميلات : 137)


ربما تغمض عينيك في سقف غرفتك فلا تفتحها الا أمام جبار السماوات والأرض يوم القيامه ... 
 " لا تنس آخرتك "
الرد
تم الشكر بواسطة: الدريساوي , sendbad100 , hoshosgost@yahoo.com
#5
جزاك الله خيراً
بارك الله بك Dr.Sherif Alazizi
هذا من كرمك وطيبتك
Smile Smile
الرد
تم الشكر بواسطة: Dr.Sherif Alazizi
#6
وجزاك بمثله
وفيك بارك

تحياتي ,,


ربما تغمض عينيك في سقف غرفتك فلا تفتحها الا أمام جبار السماوات والأرض يوم القيامه ... 
 " لا تنس آخرتك "
الرد
تم الشكر بواسطة: الدريساوي
#7
(01-04-15, 10:26 PM)جزاك الله خيرا كتب :
(01-04-15, 10:13 PM)الدريساوي كتب : السلام عليكم 
محتاج كود تصدير بعض الاعمدة من DataGridView الى الاكسيل 
فقط بعض الاعمدة 
جزاكم الله خير جزاء 

PHP كود :
Try
 
           Dim MsExcel CreateObject("Excel.Application")
 
           MsExcel.Workbooks.Add()
 
           For i As Integer 0 To 4
                MsExcel
.Cells(1).Value DataGridView1.Columns(i).HeaderText
            Next
            For i 
As Integer 0 To 4
                For j 
As Integer 0 To DataGridView1.Rows.Count 1
                    MsExcel
.Columns.HorizontalAlignment 3
                    MsExcel
.Columns.Font.Name "Times New Roman"
 
                   MsExcel.Rows.Item(1).Font.Bold 1
                    MsExcel
.Rows.Item(1).Font.size 14
                    MsExcel
.Cells(1).ColumnWidth 14
                    MsExcel
.Cells(21).Value DataGridView1.Rows(j).Cells(i).Value
                Next
            Next
            MsExcel
.Visible True
        Catch ex 
As Exception
            MsgBox
(ex.Message)
 
       End Try 
الرد
تم الشكر بواسطة:
#8
السلام عليكم ورحمة الله وبركاته
يمكنك الإطلاع على هذه الروابط أيضا:
http://www.c-sharpcorner.com/UploadFile/...n-C-Sharp/

https://code.msdn.microsoft.com/office/H...w-62f1f8ff

https://www.codeproject.com/Articles/965...d-to-Excel
إسرائيل إلى زوال ... وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة: sendbad100
#9
(02-04-15, 12:07 AM)Dr.Sherif Alazizi كتب :
(01-04-15, 10:43 PM)الدريساوي كتب : جزاك الله خير جزاء [b]Dr.Sherif Alazizi[/b]
على سبيل مثال عندي 10 اعمدة  واحتاج تصدير فقط العمود /8/2/4/5/7 فقط 
مشكور اخي على هذا الكود 

لا تحزن
تم تعديل الكود  ليقوم بما تريد


حمل المرفقات
ستجد المثال
وشرح للكود وطريقة عمله بالفيديو

موفق ان شاء الله
اخي ولو اريد كل العواميد
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استفسار عن طريقة نقل البيانات من Datagridview إلى الكريستال ريبورت جيولوجي مبتدئ 2 69 أمس, 12:15 AM
آخر رد: جيولوجي مبتدئ
  [VB.NET] استفسار :- بخصوص نقل الداتا من DataGridView عن طريق CheckBoxColumn dubai.eig 3 96 15-10-18, 08:09 PM
آخر رد: عبدالله الدوسري
  [VB.NET] المخططات البيانية داخل الاكسيل محمد اسماعيل 0 40 15-10-18, 03:57 AM
آخر رد: محمد اسماعيل
Photo [VB.NET] استراد بيانت من ملف الاكسل الى DataGridView كريم جودي 3 134 30-08-18, 09:47 PM
آخر رد: elgokr
  فقدان البيانات بعد إدخالها في ال Datagridview Hazem1 12 395 30-08-18, 01:55 PM
آخر رد: elgokr
  الترقيم التلقائي توقف عن العمل في Datagridview Hazem1 3 186 25-08-18, 09:29 AM
آخر رد: elgokr
  [VB.NET] كيف يُمكن طباعة بيانات Datagridview عندما تكون البيانات أكثر من صفحة واحدة Hazem1 3 195 23-08-18, 08:38 PM
آخر رد: elgokr
  ظهور رسالة خطأ عند الإنتقال إلى حقول ال Datagridview Hazem1 2 112 18-08-18, 06:59 PM
آخر رد: elgokr
  [سؤال] كود جمع او ضرب عمودين فى datagridview atef_020 17 7,459 14-08-18, 08:56 PM
آخر رد: elgokr
  [VB.NET] ممكن شرح بكل مايتعلق بـ DataGridView 0theghost0 3 736 14-08-18, 08:55 PM
آخر رد: elgokr

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


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