علي حيدر

اخي ارفق الملف

تفضل اخي لقد عدلت لك على الملف ارجو ان يكون المطلوب وكل عام وانتم بخير A1111.rar

اخي هذا الكود لا يعمل لا نه غير مكتمل مفقود كود . ضع الكود الاتي في حدث الملف Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim motpass As Variant Dim AAAA As Variant Dim MS As Variant AAAA = MsgBox("" & "Do you really want Printing this sheet?" & "", vbYesNo, "Prenting") If AAAA = vbNo Then Cancel = True Exit Sub Else End If motpass = Application.InputBox("Please enter your password!", "Prenting ") If motpass <> 3 Then motpass = Application.InputBox("Please enter your password!", "Prenting ") MS = MsgBox("The password is incorrect", , "Prenting") Cancel = True Exit Sub Else End If End Sub هذا الكود خاص بي يعمل مئة بالمئة نسالكم الدعاء بالتوفيق البسورد رقم 3

يجب الحفظ باسم مثال exmpel.xlsm يعمل معك الملف باذن الله

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

اخواتي الاساتذه بعد البحث وجدت الملف المرفق اريد إضافة كود لتغير اتجاه الكوماندوز بار من اليمين الى اليسار الملف مرفق مع صور أتمنى المساعدة حتى يستفيد منه جميع الأعضاء اذكرنا بالخير MenuMaker_UFrmAPI.rar

بانتظار مساعدكتم

استعمل Windows 8.1 64bit office 2007 عند مشكلة انه microsoft common controls 6.0 sp6 object library not registered لا تعمل هل من مساعد من الخبراء حياكم الله وجعلها في ميزان حسناتكم

مساعده من الاخوة الكرام استعمل اكسيل 2007 حملت ملف VisualBasic6-KB896559-v1-ENU حتى استطيع العمل في الكوماند microsoft toolbar control version 6.0 مثلا وغيرها فرجن 6 ولكن لم افلح ما الحل رجئاً

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

اخي حمادة وبعد اذن اخي واستاذي عبدالله بقشير الذي تعلمنا منه الكثير في ههذا المنتدى الكبير والعزيز وبعد اخي حماده ما عليك عمله خطوتان الأولى ان تذهب الصفحه KH وتكتب اسم الكود او علامة التمييز للقائمة الفرعية العامود C او G بعدها اذهب الى محرر الاكواد واضف في Module2 مثلا كود الأستاذ عبدالله بقشير KH_1 انظر الموديل هكذا Sub kh_1() MsgBox "تم الحفظ" End Sub ضع مثلا Sub kh_1() USERFORM.SHOW End Sub او أي اسم يوزر فورم موجوده في البرنامج بتاعك ارجو ان تكون الفكره واضحه في هذا الشرح

اللهم زيد وبارك نحن في انتظارك بارك الله فيك

تزيدنا شوقا وتعلقا بك اخي الزباري نحن في الانتظار وفقك الله

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

جزاك الله خيرا الله يزيد من عطائتك اخي جلال الجمال

السلام عليكم اخي م . سعيد ارجو ان يكون هذا المطلوب اليك المرفق التاريخ 2.rar

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

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

اخي ياسر خليل أبو البراء لقد قمت بطرح موضوع مستقل كود تحويل المعا\لة في ادخال البيانات تقبل تحياتي

استاذي ياسر خليل أبو البراء لي طلب تحويل المعادلات الموجود في الصف رقم 14 ابتداء من الخلية p حيث اريد ان يعمل الكود عند ادخال البيانات في صف جديد تفبل تحياتي تحويل المعادلة الى كود.rar

جميل جدا اخي ياسر خليل أبو البراء هذا افض الله عليك من نعمه ولكن عندي سؤال هل ممكن التحويل فقط في الخلية لاني اريد استعملها في ادخال البيانات مثال p14 =IF($P$10=G14;F14;"") تقبل تحياتي

شكرا لك اخي ياسر خليل ابو البراء ممروركم يشجعنا على تقديم المزيد باذن الله اقبل تحياتي

شكرا للمروركم اخي يسر ابو خليل اخي ابو حنينشكرا لدعائك تقبلو تحياتي

الى جميع الاخوى الاعضاء اضع بين ايدكم في منتدانا الكريم على ال جميع بلمعلومات ملف عله نستفيد منه والعطاء لله ومن الله تكرمون وتقبلو تحياني local_month_and_day_names.rar

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