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

بسم الله الرحمن الرحيم بلاش الشتيمة والسلام عليكم move.rar

بسم الله الرحمن الرحيم ميزه وخاصية ممتازه وهى Flash Fill Excel 2013 (تعبئة سريعة) تغنيك عن استخدام صيغ ومعادلات ..الخ . اتمنى ان تفيدكم . ولاتنسونا بصالح دعاؤكم https://www.youtube.com/watch?v=OZyrmcInZLU flash fill.rar

السلام عليكم ورحمة الله نقدم لكم كلمة مرور عن طريق توليد رقم عشوائي شرح الطريقة فتح ملف جديد وإضافة التالي 1 - فورم ونسميه Form1 2 - مربع نص ونسميه Txt1 3 - زر امر ونسميه Cmd_LogoIn وقبل ان نتطرق للفورم والكود نذهب اولا إلي الصفحة (الشيت) ونختار الخلية [IV1] تستطيع تغييرها حسب رغبتك ونضع بداخلها المعادلة التالية : =RANDBETWEEN(999999;9999999) وهي تقوم بتوليد رقم عشوائي بتكوًن بين 9,999,999 وبين 9,999,999 وتستطيع التغيير إلي الأكثر او الأقل حسب ماتراة مناسب . ثم نذهب للخلية [IV3] ونضع بها المعادلة التالية : =LEFT(IV2;3)+RIGHT(IV2;2) وهي تأخذ اول ثلاثة ارقام من يسار الرقم بالخلية [IV2] وأول رقمين من يمين الخلية المذكورة. وقيمة الخلية [IV2] يتكون عن طريق الكود في حدث تنشيط الفورم وهو يساوي قيمة الخلية التي يتم توليد الأرقام العشوائية فيها وهو [IV2] = [IV1.Value Private Sub UserForm_Activate() ' لاحظ الخلية [IV2] تساوي الخلية [IV1] وهي التي تقوم بتوليد الرقم العشوائي [IV2] = [IV1].Value 'لاحظ هنا عنوان الفورم هو الرقم العشوائي Form1.Caption = [IV2] End Sub ولاحظ ان الرقم العشوائي يظهر بعنوان الفورم وبتغيًر كل مرة يظهر فيها الفورم ولإستخراج كلمة المرور منه مثال ان الرقم العشوائي 760340 فاول ثلاثة ارقام من اليسار هي 760 وأول رقمين من اليمين 40 نجمعها (760 + 40 = 800 ) إذا كلمة المرور هي 800 . تستطيع ان تأخذ رقمين او ثلاثة ..إلخ من يسار الرقم العشوائي او رقمين او ثلاثة اواكثر من يمينه وبعد ذلك تجمع او تطرح والنتيجة في الخلية [IV3] كل ذلك يتم في في المعادلة ادناه : =LEFT(IV2;3)+RIGHT(IV2;2) وهذا الكود البسيط مع الشرح : Private Sub Cmd_LogoIn_Click() 'إذا كان مربع النص التكست ون يساوي فراغ If Txt1.Text = vbNullString Then 'إذا اخرج من الإجراء الفرعي Exit Sub 'غير ذلك إذا كان مربع النص لايساوي قيمة الخلية[IV3] ElseIf Txt1.Text <> [IV3].Value Then 'إذا رسالة توضح ان كلمة المرور غير صحيحة MsgBox "ßáãÉ ÇáãÑæÑ ÛíÑ ÕÍíÍÉ", vbCritical, "ÇáÊÃßÏ ãä ßáãÉ ÇáãÑæÑ" 'غير ذلك إذا كان مربع النص بيساوي [IV3] ElseIf Txt1.Text = [IV3].Value Then 'إذا رسالة توضيحية احسنت MsgBox "ÇÍÓäÊ" 'اجعل تطبيقات الاكسل مرئية Application.Visible = True 'إخفاء الفورم Unload Me ' End If End Sub اخيكم في الله أبو الحسن والحسين مرفق مثال شاشة دخول - تغيير الباسورد عشوائي.rar

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

هههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههه حرام عليك والله هموت من الضحك

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

السلام عليكم ورحمة الله اخواني الأعزاء وائل الاسيوطي ومحمد حسن المحمدي أبو يوسف اسرني واسعدني مروركم العطر بارك الله فيكم وجزاكم الله خير الأخ الفاضل الأستاذ / مختار حسين الأخ وائل الاسيوطي في المرفق تم إضافة عداد لمحاولة إدخال كلمة المرور حسب نصيحة استاذنا /مختار حسين تستطيع إضافة حروف ,كلمات, ارقام، علامات وهي التي بين علامتي التنصيص قبل وبعد كلمة المرور المستخرجة من الرقم العشوائي الخلية [IV3].Text هي ناتج توليد الرقم العشوائي بالخلية [IV1].Text عن طريق [IV2].Text والتي تأخذ 3 ارقام من آخر الرقم العشوائي ورقمين من اوله للعلم والاحاطة فقط If Txt1.Text = "هنا تقدر تضع كلمة او حروف او ارقام او علامات" & [IV3].Text & "هنا تقدر تضع كلمة او حروف او ارقام او علامات" Then في الكود ادناة تضع الحروف قيل وبعد. مثال / الرقم العشوائي 760340 فاول ثلاثة ارقام من اليسار هي 760 وأول رقمين من اليمين 40 نجمعها (760 + 40 = 800 ) إذا كلمة المرور هي kh800mb . لما تكون الحروف إنجليزية تنتـــه لإدخالات الحروف كبيرة او صغيرة ادخلها حسب برمجتك لها. If Txt1.Text = "kh" & [IV3].Text & "mb" Then او تجعل الحروف قبــــــــــــــل فقط وستكون كلمة المرور كالتالي khmb800 وتنتبــــــــــــــه ان تكون KHMB800 مع دقة الملاحظة في أي فراغ في علامتي التنصيص قبل او بعد الكلمة او الحرف او غيره (" khmb" ) او ("khmb "). If Txt1.Text = "khMB" & [IV3].Text Then او تجعل الحروف بعـــــــــــــــد فقط وستكون كلمة المرور كالتالي 800khmb وتنتبــــــــــــــه ان تكون 800KHMB مع دقة الملاحظة في أي فراغ في علامتي التنصيص قبل او بعد الكلمة او الحرف او غيره (" khmb" ) او ("khmb "). مع ملاحظة الكلمة هنا هي بالحروف الكبيرة. If Txt1.Text = [IV3].Text & "KHMB" Then مرفق الملف وكلمة المرور هي بين كلمتي KH.....MB If Txt1.Text = "kh" & [IV3].Text & "mb" Then شاشة دخول - تغيير الباسورد عشوائي.rar

رووووووووووووووووووووووح يا شيخ منك لـ اللى كلت دراع جوزها

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

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

السلام عليكم الاخ الكريم المنتدى مليء بمثل هذه المواضيع فقط عليك البحث كما بين اخونا الاستاذ عبدالله هذا واحد وهذا آخر

أبدأ بحمد الله أولا وأخيرا على ما انعم ووفق وأصلي واسلم على الرحمة المهداة والسراج المنير نبينا محمد وعلى آله وصحبه وسلم ... وبعد في أحدي الموضوعات علي منتدانا الكريم وفي موضوع لاحد الأخوة بطلب برنامج ليتمكن من ادارة الأشتراكات الشهرية (اشتراكات DSL - كروت - توزيع شبكات انترنت او شبكات الكابل التلفزيوني ) وما الي ذلك من الاشتراكات التي تحتاج لمتابعة شهرية علي انتهاء صلاحية اسم المستخدم مثلا او متابعة حركة السداد المختلفة لذلك وفقني الله سبحانه وتعالي لتلك الفكرة بعمل برنامج يقوم بمتابعة تلك الاشتراكات الشهرية ومتابعة سداد وعمل وطباعة تقارير عن المديونية والمبيعات وكشف حساب للعميل وما الي ذلك من العمليات التي يمكن ان يحتاجها المستخدم لادارتها وكذلك ادخال اغلبية البيانات تلقائيا كرقم ايصال السداد مسلسل العميل تاريخ نهاية الاشتراك وادعو الله سبحانه وتعالي ان اكون وفقت في البرنامج وان يكون فيه النفع ويمكن تطويع البرنامج ليتلائم مع ادارة المشروعات الفردية الصغيرة ايضا ولا تنسونا من دعوة صالحة في ظهر الغيب بصلاح الحال ناتي لشرح بعض خصائص البرنامج المختلفة أترككم لتجربة البرنامج في المرفقات وارحب بمشاركتكم في اجراء اية تعديلات وفقنا الله واياكم للصالحات مع تحياتي // ضاحي الغريب Manage Subscriptions By Dahy al Gharieb.rar

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

أخي الكريم أبو احمد إن شاء الله كل شيء بالصبر بيتم بعون الله فقط لو الموضوع شايف إنه هيكون مختلف اطرح موضوع جديد واشرح فيه بالتفصيل المطلوب وإخوانك لن يقصروا معك

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

ههههههههههه ههههههههههههههه والله لو نعم مزعلاك خليها yyyyyyes يعنى ياأبوالعربى ناوى تقطع نفسنا اضحك الله سنك وبارك فيك

أخي الكريم المتميز ياسر العربي مشكور على الملف القيم .. والمداعبة اللطيفة بس صاحبك عارف الخدعة دي من زمان .. ومن غير ما أفكر حاولت استخدام مفتاح التاب ..منفعش ..استخدمت الأسهم وخلصت الحكاية بدري بدري وتسلم يا معلم لا حرمنا الله من جديدك أعجبني مراعاة التعامل في الكود ليناسب نظام 64 بت ولم يعجبني أنك أهملت Option Explicit والإعلان عن المتغيرات (يراعى مستقبلاً هذه الأمور التي قد تبدو تافهة) وأفضل أيضاً شرح آليات الملف ..أي الخطوات التي قمت بها ليستفيد الجميع ..كفانا ملفات جاهزة ..نريد ان ننطلق للعالمية يا عربي أقصد بالخطوات ..قم بوضع زر أمر وأعطه اسم برمجي كذا وعنوان كذا ولو غيرت في خاصية محددة تذكرها وهكذا وهكذا .. تقبل وافر تقديري واحترامي

يلا بقى مش مشكلة يا صاحبى مقبولة منك يا حبيب قلبى

ما هو مفيش حل تانى غير نعم مفيش فايدة مش هافضل أجرى ورا لأ

خلينا حبايب أحسن بلاش

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

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

أخي الحبيب ياسر ما شاء الله بارك الله أعتذر عن التكرار بسبب بطء الإنترنت والسلام عليكم

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

شاكر مرورك اخي الغالي عبدالعزيز معلش تعيش وتاخد غيرها حبيبي معلش استحمل هتستنى ايه من واحد رخم زيي يعني غير البهدلة

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

الغينا تفعيل زر الخروج ان شاء الله يعمل معك تفضل المرفق عند الضغد على كلوس يدخل الى البرنامج بدون كتابة رمز الدخول_111.rar

شكرااا

السلام عليكم عبر حدث Close للفورم Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) Cancel = True '' غير فعال ' Cancel = False '' فعال End Sub

