الاصدار الرابع : فورم اضافة وبحث وتعديل مرن مع استعراض الصور (تحكم كامل بالصورة )

[تومي محمد]

 

السلام عليكم ورحمة الله وبركاته

 

الاصدار الرابع :

فورم اضافة وبحث وتعديل مرن مع استعراض الصور (تحكم كامل بالصورة )

 

 

المرفق 2003

فورم ادخال و تعديل مرن مع الصور.rar

 

 

 

 

 

 

عند فتح الملف والنقر على الزر فورم تعديل واضافة تظهر لي هذه الرسالة فما المشكلة من فضلكم

والسلام عليكم

[]

[احمد فضيله]

اخي الحبيب الاستاذ الكبير العلامه : عبد الله باقشير

 

جزاك الله كل خير

[عبدالله باقشير]

السلام عليكم

 

الاخ محمد عبارة

الاخ fideletoi

 

جزاكم الله خيرا

===========================================

الاخ deebsagheer

الحجم المخصص للصورة صغير

 

جزاكم الله خيرا

===========================================

الاخ محمد تومي

اعتقد عندك خطا في كود فتح الفورم

.kh_SetAddrss "مثال1", "D10:S10"

في اسم الورقة او في النطاق...........والله اعلم

[عبدالله باقشير]

اخي الحبيب احمد فضيلة

 

 

[صلاح الصغير]

استاذ / عبد الله 

بجد شئ رائع جزاك الله خيرا

[عبدالله باقشير]

استاذ / عبد الله 

بجد شئ رائع جزاك الله خيرا

جزاك الله خيرا

[hader]

السلام عليكم استاذنا عبدالله 

بارك الله فيك وجزاك الله الف خير 

استاذنا العزيز انا اعمل على اوفيس 2010 واضفت عمود جديد ووضعت التعليق على راس العمود وعند التنفيذ لم تظهر القائمة المنسدلة

هل ممكن ان تشرح لي وشكرا  

[عبدالله باقشير]

السلام عليكم استاذنا عبدالله 

بارك الله فيك وجزاك الله الف خير 

استاذنا العزيز انا اعمل على اوفيس 2010 واضفت عمود جديد ووضعت التعليق على راس العمود وعند التنفيذ لم تظهر القائمة المنسدلة

هل ممكن ان تشرح لي وشكرا  

وعليكم السلام

 

يجب ان يكون للقائمة اسم معين

ثم تضع هذا الاسم في التعليق

[سعيد 3322]

 عبد الله باقشير
جزاك الله كل خير 
و ان شاء الله يكون في ميزان حسناتك 
هناك استفسار بسيط 
احاول ان اضيف صورة ولكن لا تضاف
كيف يكون ذلك ؟؟

[AL MOTALEM]

الاستاذ القدير ( عبدالله باقشير)

عمل جبار وممتاز 

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

اسئل الله العلي العظيم ان يوفقك ويعينك لكل خير

ويجزيك عنا كل خير

ممكن طلب بسيط 

هل يمكن جعل اضافة الصورة من الكامير مباشر

وشكراً

[عبدالله باقشير]

الاستاذ القدير ( عبدالله باقشير)

عمل جبار وممتاز 

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

اسئل الله العلي العظيم ان يوفقك ويعينك لكل خير

ويجزيك عنا كل خير

ممكن طلب بسيط 

هل يمكن جعل اضافة الصورة من الكامير مباشر

وشكراً

 

بعد التصوير اضف الصورة الى (ملف الصور) يدويا وادخل اسم الصورة في الجدول يدويا في عمود اسم الصورة في سجل صاحب الصورة

 

تحياتي

[المشاغب الصغير]

هل من الممكن تطبيقة علي اوفس 2010

[اسكندراني]

ما شاء الله يا استاذ عبد الله باقشير   حقا ا نه عمل رائع  ومجهود جبار 

ربنا يبارك لك  ويزيدك من علمه 

ولكن لى استفسار 

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

ثانيا 

الخط فى عنوانين  LABEL بجوار مربعات الادخال كبير  فمن اين يتم التحكم فى حجم الخط 

معذرة على الاطاله ولكن جزاك الله خير فى هذا العمل الرائع  والذي سينتفع به الكثير وجعله الله فى ميزان حسناتك 

 

[عبدالله باقشير]

هل من الممكن تطبيقة علي اوفس 2010

 

هو يعمل على 2003 وما فوق

ويمكنك حفظه باصدار xlsm

[عبدالله باقشير]

ما شاء الله يا استاذ عبد الله باقشير   حقا ا نه عمل رائع  ومجهود جبار 

