نجوم المشاركات

بسم الله الرحمن الرحيم الحمد للـه الذي بنعمته تتم الصالحات، والصلاة والسلام على سيدنا محمد المبعوث بالرحمات، وعلى آله وصحابته أولـي النهى والمكرمات، وعلى التابعين ومن تبعهم بإحسان مابقيت الأرض والسموات. وبعد ,,,, السلام عليكم ورحمة الله وبركاته أخواني وأخوتي الكرام في صرحنا المبارك اوفيسنا التعليمي كان هناك موضوع للاخ الكريم // اسماعيل طه (( طلب نموذج إيداع نقدي وسحب نقدي )) علي الرابط http://www.officena.net/ib/index.php?showtopic=51017 والاخ الكريم مشكور راسلني عدة مرات علي الخاص وعرض مقابل مادي واضحت له كما اوضح عدد من اخواني (جزاهم الله كل خير ) علي ذات الرابط السابق , أن الهدف من جمعنا انه تطوعي علي حسب وقت كل منا بهدف تبادل الخبرات المختلفة ونشر العلم والاحترام قبل كل شيء بينا وجمع الله بيننا بنعمته في التاخي والمحبة يمكن لا ابالغ ان قلت علي مستوي جميع المنتديات العربية والأجنبية بكل حب وأحترام وتأخي وعد الاخ الكريم اني سوف انجز العمل علي ما يسمح وقتي لوجه الله واقل ما نقدمه مقابل الكثير والكثير الذي تعلمناه من فرسان هذا الصرح , وبعد يوم واحد أرسل رسائل اخري انه سوف يدفع مقابل مادي (فلوس) كما ورد بالنص برسالته الكريمة فيا اخي الكريم العمل تبرع واجتهاد لوجه الله ولا نبغي جزاءا ولا معروفا الا دعوة بظهر الغيب بصلاح الحال ولي سؤال سألته لك لك ما جاوبتني ماهو المقابل امام رجاء الثواب من عند الله عز وجل ؟؟؟ وهل لو هناك مقابل سوف ينجز العمل خلال ساعات ؟؟؟ هدانا الله واياكم الي الصالحات واعتذر للاطالة أحببت عرض الموضوع بشكل عام حتي يكون هناك توضيح عام اننا لا نهدف الي الربح والترزق واوضح هدفنا الأسمي والأعلي من تجمعنا المبارك لتبادل الخبرات وأعتذر من ادارة الصرح اني قمت بفتح الموضوع بشكل مستقل بذاته لسهولة البحث وتعميم الفائدة البرنامج مع شرح موجز لشاشته المختلفة للتعرف علي الجانب الأخر من الاكسيل اننا يمكن ان نستخدمه بشتي الطرق وابراز جوانب فنية بجانب دور الاكسيل الاساسي شاشة الدخول وكلمة المرور (111) البرنامج يحتوي علي خيارين الخيار الاول (العمليات ) وتنقسم كالتالي 1- قسيمة ايداع نقدي ( لتسجيل الايدعات اليومية ) مع مسلسل ورقم سند تلقائي (جاري - توفير - مقاصة ) 2- قسيمة سحب نقدي (لتسجيل المسحوبات اليومية ) مع تسلسل ورقم سند تلقائي. ي (جاري - توفير - مقاصة ) 3- بحث ( يستخدم للبحث عن عملية معينة ) سواء اكانت العملية سحب او ايداع . 4- كشف حساب قسائم الايداع (كشف حـ/ شهري لاظهار معاملات الايداع علي الحسابات المختلفة خلال شهر معين ) 5- كشف حساب قسائم السحب ( كشف حـ/ شهري لاظهار معاملات السحب علي الحسابات المختلفة خلال شهر معين) 6- معلومات الحساب ( لتسجيل عميل جديد او الاستعلام عن بيانت عميل ) الخيار الثاني العمليات المصرفية الهدف منه اظهار المعلومات المتعلقة بالعمليات المصرفية المختلفة ويستخدم في الجانب التسويقي اكثر للخدمات البنكية وينقسم الي عدة خيارات كالتالي 1- أسعار العملات 2-حسابات التوفير (معلومات عن حسابات التوفير وكيفية فتح الحساب) 3-بطاقات الأئتمان. 4- تسهيلات الشركات . 5-بطاقة الماستر كارد. 6- مواقع الصراف الألي. واترككم لتجربة البرنامج بانفسكم والتعرف علي الوظائف المختلفة وادعوا الله سبحانه وتعالي ان يكون فيه الفائدة لكم ان كانت هناك اي ملاحظات او اخطاء واردة في البرنامج يسعدني ان استقبلها لتعديله ولتعميم الفائدة علي ذات الموضوع مع تحياتي واحترامي لكم اخيكم ضاحي الغريب ولا تنسونا بدعوة بظهر الغيب بصلاح الحال برنامج ادارة الخدمات المصرفية - ضاحي الغريب.rar

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

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

