وليد شعراوى

خالص عزائي لأستاذنا الكبير ؛

ورحم الله الفقيدة بواسع رحمته وغفرانه

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

دي الصورة اللي بتظهر لي عند الضغط على الأسم في الليست بوكس

أنا باستخدم ويندوز7 وأوفيس 2010

الخطأ فين لو تكرمتم - مرفق الملف

مع خالص شكري لأهتمامكم

Book1.xlsm

يا أستاذنا والله انا عاجز عن الشكر تسلم ايدك وربنا يجازيك بكل خير

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

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

المشكلة أنه يمكن لأي مستخدم تعديل السعر - وهذا أريد منعه

المطلوب فضلاً / كود لحماية التكست بوكس الخاص بعامود السعر من التعديل عليه

مع خالص شكري وتقديري للأهتمام

نسخة تجريبية.xlsm

أقسم بالله لسة فاتح النت حالاً ...☺️

خالص شكري وتقديري للجميع

أستاذ عبد الله أنا عاجز عن الشكر

تسلم أيدك 

ويارب دايماً بالصحة والخير والسعادة

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

أنا عامل برنامج حسابات خفيف به محلات وأصناف وموردين وخزينة فرعية

لكن باستخدم أربعة (Command Button) واحد لتسجيل (حركة الصنف) والتاني لتسجيل (حركة المحلات) والتالت لتسجيل (حركة الموردين) والرابع للتسجيل في (الخزينة الفرعية)

ومنعاً للسهو أثناء التسجيل 

كنت أرغب في أستخدام زر واحد فقط ( بدلاً من أربعة ) ليقوم بكل المهام تسجيل في حركة الصنف+حركة المحل+حركة الموردين+الخزينة

هل يوجد من الأخوة الأفاضل من يساعدني في عمله

مرفق البرنامج ومرفق صورة الواجهة له (اليوزرفورم)

مع خالص شكري وأمتناني 

حسابات 2020.xlsm

18 ساعات مضت, مجدى يونس said:

اقصد

الفيديو بتاعى فيه صفحة بها شغل للكنترول

https://www.youtube.com/watch?time_continue=1620&v=-1aY9VBedGIhttps://www.youtube.com/watch?time_continue=1620&v=-1aY9VBedGI

 

انا متابع كل فيديوهات حضرتك على اليوتيوب

من قبل ما أشترك في المنتدى هنا 

اليوزر فورم السحري رائع فعلا وحملته وجربت شغله

لكن انا وجدت الحل لمشكلتي بالأمس وكان من خلال أحد دروسك أيضاً

سأضعها ان شاء الله بمجرد الأنتهاء منها للأستفادة 

أكرر شكري على دروسك القيمة وعلى سرعة أستجابتك وتعاونك 

12 دقائق مضت, مجدى يونس said:

عزيزى وليد شكرا لك

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

سيفيدك الفورم فى حل مشكلتك

 

حضرتك تقصد الفيديو الخاص بالأستاذ / عماد غازي

جاري تحميله ومشاهدته

شكراً لأهتمامك 

أستاذ / مجدي ... بداية أشكرك جزيل الشكر على برامجك الممتعة

أستفدت منها كثيراً في مجال عملي - ربنا يبارك لك 

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

عايز أضيف صنف جديد - الصنف فعلا بيتم أضافته - ولكن ...

فيه عامود به عمليات ضرب ( الصنف * السعر )

الشيت بيتنسخ بدون ( عملية الضرب ) وأنا محتاجه ينسخ الشيت بأي عمليات موجودة في العامود

أية الحل ؟

مع خالص شكري وعظيم أمتناني

برنامج أختيار الأصناف قبل التعديل.xlsm

14 ساعات مضت, ali mohamed ali said:

اهلا بك اخى الكريم فى المنتدى كان عليك رفع الملف نفسه

تفضل هذا هو الملف

 

Search & add Sheets.xlsm

بداية ً ... أشكرك على الأهتمام بالرد 

الملف اللي حضرتك أرفقته هو نفس الملف الموجود عندى من دروس الأستاذ / عماد غازي

المشكلة في هذا الملف ( المعادلة) أنها تنسخ الشيت بدون العمليات الموجودة في الخلية ( ضرب أو جمع أو طرح )

النسخ بيتجاهل تماما وجود عمليات حسابية داخل أي خلية !!

هل هناك صيغة معينة لنسخ الشيت بنفس العمليات الموجودة في الشيت الذي يسبقه ؟

بمعنى هنا المعادلة بتقول 

Worksheets.Add(after:=Worksheets(Worksheets.Count)).Name = chosename

دي إضافة للشيت بدون عملياته - هل هناك صيغة أخرى لنسخ الشيت كما حددته أنا ؟

مع خالص شكري وتقديري 

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

عندي برنامج لأضافة أصناف جديدة للمخازن

البرنامج يقوم بأضافة شيت جديدة

(المشكلة) أن الشيت الأصلي المطلوب نسخه كما هو فيه عامود ( خلية ضرب الصنف في السعر)

لكن عندما أقوم بعمل أضافة لشيت / صنف جديد يقوم بأضافتها ولكن بدون عملية الضرب الموجودة في الخلية (عامود C)

هل من الممكن التفضل بوضوع صيغة تصحيح للمعادلة

بحيث يمكن للبرنامج إضافة الشيت الجديدة بجميع معادلاتها الموجودة في الشيت الأصلي الأول ( سواء ضرب أو طرح أو جمع ) ؟

مع خالص الشكر مقدماً

صورة البرنامج مرفقة

ودي صيغة المعادلة الموجودة عندي

Private Sub CommandButton4_Click()

chosename = InputBox("اختار اسم الصنف")

Worksheets.Add(after:=Worksheets(Worksheets.Count)).Name = chosename

Sheet1.Range("a1:c1").Copy ActiveSheet.Range("a1:c1")

ActiveSheet.Range("a1:c1").ColumnWidth = 23

Me.ComboBox1.Clear

UserForm_Initialize

End Sub