نبيل عبد الهادي

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

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

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

السلام عليكم 

اذا كانت الخلية B1=A1 حيث A1 خلية التاريخ والتنسيق يوم / شهر/ سنة في حالة الخلية A1 كانت فارغة يظهر التاريخ في خلية B1 بهذا الشكل 1900/01/00 . المطلوب  ان تكون فارغه  وشكرا لكم 

التخلص من التاريخ الافتراضي.rar

ارجوا المساعده اخواني هل يوجد حل ؟

اخواني الاعزاء  . السلام عليكم 

في المرفقات كود في حدث ورقة قيود اليومية 

المشكلة التي تواجهني تتلخص بما يلي :

1- عند كتابة اسم اي حساب ليظهر في القائمة المنسدلة . الكود لا يتحسس بسرعة للاحرف عند كتابة اول حرف من اسم الحساب الا بعد الضغط مرتين على الحرف في الكيبورد ثم يستجيب علما ان مصدر القائمة المنسدلة هو ورقة الدليل المحاسبي. 

2- في بعض الاحيان وفجاءة الكيبورد لايستجيب عند محاولة الكتابة في حقل المدين او الدائن ومحاولة اضافة المبلغ . الى بعد الخروج من ورقة قيود اليوميه والرجوع اليها ويتم الكتابة في الحقول وتعود الحالة واكرر نفس الاجراء بالخروج والرجوع مرة اخرى .

ماهي المشكلة اخواني ؟ ارجوا المساعده للضرورة مع فائق شكري وتقديري 

combobox.rar

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

الكود:

()Public Sub insertRowBelow
ActiveCell.Offset(1).EntireRow.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrAbove
ActiveCell.EntireRow.Copy
ActiveCell.Offset(1).EntireRow.PasteSpecial xlPasteFormats
Application.CutCopyMode = False
End Sub

هل ممكن  تعطينا الكود اخي الكريم لتعم الفائدة للجميع 

للمساعدة 

الأخوة الكرام السلام عليكم

في المرفق وفي محرر الاكواد وفي ( modul 1 ) يوجد ستة اكواد تؤدي غرض معين

المطلوب: تنفيذ هذه الاكواد في نفس الوقت عند اختيار الشهر من القائمة المنسدلة في ورقة (الرئيسية) مع

الاخذ بالاعتبار ما يلي:

1- عدم تنفيذ الاكواد اذا تم اختيار بالخطء شهر سابق للشهر الحالي

2- الغاء رسالة التأكيد الموجود في بعض الاكواد وجعلها رسالة واحدة عند اختيار الشهر من نعم / لا

3- يوجد كود في حدث ورقة (قيود اليومية ) ان لا يتأثر في الإجراءات أعلاه

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

الجداول الختاميه الشهرية.rar

نعم اخ طلعت هذا ماكنت اقصده بالضبط وفائق شكري وتقديري لحضرتك

اخواني الاكارم . السلام عليكم 

في المرفق وفي ورقة عمل (تحليل السلف ) وعند استخدام الدلة VLOOKUP لجلب بيانات من ضمنها التأريخ يظهر تأريخ غير معرف في حالة عدم وجود تاريخ فعلي . كيف يمكنني التخلص منه وهل يجب تعديل المعادلة ؟ ام ماهي الطريقه ؟ ولكم جزيل الشكر والتقدير

التربية 2.rar

شكرا لك اخ سليم تم حذف الرقم وحلت المشاكل خالص تحياتي 

اخواني الاعزاء  السلام عليكم

مشكلتي تتلخص بمايلي 

1- في ورقة قيود اليومية وعند اختيار اي حساب من خلال  في عمود (A) وعند الانتقال لحقل المدين او الدائن لادراج مبلغ معين يكون هناك بطئ شديد وعدم استجابة الاكسل الا بعد فترة طويلة

2- عند زيادة المدى في الكود الخاص بعمل combobox في السطر  .List = Sh2.Range("G6:G1000" & iLastRow2).Value تظهر هناك رسالة خطء في هذا السطر 

ارجوا المساعدة ولكم فائق الشكر والتقدير

الجداول الختامية الشهرية.rar

استاذ ياسر انت شمعه تنير الدرب للمبتدئين . الكود يعمل 100% بعد تغير sheet2 الى ورقة6 كل الشكر والتقدير لحضرتك .الله يجعلها في ميزان حسناتك

استاذ ياسر كل الشكر والتقدير لحضرتك وتفضلك بالرد ولكن عند تطبيق الكود في حدث الورقة يظهر لي هذا الخطأ لا اعلم ماهي المشكله .خالص تحياتي

السلام عليكم . في الملف المرفق كود إنشاء combobox في ورقة تسديد الاقساط في العمود ( C ) ارجوا المساعده في تكرار نفس الكود في نفس الورقة ولكن في العمود ( D ) مع ملاحظة اختلاف مدى الخلايا في ورقة 1 ليصبح  B1:B4

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

combobox.rar

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

اخواني الاعزاء لقد وجدت كود في احد المشاركات يفيدني كثيرا في عملي والكود يوضوع في حدث الورقة لعمل ComboBox لقائمة منسدلة. المشكلة التي واجهتني ان الكود يعمل في حدث ورقة1 وعندما اضعه في حدث ورقة3 لايعمل ويعطني رسالة خطأ كما في الصور ادناه واريد استخدام هذا الكود في اوراق عمل كثيرة في نفس المصنف علما اني استخدم اكسل2013 هل له علاقة بالموضوع ام ماهي المشكلة ؟  والملف في المرفقات ارجوا المساعدة  

combobox.rar

جرب اضغط باستمرار  على  زر  ( shift‬‏ ) وفي نفس الوقت افتح البرنامج 

وان كان الرد متاخر . ولكن العمل رائع ومهم جدا ... بارك الله فيك اخ ياسر العربي

بارك الله فيك اخي  ابو محمد الامين هذا هو المطلوب بالضبط والكود يعمل 100% الله يجعلها في ميزان حسناتك

المطلوب: في المرفق وفي sheet(الدليل المحاسبي)عند اختيار اي صف والنقر عليه  double click يقوم بنسخ نفسه تحته مباشرة وبجميع التنسيقات والمعادلات : مع فائق شكري وتقديري  للاخوه في هذا الصرح العلمي الكبير

دليل الحسابات 2016.rar

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

نسخ.rar

نسخ.rar

تفضل اخي وحسب مافهمته من طلبك عله يفي بالغرض

الفلترة والغاء الفلترة في شيت محمي.rar