أختى الغالية ( أم عبد الله ) شكرا أختى الغالية على كلماتك ومرورك ، وبارك الله فيكى ومبروك على ترقيتك ، والمنتدى وأستاذنا ( عبد الله بقشير ) أحسن الأختيار لأن حضرتك مكسب ، وأنا متأكد إنكى ستصليين إلى ماتريدين لأن حضرتك تستحقين الأفضل شكرا أخت الجليلة تقبلى : تحياتى

أستاذى ومعلمى وعالم الوطن العربى ( عبد الله بقشير ) ماأسعد المشاركة بأن يكون أول المعلق عليها أستاذى ومثلى الأعلى وماأسعدنى أنا بمرور أستاذى ومعلمى على مرفق لتلميذه شكرا أستاذى وبارك اللهم لك وأعطاك الصحة والعافية ، لتكون داعما ومحفزا لتلاميذك دائما تقبل تحيات : تلميذك

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

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

أخى الحبيب ( blood ) شكرا على كلماتك الرائعة ومرورك الكريم بارك الله فيك تقبل تحيات : أخيك

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

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

العب مع الفورم ... حركة لطيفة وخفيفة .. واظهر قوة ملاحظتك اقدم لكم حركة خفيفة ولطيفة بعض الشئ باستخدام الفورم ويمكن تطويعها لألعاب اخري .. كما تشاؤون او افكار جماليه في ملفاتكم مثل استخدامها هنا لألعاب قوة الملاحظة ... كل ما عليك هو العثور علي الكرة المختلفة بين الثلاثة للانتقال للمرحلة الثانية ... ثم اختيار الكرة المختلفة للدخول لملف الاكسيل ارجو ان تنال الفكرة اعجابكم مع تحياتي ( ابوسمـــا ) جزاكم الله خيرا حركة لطيفة وخفيفة- لعبة قوة الملاحظة.rar

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

الاخ الكريم / محمد قدومي بارك الله فيك وان شاء الله باصرارك وحبك للتعلم ستصل الي ما تصبو اليه تقبل خالص تحياتي

السلام عليكم الاخ الكريم / MJDO بارك الله فيك علي حسب فهمي لطلبك استخدم الكود التالي لطباعة صفحة مخفية ويعمل الكود علي اظهارها وقت الطباعة فقط ثم اخفاؤها مرة اخري وطباعة النطاق المطلوب في الصفحة المقصودة ارجو ان يفي بطلبك Sub SAMA_PRINT_HIDE() Sheets("Sheet2").Visible = True Sheets("Sheet2").PageSetup.PrintArea = "A1:K30" Sheets("Sheet2").PrintOut Sheets("Sheet2").Visible = False End Sub ويجب عليك اخي الكريم عند كل سؤال او طلب ارفاق ملف كمثال لتوضيح الصورة اكثر للجميع في انتظار ردك .... تقبل خالص تحياتي طباعة شيت مخفي بزر في الرئيسية.rar

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

السلام عليكم الاخ الكريم / سيد رجب بارك الله فيك قمت بعمل كل شئ مضبوط تماما ولكنك نسيت اهم ما افي الموضوع وهو وضع الكود التالي في حدث فتح الملف ThisWorkbook وهو الخاص باعطاء الامر للملف بفتح الفورم اولا عند فتح الملف Private Sub Workbook_Open() Application.EnableCancelKey = xlDisabled Application.Visible = False UserForm1.Show Workbooks.Application.Visible = True ورقة1.Select End Sub في الملف المرفق ستجد الكود موجود في حدث ThisWorkbook مشروحا بالكلمة او عد للشرح في الدروس الاولي وستجد انها مشروحه خطوة خطوة وفي انتظار ردك ارجو ان يفي ذلك بطلبك تقبل خالص تحياتي اجازات الموظفين4.rar

