[محمد اسماعيل]

السلام عليكم

اريد نسخ اعمدة من داتا جريد فيو  1 الي 2

الاعمدة من العمود 1 الي العمود5 بالداتا جريد فيو 1 الي الداتا جريد فيو 2  واريد نسخ رؤس الاعمدة ايضا لان الداتا جريد فيو 2 فارغة تماما بدون رؤس اعمدة

[asemshahen5]

تفضل هذا مثال لما طلبت :

[محمد اسماعيل]

(13-10-18, 10:17 PM)asemshahen5 كتب : تفضل هذا مثال لما طلبت :

وفقك اللة لكل خير

1- لي طلب بسيط انا في عمود في نفس الداتا جريد فيو 1 مخفي  العمود رقم 2 يحمل كود لكل اسم لا يظهر بالداتاجريد فيو 2  عند عملية نسخ الاعمدة

2- طلب اخر ان يتم اعادة ترتيب عمود حقل الترقيم حيث يحمل الرقم 1  وانا اختار اعمدة وصفوف معينة عند البحث فعندما انقل فلا تكون الصفوف مرتبة رقميا من 1 الي نهاية خلايا العمود 1

[asemshahen5]

بالنسبة للطلب رقم 1 :

كود :

DataGridView1.Columns(2).Visible = True

بالنسبة للطلب الثاني بصراحة لم أفهمه وضح أكثر .

[محمد اسماعيل]

(13-10-18, 11:42 PM)asemshahen5 كتب : بالنسبة للطلب رقم 1 :

كود :

DataGridView1.Columns(2).Visible = True

بالنسبة للطلب الثاني بصراحة لم أفهمه وضح أكثر .

الطلب رقم واحد لا اقصد اظهار العمود المخفي ولكن يتم نقلة بالداتا جريد فيو 2

الطلب رقم 2 العمو د رقم 1 يحمل حقل الايدي للداتا جريد ولا تظهر الارقام مرتبة لكل صف مثلا 1-3-6-9-10   اريد عند النقل يتم ترتيب العمود 1-2-3-4-5

[asemshahen5]

بالنسبة للترتيب فيوجد طريقتين ترتيب القيم الموجودة :

كود :

       'هنا سيتم ترتيبهم تصاعديا اسم الحقل
       Me.DataGridView1.Sort(DataGridView1.Columns(2), System.ComponentModel.ListSortDirection.Ascending)
       'هنا سيتم ترتيبهم تنازليا حسب اسم الحقل
       Me.DataGridView1.Sort(DataGridView1.Columns(2), System.ComponentModel.ListSortDirection.Descending)

وضع قيم جديدة مرتبة :

كود :

For I = 0 To DataGridView2.Rows.Count - 1
    DataGridView2.Rows(I).Cells(2).Value = I
Next

[محمد اسماعيل]

(14-10-18, 12:02 AM)asemshahen5 كتب : بالنسبة للترتيب فيوجد طريقتين ترتيب القيم الموجودة :

كود :

       'هنا سيتم ترتيبهم تصاعديا اسم الحقل
       Me.DataGridView1.Sort(DataGridView1.Columns(2), System.ComponentModel.ListSortDirection.Ascending)
       'هنا سيتم ترتيبهم تنازليا حسب اسم الحقل
       Me.DataGridView1.Sort(DataGridView1.Columns(2), System.ComponentModel.ListSortDirection.Descending)

وضع قيم جديدة مرتبة :

كود :

For I = 0 To DataGridView2.Rows.Count - 1
    DataGridView2.Rows(I).Cells(2).Value = I
Next

كدة تمام الطلب الاول
طيب هتقل عليك بالطلب الثاني
نقل العمود رقم 2 المخفي بالداتا جريد فيو 1 الي الداتا جريد فيو 2

[asemshahen5]

بيكون منقول بس أنت ما انتبهت انه اصبح رقم 1 فقط ضع له كود الاظهار

أو ضع له لتتأكد من وجوده :

كود :

MsgBox(DataGridView2.Columns(1).HeaderText)

[محمد اسماعيل]

(14-10-18, 12:19 AM)asemshahen5 كتب : بيكون منقول بس أنت ما انتبهت انه اصبح رقم 1 فقط ضع له كود الاظهار

أو ضع له لتتأكد من وجوده :

كود :

MsgBox(DataGridView2.Columns(1).HeaderText)

فعلا ظهر اسم العمود بس انا عايز العمود يظهر بشبكة البيانات الداتا جريد فيو

---

(14-10-18, 12:19 AM)asemshahen5 كتب : بيكون منقول بس أنت ما انتبهت انه اصبح رقم 1 فقط ضع له كود الاظهار

أو ضع له لتتأكد من وجوده :

كود :

MsgBox(DataGridView2.Columns(1).HeaderText)

تم الحل باظهار العمود وافضل تقيم انشاء اللة

[حريف برمجة]

يمكنك إظهار العمود

ثم نقل الصفوف للداتاقريدفيو2

ثم إخفاء العمود مره أخرى .