الاستاذ مجدى
فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 613623
عزيزي الزائر / عزيزتي الزائرة يرجي التكرم بتسجبل الدخول اذا كنت عضو معنا
او التسجيل ان لم تكن عضو وترغب في الانضمام الي اسرة المنتدي
سنتشرف بتسجيلك
شكرا فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 829894
ادارة المنتدي فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 103798

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Uoou_u10


الاستاذ مجدى
فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 613623
عزيزي الزائر / عزيزتي الزائرة يرجي التكرم بتسجبل الدخول اذا كنت عضو معنا
او التسجيل ان لم تكن عضو وترغب في الانضمام الي اسرة المنتدي
سنتشرف بتسجيلك
شكرا فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 829894
ادارة المنتدي فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 103798

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Uoou_u10


الاستاذ مجدى
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.



 
الرئيسيةالأستاذ التعليمضع التسجيلدخولالتسجيل
سبحانك لا علم لنا إلا ما علمتنا أنك أنت العليم
عزيزى الزائر قم بالتسجيل بالمنتدى لمشاهدة باقى الاقسام المهمه
مع تحيات مجدى عبد المنعم محمود يونس ببورسعيد " مدير المنتدى "
أهلا بك من جديد يا زائر آخر زيارة لك كانت في
آخر عضو مسجل mamdouh فمرحبا به


 

 فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3

اذهب الى الأسفل 
+52
Ahmed ghoraba
nadhir nadhir
ابن الرشيد
رمضان خليل
rrachid
alqubee
Essam
p2_1967
معشي
ايوب
alaani
ahmedmohamed
Bassem
Weco
نبيل المحاسب
رضا 25
baddaon
Rachid
اسلام اسلام
abdopepo
بركات
motalim1
توفيق عبدالمغني
hope_chain
ichneumona
نعمان ابو شمله
el3oooo
amine14
omar.hosa
saadabujnah
allahoud
moya99
habibmissaoui
كرم شوقي
abouelela
abualialsaad
مجدى يونس
شريف عمر محمد بكر
قشار
mohamedmz
saleh
faraktoz
abm_bakry
peachgreen010
ادريس
akaraki
ابوعمر
tarek ahmed
رشيد
نورالدين بوكرو
abdo
khairy
56 مشترك
انتقل الى الصفحة : الصفحة السابقة  1, 2, 3, 4  الصفحة التالية
كاتب الموضوعرسالة
amine14



عدد المساهمات : 23
تاريخ التسجيل : 29/03/2019

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالجمعة أبريل 10, 2020 12:20 pm

شكرااااااااااا
الرجوع الى أعلى الصفحة اذهب الى الأسفل
el3oooo



عدد المساهمات : 1
تاريخ التسجيل : 01/05/2014

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالإثنين أبريل 20, 2020 7:50 am

موضوع جميل جدا
الرجوع الى أعلى الصفحة اذهب الى الأسفل
نعمان ابو شمله



عدد المساهمات : 19
تاريخ التسجيل : 16/03/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالأربعاء مايو 06, 2020 12:20 pm

كل التحية لك
الرجوع الى أعلى الصفحة اذهب الى الأسفل
مجدى يونس
Admin
مجدى يونس

عدد المساهمات : 3489
تاريخ التسجيل : 22/02/2013
العمر : 67

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالخميس مايو 07, 2020 8:57 am

اى خدمة

_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Aaa11
الرجوع الى أعلى الصفحة اذهب الى الأسفل
https://magdi54.forumegypt.net
ichneumona



عدد المساهمات : 7
تاريخ التسجيل : 07/05/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالخميس مايو 07, 2020 2:33 pm

شكرا
الرجوع الى أعلى الصفحة اذهب الى الأسفل
hope_chain



عدد المساهمات : 1
تاريخ التسجيل : 11/04/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالثلاثاء يونيو 02, 2020 11:57 pm