السلام عليكم الشكر واصل لاخي الحبيب ابو حنين لاثراء الموضوع ممكن تستخدم المعادلة التالية ضعها في الخلية F5 واسحبها =IF(SUMPRODUCT(N(ISNUMBER(--MID(D5;ROW(INDIRECT("1:"&LEN(D5)));1))));"";D5)

الاخ الفاضل / محمد 28 وجودك دائما يسعدني شكرا على المرور والكلام الجميل جزاك الله خيرا

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

أخي جمال لي تنبيه بسيط اردت ان ارسله في رسالة على الخاص ولكن لم يتم ولعلك اغلقت استقبال الرسايل.... فكيف ارسلها لك ؟!

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

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

روعة بجد بارك الله فيك اخى الفاضل و زادك علما

تم تعديل الأصدار وأضافة ( USER FORM ) لإخفاء ماتريدة من أوراق برنامج نتيجة الإمتحانات الأصدار الثانى.rar

تم الأجابة على هذا فى مرفقك الأول تقبل تحياتى

أخى ( محمد ) شكرا على المرور ، وعلى كلماتك الرائعة بارك الله فيك وجعل دعائك هذا فى ميزان حسناتك تقبل دعاء أخيك

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

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

أليك أخى ماأردت جمع قيم فى وضع الفلترة.rar

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

السلام عليكم الاخ الكريم / سيد رجب جرب المرفق التالي ان شاء الله به طلبك اجازات الموظفين+.rar

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

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

السلام عليكم الاخ الكريم / مصطفى غريب بارك الله فيك بالنسبة للسؤال الاول ... تم الرد عليك في الرابط http://www.officena.net/ib/index.php?showtopic=49457&hl= وبالنسبة للطلب الثاني ... شاهد اولا هذا الرابط ... ثم اخبرني http://www.officena.net/ib/index.php?showtopic=39323 جزاك الله خيرا

السلام عليكم الاخ العزيز / مصطفى غريب بارك الله فيك وقد سعدت كثيرا بانك انت من تقوم بتصميم برنامجك وما تريد بنفسك فهذه افضل طريقة للتعلم والتقدم للامام ... وننتظرك باذن الله عضوا محترفا بالنسبة لطلبك بظهور فورم آخر ... شاهد المرفق (( هل هذا ما تريد ظهوره )) كلمة المرور :حمادة عمر الرقم السري : 12345 طريقة عمل الشاشة الافتتاحية .rar بالنسبة لطلبك الثاني بخصوص الامتداد xlms شاهد الرابط التالي http://www.officena.net/ib/index.php?showtopic=42688&hl=xlms#entry245112 وهذا ايضا http://www.officena.net/ib/index.php?showtopic=40068&hl=xlms واي استفسار او طلبات معك دائما باذن الله جزاك الله خيرا

رمضـــان كـــريـــم

السلام عليكم الاخ الكريم / على عبدالراضى بارك الله فيك ما فهمته هو انك تريد تركيب الفورم الموجود في الملف علي ملفك ليصبح هو شاشة الدخول بالرقم السري الذي تحدده الرقم السري للدخول : 1 وعند كتابة الرقم خطأ يغلق البرنامج بعد ظهور الرسالة ... فتم التعديل الطفيف علي الكود المرسل منكم ليكون كما يلي : Private Sub CommandButton1_Click() If TextBox1 = Sheets("æÑÞÉ1").Range("I1").Text Then MsgBox "ßáãÉ ÇáÓÑ ÕÍíÍÉ æ íÊã ÊäÝíÐ ØáÈß", vbOKOnly, "ÔßÜÜÑÇ" Sheets("æÑÞÉ1").Select Cells.Select Selection.EntireColumn.Hidden = False Rows("9:120").Select Selection.Sort Key1:=Range("I9"), Order1:=xlAscending, Header:=xlNo, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal End Else MsgBox "ßáãÉ ÇáÓÑ ÎØÇ " & Chr(13) & " ÍÇæá ãÑÉ ÇÎÑì ", vbOKOnly + vbMsgBoxRtlReading + vbMsgBoxRight, "ÚÝæÇ" Application.Quit ' End End If End Sub واليك المف المرفق وفي انتظار ردك ... وطلباتك جزاك الله خيرا 1++.rar