ربنا يبارك لك  ويزيدك من علمه 

ولكن لى استفسار 

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

ثانيا 

الخط فى عنوانين  LABEL بجوار مربعات الادخال كبير  فمن اين يتم التحكم فى حجم الخط 

معذرة على الاطاله ولكن جزاك الله خير فى هذا العمل الرائع  والذي سينتفع به الكثير وجعله الله فى ميزان حسناتك 

 

جزاكم الله خيرا

 

الخط وملحقاته يمكنك تغييرها عن طريق الخاصية Font  للفرمة Frame1

في وضع التصميم.

تحياتي

[اسكندراني]

بارك الله فيك استاذنا ومعلمنا الكبير 

وبالفعل وصلت للتحكم فى الخط كما وضحت حضرتك سابقا  

ولكن بقى استفسار كيفيه فتح الفورم فى وضع locked حيث لا تتوافر هذة الخاصيه ضمن خصائص fram1  

 

والامر الثاني : 

لدى ملفان بكل منهم  18 و 25 صفحه  واحتاج لربط النموذج  بكل صفحه  

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

فهل هناك طريقه اخرى تسهل هذا الامر 

 اعلم اننى اثقلت عليك فى طلباتي ولكن تعلم والله ان برنامجك هذا هو مدرسه واجمعه نتعلم منها الكثير 

[عبدالله عيسى الزواوي]

اللهم ارزقكم العلم النافع واحتسب اجركم على الله .

[إبراهيم محمد]

ما شاء الله عليك يا استاذنا ومعلمنا الكبير الاستاذ الفاضل / عبد الله باقشير 

تحيه من القلب على هذا العمل الرائع  والذى يدل على عبقريه وعلم غزير  زادك الله منه 

وفى الحقيقه انا حملت الفورم واستفدت وتعلمت من هذة الاكواد الكثير  وتعجز الكلمات عن شكرك 

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

فقط هو لحل مشكله تعدد ازرار فتح النموذج حسب كل صفحه 

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

وانا لم اتطرق الى اكواد الفورم ولكن فقط فى كود فتح الفورم 

ارجو ان لا اكون تجاوزت  فاننى مقارنه بعلمك لا زال امامي الكثير والكثير 

بارك الله فيك ودائما ننتظر منك المزيد ونتعلم منك الكثير  

Sub kh_Show_UFormChang1()
On Error GoTo 1

Dim sh As String
sh = Sheets("مثال1").ComboBox1.Value

Select Case sh
Case Is = "مثال1"
    With UFormChang
        .kh_SetAddrss sh, "C10:R10"
        .kh_SetPicture "PH", "T10"
        .Show
    End With

Case Else

    With UFormChang
        .kh_SetAddrss sh, "C4:P4", "B4"
        .kh_SetPicture "MyPhoto", "R4"
        .Show
    End With

End Select

1:
If Err Then MsgBox "تاكد من صحة ادخال المتغيرات الاساسية في  : " & vbCr & vbCr & "kh_SetAddrss", vbCritical + vbMsgBoxRight + vbMsgBoxRtlReading, "استخدام خاطىء"
On Error GoTo 0



End Sub

فورم ادخال و تعديل مرن مع الصور.rar

[gouna]

 

[ابو القبطان]

اشكر اهتمامك واعجز عن وصفك ... وافتخر بك

[ابو القبطان]

استاذنا 

- من فضلك لو حجم الصوره تكون لنا طريقه سهله لتكبيرها ( يعني حسب الرغية ) 

- عند الطباعة تغطي الصورة جزء من البيانات

وتقبل شكرنا 

[عبدالله باقشير]

استاذنا 

- من فضلك لو حجم الصوره تكون لنا طريقه سهله لتكبيرها ( يعني حسب الرغية ) 

- عند الطباعة تغطي الصورة جزء من البيانات

وتقبل شكرنا 

اي طباعة

التي على الفورم او التي على الشيت

[ابو القبطان]

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

سعدت بتواصلك معي واشكر اهتمامك

[ابوبكر عبدالمقصود]

الاستاذ القدير المحترم    ا/ عبدالله 

 

جزاك الله خيرا انا عضو جديد ولا اعرف كيف اضيف الصور فرجاء تعليمى كيف اضيف الصور علما باننى اضفتها فى الفولدر الخاص بسيادتكم ولكن لا اعرف اضافتها داخل الفورم او شيت الاكسيل

 

وتقبلوا وافر الشكرو الاحترام

فورم ادخال و تعديل مرن مع الصور (1).rar

تم تعديل سبتمبر 6, 2014 بواسطه abobakrabdo

[محمد علي الطيب]

موسوعة الابداع