الف شكر.بارك الله فيك
Smile Smile Smile
الرجوع الى أعلى الصفحة اذهب الى الأسفل
مجدى يونس
Admin
مجدى يونس

عدد المساهمات : 3489
تاريخ التسجيل : 22/02/2013
العمر : 67

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالأربعاء يونيو 03, 2020 1:40 pm

اى خدمة

_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Aaa11
الرجوع الى أعلى الصفحة اذهب الى الأسفل
https://magdi54.forumegypt.net
توفيق عبدالمغني



عدد المساهمات : 46
تاريخ التسجيل : 27/05/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالأربعاء يونيو 10, 2020 7:50 am

Good job thanks
الرجوع الى أعلى الصفحة اذهب الى الأسفل
توفيق عبدالمغني



عدد المساهمات : 46
تاريخ التسجيل : 27/05/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالأربعاء يونيو 10, 2020 8:05 am

جزاك الله خيرا وحفظك وزاد من امثالك
الرجوع الى أعلى الصفحة اذهب الى الأسفل
motalim1



عدد المساهمات : 5
تاريخ التسجيل : 05/06/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالجمعة يونيو 12, 2020 10:42 pm

ممتاز
الرجوع الى أعلى الصفحة اذهب الى الأسفل
بركات



عدد المساهمات : 109
تاريخ التسجيل : 30/05/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالجمعة يونيو 26, 2020 11:06 pm

هل يمكن الحصول على الملف من فضلك
الرجوع الى أعلى الصفحة اذهب الى الأسفل
abdopepo



عدد المساهمات : 16
تاريخ التسجيل : 30/06/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالأربعاء يوليو 01, 2020 3:40 pm

جزاكم الله كل خير
الرجوع الى أعلى الصفحة اذهب الى الأسفل
اسلام اسلام



عدد المساهمات : 5
تاريخ التسجيل : 23/06/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالخميس يوليو 09, 2020 6:25 pm

استاذ مجدي راجل محترم
الرجوع الى أعلى الصفحة اذهب الى الأسفل
Rachid

Rachid

عدد المساهمات : 7
تاريخ التسجيل : 31/10/2019

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالثلاثاء يوليو 21, 2020 4:19 pm

ما شاء الله
الرجوع الى أعلى الصفحة اذهب الى الأسفل
khairy



عدد المساهمات : 22
تاريخ التسجيل : 11/09/2017

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالإثنين أغسطس 10, 2020 6:41 pm

بارك اللة فيك وجزاك اللة عنا خير الجزاء
الرجوع الى أعلى الصفحة اذهب الى الأسفل
baddaon



عدد المساهمات : 2
تاريخ التسجيل : 13/12/2017

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالخميس أغسطس 13, 2020 9:12 am

Embarassed بارك اللة فيك وجزاك اللة عنا خير الجزاء

 
الرجوع الى أعلى الصفحة اذهب الى الأسفل
رضا 25



عدد المساهمات : 5
تاريخ التسجيل : 19/08/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالأربعاء أغسطس 19, 2020 8:19 am

رائع
الرجوع الى أعلى الصفحة اذهب الى الأسفل
نبيل المحاسب



عدد المساهمات : 3
تاريخ التسجيل : 19/08/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: من طرف نبيل المحاسب   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالأربعاء أغسطس 19, 2020 10:35 am

جدا رائع ... بارك الله في جهدك
الرجوع الى أعلى الصفحة اذهب الى الأسفل
Weco



عدد المساهمات : 10
تاريخ التسجيل : 19/08/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالخميس أغسطس 20, 2020 12:26 am

شكرا
الرجوع الى أعلى الصفحة اذهب الى الأسفل
Bassem



عدد المساهمات : 4
تاريخ التسجيل : 19/08/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: جميل جدا    فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالثلاثاء سبتمبر 01, 2020 12:35 pm

مجدى يونس كتب:
فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3

