اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر (معدل)

تحياتى و ايام مباركه


مرفق كود مرن و هام يقوم باستدعاء الفورم بدبل كليك
يمكن الاستفاده منه فى اى برنامج او ملف ( و هو منقول من ضمن مشاركات المنتدى )
فمثلا لو عندك فورم بحث و اضافة مطلوب استدعائه فى نطاق معين لادخال و تكويد بيان معين بدلا من استخدام القائمه المنسدله 
فضع هذا الكود البسيط فى حدث الصفحه المطلوبه

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("a1 : a1", "b2 : b2230")) Is Nothing Then
Cancel = True
UserForm1.Show
End If
End Sub

فعند الضغط / الكابس دبل كليك على الخانه A1  او النطاق B2:B2230
يتم استدعاء فورم او ليست اسمه userform1

تحياتى
و لا تنسونا من صالح الدعاء

G_Double click.rar

تم تعديل بواسطه جلال الجمال_ابو أدهم
  • Like 2
قام بنشر

تحياتى و ايام مباركه
استكمالا للموضوع اعلاه لاهمية الاستفاده من الكود اعلاه
تم اضافة فورم بحث و اضافه من اعمال استاذنا /  عبدالله باقشير للملف اعلاه
و عليه اذا كنت تقوم بعمل  برنامج او ملف به عدد كبير من ادخال البيانات او عدد لا نهائى من تكويد الحسابات
فقم باضافة الكود و الفورم للملف 
و قل الحمد لله
و لا تنسونا من صالح الدعاء

G_Double click_2020.rar

  • Like 1
  • Thanks 1
قام بنشر

تحياتى و ايام مباركه

ياسر خليل أبو البراء

أبو حنــــين

كنت محتاج شرح تفصيلى لكود البحث و الاضافه بالليست بالمشاركه اعلاه و هومن اعمال استاذنا /  عبدالله باقشير
تحياتى

قام بنشر

الأمر يحتاج لبعض الوقت لدراسة الملف بشكل جيد ، ثم إنني لا أجيد التعامل مع الفورم بشكل كبير

الأمر متروك للأخ أبو حنين فهو صاحب باع طويل في هذا القسم

تقبل تحياتي

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information