أخي الحبيب محمد الريفي بارك الله فيك وجزاك الله كل خير على الموضوع الرائع والمتميز خاصية جميلة يجهلها الكثيرون

تحية طيبة اخي ياسر الف شكر على المساعدة

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

اتمنى ان يكون المطلوب في الملف المرفق تنسيق شرطي للصف.rar

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

ممكن تتحايل بتغيير الامتداد وبعدين بعد الارسال يتم استلام الملف اعادة الامتداد كما كان يعني exe خليها Zip Rar; Xls بعد الاستلام نرجعه Exe

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

تفضل http://www.accesswordkingdome.com/forum/forum/الأكاديمية-ردود-فقط/أفكارٌ/210356-أدوات-مُساعدة-لإنشاء-وتصميم-البرامج

المرفق السابق به خطاء لموقع الفورم الفرعي للارتفاع Top عند تغير ظهور الفورم الاساسي وسط الشاشه الفورم الفرعي لم يأخذ مكانه الصحيح جرب هذا التعديل غير موقع الفورم الاساسي الى اي مكان في الشاشه وسط او اعلى الفورم الفرعي سيأخذ موقعه الصحيح بعكس الملف السابق جديد_333.rar

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

لاتنسى انه لن يتفعل على شرط الا بعد التاريخ او الايام المضافه؟ لذا اذا تاريخ اليوم لايساوي التاريخ المحدد المضاف له 3 يوم او 6 يوم او 9 يوم سيكون الباسورد 123 اذا اردت ان تعرف مااقصد اذهب الى السطر التالي في الداله Ch_Date = DateSerial(Year(Date), Month(Date), Day(Date)) وغيره بهذا اي بعد مرور 3 ايام Ch_Date = "2015/12/31" بعد الحفظ وفتح الملف مره اخرى لن يقبل الا بالباسورد "الحمد لله" شاشة دخول - تغيير الباسورد_111.rar

