joly

على فكرة انا لقيت الفايل بتاع الأستاذ محمد حجازى و هارفقوا بس المشكلة انى مش فاهمة الكود يا ريت حد يفهمنى module مكتوب ازاى علشان محتاجة اطبقوا عندى على ملف تانى ارجوا من الأخوة المساعدة FIFO.zip

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

افتح الملف و اعمل save as هتلاقى تحت حفظ بنوع الملف اختار workbook 97-2003

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

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

السلام عليكم ورحمة الله وبركاتة عيد اضحى سعيد و عام جديد سعيد على الجميع تعريب أوفيس 2007 يا جماعة عندى http://www.damasgate.com/vb/showthread.php?t=70437 اسم الـــSite أهو بس لازم تعملوا Registration الأول لو مش مصدقين انا حاطة صورة الشاشة وهيا عربى دى هدية العيد و ابقوا ادعولى

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

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

نادر الفايل بعد التعديل ارجوا انو يكون الحل الصحيح officena.rar

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

اقرأ الملف المرفق اذا لم تفهم شيء راسلنى و سوف اساعدك المشكلة انى معنديش صور عشان اشرحلك بس اعتقد المرفق هيجعلك تفهم البداية بعد ماتقراه راسلنى ونكمل الشرح ____________Microsoft_Office________MsgBox.htm

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

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

Private Sub Worksheet_Activate() xx: Dim x x = InputBox("Password required" & Chr(13) & "يلزم معرفة كلمة السر للدخول لهذه الصفحه ", "من فضلك أدخل كلمة السر") If IsNull(x) Or x = "" Then GoTo xx If x = "بسم الله" Then MsgBox "كلمة السر تم قبولها تفضل لتنفيذ العمليه" Else MsgBox "Wrong Password" & Chr(13) & " عفواً لم تدخل كلمة السر الصحيحه سيتم العوده بك للصفحة الرئيسيه !!", vbOKOnly Sheets("Main").Activate End If End Sub اكتبها داخل Sheet فى صفحة Visual Basic و ليس Module

عزيزى لقد نفذت كل الخطوت لكن دون جدوى لا ادرى ماذا افعل <{POST_SNAPBACK}> الحمد الله لقد حاولت وتوصلت للحل حيث اننى لابد ان ادخل على المشاركة و احدد تحديد خلايا غير مؤمنة و بالفعل تمت النتيجة المطلوبة اشكرك جدا على مساعدتى جعلك عونا للجميع