السلام عليكم الاخ الكريم / على عبد بارك الله فيك واسعد جدا بان تكون اول مشاركة لك في المنتدي في موضوع لي وستسعد جدا ( ان شاء الله ) بانضمامك لاسرة هذا الصرح العملاق ==================== بالنسبة لطلبك اخي الكريم .... واضح ان المشكلة لديك في تخفيض مستوي امان الماكرو حيث لايعمل الماكرو او الفورم الا اذا كان ستوي امان الماكرو منخفض واليك طريقة تخفيض مستوي الامان ( بالصور ) مع الشرح في كل اصدارات الاوفيس 2003 ، 2007 ، 2010 وستحل المشكلة لديك باذن الله واي استفسار او طلب ... معك دائما ان شاء الله جزاك الله خيرا طريقة تخفيض مستوى الأمان في كل إصدارات الإكسيل.rar

السلام عليكم الاخ الكريم / metwally1 بارك الله فيك وجزيل شكري علي كلماتك الجميله جدا بخصوص تعلم عالم الاكواد في الفيجوال بيسك ... لا يوجد احد يمكنه ان يخبرك باي شئ تبدأ ولكن يتم ذلك مع البحث والاستفسار ... فكلنا قد بدأنا من الصفر ... وما زلنا نتعلم الكثير كل يوم ولكن اقدم لك روابط بعض المواضيه الهامة والتي سوف تساعدك كثيرا في البدايه للدخول الي ما تريد معالم على طريق البرمجة بلغة VBA http://www.officena.net/ib/index.php?showtopic=31559&hl=%D9%85%D8%B9%D8%A7%D9%84%D9%85 اهداء بسيط لاعضاء المنتدى الكريم اكواد الا خ زياد مع الشرح اكرمة الله http://www.officena.net/ib/index.php?showtopic=32009&hl=%D9%85%D8%B9%D8%A7%D9%84%D9%85 ورابط آخر رااائع بشرح فيديو ممتاز دورة شرح الفيجول بيسك للتطبيقات VBA http://www.officena.net/ib/index.php?showtopic=39323 وبالبحث ستجد الكثير والكثير .... واي استفسار او طلب مهما كان صغير او كبيرا ضع له موضوع جديد ... وستجد الجميع معك وستجد افضل الردود والحلول ( باذن الله ) وسأكون من اول المنتظرين لاولي روائعك التي ستقوم بتصميمها بعد ذلك ( ان شاء الله ) جزاك الله خيرا

السلام عليكم الاخ الكريم / carffour بارك الله فيك ولكن واضح ان مستوي امان الماكرو لديك مرتفع او مرتفع جدا ... يجب تخفيض مستوي الامان في الاكسيل الي منخفض لتعمل معك الاكواد والفورم في اي ملف اكسيل ... قم بتخفيض الامان ثم اغلق الملف وقم بفتحه مرة اخري واليك ملف به طريقة تخفيض مستوي الامان في كل اصدارات الاكسيل 2003 ، 2007 ، 2010 وانتظر ردك بالنتيجه ... وان شاء الله ستعمل معك الشاشة بنجاح جزاك الله خيرا طريقة تخفيض مستوى الأمان في كل إصدارات الإكسيل.rar

الاخ الكريم / الطرابيشى بارك الله فيك اما بخصوص طلبك .... فعلي حسب فهمي للطلب !! قم بالدخول علي محرر الاكواد باستخدام Alt + F11 ثم قم بالدخول علي حدث ThisWorkbook وقم بالغاء السطر التالي من الكود الموجود بالصفحة الموجودة امامك ... بعد الغاؤه لن يطلب منك اثناء فتح البرنامج كلمه مرور ولن يظهر اليوزرفورم UserForm1.Show وان لم يتضح الامر ... اخبرني ساقوم برفع فيديو يوضح لك ذلك ولكن سيكون في رابط الموضوع خاصتك والموجود به نفس الطلب لزيادة الافادة للجميع http://www.officena.net/ib/index.php?showtopic=46496 جزاك الله خيرا