الفيديو





الكود

الكود:
Private Sub Cmdexit_Click()
Dim iexit As VbMsgBoxResult
iexit = MsgBox("هل تريد الخروج وغلق الفورم", vbQuestion + vbYesNo, "فورم الخروج من الفورم")
If iexit = vbYes Then
Unload Me
End If
End Sub

Private Sub ComboBox1_Change()
Dim i As Long, lr As Long, ws As Worksheet
Set ws = Sheets("sheet1")
lr = ws.Range("a" & Rows.Count).End(xlUp).Row
For i = 2 To lr
If Val(Me.ComboBox1.Value) = ws.Cells(i, "a") Then
TextBox1.Value = ws.Cells(i, "b").Value
TextBox2.Value = ws.Cells(i, "c").Value
TextBox3.Value = ws.Cells(i, "d").Value
TextBox4.Value = ws.Cells(i, "e").Value
TextBox5.Value = ws.Cells(i, "f").Value
TextBox6.Value = ws.Cells(i, "g").Value
End If
Next i
End Sub

Private Sub ComboBox2_Change()
Dim y As Long, lr As Long, ws As Worksheet
Set ws = Sheets("sheet1")
lr = ws.Range("b" & Rows.Count).End(xlUp).Row
For y = 2 To lr
If Val(Me.ComboBox2.Value) = ws.Cells(y, "b") Then
TextBox1.Value = ws.Cells(i, "c").Value
TextBox2.Value = ws.Cells(i, "d").Value
TextBox3.Value = ws.Cells(i, "e").Value
TextBox4.Value = ws.Cells(i, "f").Value
TextBox5.Value = ws.Cells(i, "g").Value
TextBox6.Value = ws.Cells(i, "h").Value
End If
Next y
End Sub

Private Sub CommandButton1_Click()
ListBox1.ColumnCount = 7
ListBox1.RowSource = "a2:g50"

End Sub

Private Sub CommandButton2_Click()
Cells(Range("A1000").End(xlUp).Row + 1, 1) = TextBox1.Text
Cells(Range("A1000").End(xlUp).Row, 2) = TextBox2.Text
Cells(Range("A1000").End(xlUp).Row, 3) = TextBox3.Text
Cells(Range("A1000").End(xlUp).Row, 4) = TextBox4.Text
Cells(Range("A1000").End(xlUp).Row, 5) = TextBox5.Text
Cells(Range("A1000").End(xlUp).Row, 6) = TextBox6.Text
Call CommandButton1_Click
MsgBox "تم الترحيل"

End Sub

Private Sub CommandButton3_Click()
Dim i As Integer
If MsgBox("هل تريد الذهاب للسطر المختار", vbYesNo + vbQuestion, "اختار بين الموافقة والرفض") = vbYes Then

For i = 1 To Range("A1000").End(xlUp).Row
If Cells(i, 1) = ListBox1.List(ListBox1.ListIndex) Then
Rows(i).Select
Selection.Delete
End If
Next i
End If

End Sub

Private Sub CommandButton4_Click()
ListBox1 = ""
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
TextBox4 = ""
TextBox5 = ""
TextBox6 = ""
ComboBox1 = ""

End Sub

Private Sub CommandButton5_Click()
Unload Me
End Sub

Private Sub Label2_Click()

End Sub
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim i As Long, lr As Long, ws As Worksheet
Set ws = Sheets("sheet1")
lr = ws.Range("a" & Rows.Count).End(xlUp).Row
For i = 2 To lr
If Val(Me.ListBox1.Value) = ws.Cells(i, "a") Then
TextBox1.Value = ws.Cells(i, "b").Value
TextBox2.Value = ws.Cells(i, "c").Value
TextBox3.Value = ws.Cells(i, "d").Value
TextBox4.Value = ws.Cells(i, "e").Value
TextBox5.Value = ws.Cells(i, "f").Value
TextBox6.Value = ws.Cells(i, "g").Value
End If
Next i
End Sub