أخي الكريم ابحث في المنتدى ستجد الكثير من المشاركات في هذا المجال

انصحك ب 2010 اخي احمد ! بالتوفيق

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

أخي الكريم مهند أهلاً بك في المنتدى ونورت بين إخوانك شكل المنتدى هيقلب على تركي .. إليك الملف التالي عله يفي بالغرض .. ومتنساش تسلم لي على نور أحلى حاجة في المشاركة دي إنها المشاركة رقم 7.777 (أصلي بحب رقم سبعة) Unique Using Array Formula.rar

المشكله عندك اخي هل انت مفعل امان الماكرو منخفض ام لا ؟ اتبع الفيديو في المرفق اذا لاتعرف الطريقه لتفعيل الماكرو تفعيل الماكرو.rar

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

الله يشفيه ويعافيه ويقومه بالسلامه .. آمين .. ويشفي مرضانا ومرضى المسلمين اجمعين.

اللهم أنت الشافى المعافى إشف مرضانا ومرضى المسلمين جميعا اللهم أمين

السلام عليكم ورحمة الله وبركاته....لابأس طهور إن شاء الله تعالى اللهم اشف أنت الشافي لا شفاء إلا شفاؤك شفاء لا يغادر سقماً اللهم اشف مرضانا ومرضى المسلمين...آمين

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