السلام عليكم الاخ الكريم / عمر أبو صهيب بارك الله فيك ورااائع بحثك واصرارك علي التعلم والتقدم وانتظر منك المزيد وان تكون احد رواد عالم الاكسيل الكبار ( باذن الله ) ملفك يعمل بشكل جيد والشاشة تظر بشكل رائع في البداية قبل الملف ام انك تريد اخفاء الملف نهائيا كما في الشرح اما بخصوص الكود فعلا الكود نتائجة جميله ولكني لا اتقن الفرنسية فأقترح عليك طرح هذا الملف وهذا الكود في موضوع جديد ليطلع عليه الاساتذة جميعهم فالمعظم ان شاء الله يتقن الفرنسية وسيفيدنا كثيرا جدا ( ان شاء الله ) جزاك الله خيرا

السلام عليكم الاخ الكريم / عمر أبو صهيب بارك الله فيك وجزاك الله خيرا علي كلماتك الرائعة والجميله وجعله في ميزان حسناتك واحترم فيك جدا اصرارك علي التعلم والوصول الي ما تريد ... زادك الله من فضله ولكن بالنسبة لطلبك ان تظهر رسالة او شاشة تفيد للمستخدم تمكين الماكرو فعلي حسب علمي ان هذا لا يمكن حيث انك ستقوم باعداد الشاشة والاوامر الخاصة بها علي محرر الاكواد VBA وبالتالي لتشغيل هذه الشاشة او الاكواد نفسها يجب اولا تفعيل الماكرو ... وبالتالي لن تعمل من الاساس في حالة عدم تمكين الماكرو وافضل حل رأيته لهذه المشكلة هو كود الكبير القدير / عبد الله باقشير ... جزاه الله خيرا .... والذي اطلعت عليه بعدم فتح الملف الا بعد تمكين الماكرو اما بالنسبة لملفك فلا يمكنني تحميله ( برجاء رفعه مرة اخري ) ولكن انت فعلا تقوم بالخطوات الصحيحة ففعلا الكود يوضع في حدث ThisWorkbook بالشكل التالي : Private Sub Workbook_Open() UserForm1.Show End Sub ولكن اولا يجب عليك التأكد هل اسم الفورم الذي قمت بتصميمه وجعله الشاشة الرئيسية بنفس الاسم في الكود UserForm1 ام هناك فرق ... فيجب ان يكون بنفس اسم الفورم الذي تريد ظهوره في البداية .... وجرب الكود التالي للقيام بنفس الامر ولكن قم بوضعه في اي مودل للاكواد ( حيث يعمل بنفس الطريقة ) لاظهار الشاشة عند فتح الملف مع التأكد ايضا من اسم الفورم Sub auto_open() UserForm1.Show End Sub جزاك الله خيرا

السلام عليكم الاخ الكريم / نور محمود راجع الرابط التالي به طلبك ملف اكثر من رائع للاخ الكريم / ابراهيم محمد قام فيه بعمل ما تريده بطريقة جميله واي استفسارات او اي طلب آخر طبعا انا معك باذن الله دائماً http://www.officena.net/ib/index.php?showtopic=45248 جزاك الله خيرا

السلام عليكم الاستاذ الحبيب / أبو حنين مرورك راائع وجميل كالنسيم العليل كل ذلك من فضل الله ومن فضلكم انتم اساتذتي ولكم مثلي في الاجر والحسنات باذن الله وانت احد هؤلاء الاساتذة الكبار الذين مازلنا ننهل من علمهم بارك الله لكم وجزاكم الله خيرا

شكرا أخى ( أيمن ) على إطرائك الجميل هذا وجزاك الله عنى خيرا

أحبابي وإخواني الأعزاء لقد افتقدتكم جميعاً ويعلم الله لم يمنعني عنكم إلا الظروف الشديدة والحمد لله على كل حال . هذه هدية متواضعة لكم أحبابي . هام جداً : أرجو قبل التعامل مع الملف ضرورة الاطلاع على ورقة شرح الملف والتي أسميتها " HELP" ويمكن الانتقال إليها وسائر الأوراق من مفتاح " الانتقال إلى " والموجود بكل الأوراق ، وأرجو أن تكون الفكرة فيها ولو بعض الفائدة . وتقبلوا حبي وتقديري أبو عبدالله _________________________________.rar