Private Sub ListBox2_Click()

End Sub

Private Sub ListBox2_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
For i = 0 To ListBox2.ListCount
If ListBox2.Selected(i) = True Then

TextBox1.Value = ListBox2.List(i, 0)
TextBox2.Text = ListBox2.List(i, 1)
TextBox3.Text = ListBox2.List(i, 2)
TextBox4.Text = ListBox2.List(i, 3)
TextBox5.Text = ListBox2.List(i, 4)
TextBox6.Text = ListBox2.List(i, 5)
End If
Next i
End Sub

Private Sub TextBox7_Change()
TextBox1.Value = ""
TextBox2.Value = ""
TextBox3.Value = ""
TextBox4.Value = ""
TextBox5.Value = ""
TextBox6.Value = ""
Sheets(1).Activate
ListBox2.Clear
ss = Sheets(1).Cells(Rows.Count, 2).End(xlUp).Row
k = 0
For Each c In Range("B2:B" & ss)
B = InStr(c, TextBox7)
If B > 0 Then
ListBox2.AddItem
 ListBox2.List(k, 0) = Cells(c.Row, 2).Value
  ListBox2.List(k, 1) = Cells(c.Row, 1).Value
   ListBox2.List(k, 2) = Cells(c.Row, 3).Value
   ListBox2.List(k, 3) = Cells(c.Row, 4).Value
   ListBox2.List(k, 4) = Cells(c.Row, 5).Value
   ListBox2.List(k, 5) = Cells(c.Row, 6).Value
   k = k + 1
End If
Next c
End Sub
Private Sub UserForm_Activate()
TextBox7.SetFocus
For i = 2 To Sheets(1).Cells(Rows.Count, 2).End(xlUp).Row
ListBox2.AddItem
 ListBox2.List(i - 2, 0) = Cells(i, 2).Value
  ListBox2.List(i - 2, 1) = i
      Next i
End Sub



حمل الملف بعد وضع رد وسيحمل على جهازك فورا

alaani و Bassem يعجبهم هذا الموضوع

الرجوع الى أعلى الصفحة اذهب الى الأسفل
ahmedmohamed



عدد المساهمات : 36
تاريخ التسجيل : 07/03/2019

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالخميس سبتمبر 03, 2020 10:03 am

شكرا
الرجوع الى أعلى الصفحة اذهب الى الأسفل
توفيق عبدالمغني



عدد المساهمات : 46
تاريخ التسجيل : 27/05/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالخميس سبتمبر 10, 2020 1:58 am

فورم جميل يشكر عليه
الرجوع الى أعلى الصفحة اذهب الى الأسفل
alaani



عدد المساهمات : 1
تاريخ التسجيل : 04/08/2019

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالسبت سبتمبر 26, 2020 9:25 pm

الف شكر
الرجوع الى أعلى الصفحة اذهب الى الأسفل
ايوب



عدد المساهمات : 10
تاريخ التسجيل : 19/08/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالأربعاء سبتمبر 30, 2020 10:33 pm

السلام عليكم
الرجوع الى أعلى الصفحة اذهب الى الأسفل
ايوب



عدد المساهمات : 10
تاريخ التسجيل : 19/08/2020

فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Empty
مُساهمةموضوع: رد: فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3   فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3 - صفحة 3 Avatarالأربعاء سبتمبر 30, 2020 11:14 pm

السلام عليكم
الرجوع الى أعلى الصفحة اذهب الى الأسفل
 
فورم بحث بالاسم ودبل كليك لعرض البيانات فيديو3
الرجوع الى أعلى الصفحة 
صفحة 3 من اصل 4انتقل الى الصفحة : الصفحة السابقة  1, 2, 3, 4  الصفحة التالية

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
الاستاذ مجدى :: قسم مجموعة الاوفيس :: قسم الاكسل-
انتقل الى: