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

وعليكم السلام ورحمة الله جرب أخي التعديل ووافني بالنتيجة مسج بوكس.rar

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

بعد اذن استاذى الحبيب " عبدالرحمن هاشم " اتفضل جرب التعديل ده كده يا استاذ "حسن سعيد " مسج 3بوكس.rar

اخى الحبيب الغالى ياسر العربى فى البداية أحب أقولك إنت فعلا سوف تصنع من هذا المنتدى مبرمجين محترفين لتنويهك بالشرح الرائع لهذا البرنامج العظيم جزاك الله خيرا على كل ما تقدمه من أعمال رائعة وزادك الله من العلم الكثير والكثير أقدم لكم ثمرة ما تعلمته من هذا الموضوع الرائع من أخى الحبيب / ياسر العربى الكود المستخدم Private Sub Command1_Click() Dim A, B As Single A = Text1.Text B = Text2.Text If Check1.Value = 1 Then Text3.Text = " " & A + B If Check2.Value = 1 Then Text4.Text = " " & A - B If Check3.Value = 1 Then Text5.Text = " " & A * B If Check4.Value = 1 Then Text6.Text = " " & A / B End Sub أله حاسبة من تصميميى ولكن تنسيقى على قدى لسه الرجاء من أ / ياسر العربى وضع ملاحظاته عليها المرفق على رابط خارجى لكبر حجمه http://www.mediafire.com/download/5x3o418wsqvlbda/Calculator+Yasser+Albanna.rar ولكن فى الزر معلومات المبرمج وضعت له الكود الأتى ولم يظهر الفورم عند الضغط عليه ما السبب Private Sub Command1_Click() Form2.show End Sub

السّلام عليكم و رحمة الله و بركاته إذن حتّى نعيد ذكريات الطفولة بأفراحها و نبعثها بنفوسنا من جديد .. و لا نشعر بالضَجَر .. هيّا بنا .. سأمر عليك كل يوم بإذن الله للذهاب إلى المدرسة ..

الله ينور يا ابو يوسف لا توجد اخطاء في الكود ولكن مشكلة بسيطة جدا عند نسخ الاداوت بتظهر ليك رسالة ندوس no عشان تنزل اداة جديدة باسم جديد وهو الاسم التالي للرقم السابق يعني text1 text2,text3الى اخره اما نعم هتعمل جروبات تحكم لكل تكستtext(0)1 فالخيار الصح no في هذه الحاله او ريح دماغك واسحبها من شريط الادوات New folder.rar اخي الغالي سعد نحن لانصدر ملفات المشروع نهائيا بل نجلب الصوره له هرفق ليك مثال توضيحي باذن الله بعد قليل انتظرنى

أرجو أن يكون كما تريد وإلا فسأطلب منك مشكوراً الحضور إلى عندي وإرفاق الملف ثم العودة إلى مصر مصحوباً بالسلامة والسلام عليكم New folder.rar

السلام عليكم ورحمة الله أخي الحبيب ياسر إليك بعض التجارب...أرجو أن تكون خطوة نحو الأمام.. علماً أن العمليات الحسابية الأربع لم تنجح معي مطلقاً. العمليات الحسابية الأربع غير ناجحة.rar الساعة1.rar

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

هنا قاعدة بيانات اكواد VBA للاكسل مع الشرح والامثلة ((( مرجع للجميع ))) السلام عليكم ورحمة الله وبركاته الفكر من الموضوع عمل قاعدة بيانات باكواد VBA للاكسل مع الشرح والامثلة ((( تكون مرجع للجميع ))) امل من الجميع اثراء الموضوع ....

السلام عليكم ورحمة الله وبركاته: أحتاج مساعدة الخبراء بالإكسل محتاج شيت يوفر عليي التعب بحسابات صالون الحلاقة الأفكار الرئيسية : 1- الصالون يضم 6 حلاقين أو أكثر محتاج شيت يضم إجمالي عمل كل شخص على حدة العمل اليومي والمجمع اليومي لآخر الشهر 2- شيت خاص بالمصاريف الخاصة بالصالون مثلاً كهرباء أو ماء أو قهوة وسكر وصيانة إلخ . 3- شيت خاص بالمصاريف الخاصة بالعدد والأدوات ولوازم الصالون من صبغات وماكينات ومقصات وأمشاط وكريمات إلخ ... بحيث أعرف آخر كل فترة ماهي المصاريف الداخلة بالإنتاج فعلياً . 4- شيت خاص بالمشتريات إن كان هناك صنف تم شراءه سابقاً بسعر أقل أو أكثر لمراقبة تذبذبات أسعار المواد. 6- شيت خاص بالنسبة الخاص بكل حلاق يتم تحديدها شهرياً مثلا هذا الشهر تكون النسبة 40 % للحلاق والباقي لصاحب العمل والشهر الآخر ممكن تتغير النسبة وتتفاوت بين موظف وآخر 5- شيت ملخص لكل الأمور السابقة يظهر العمل اليومي لكل الحلاقين والمجمع الشهري وما هي المصاريف المدفوعة وكل العمليات السابقة أتمنى أن أجد لديكم الصدر الرحب لتلبية طلبي ومساعدتي على توفير الوقت في عمل الحسابات ولكم مني جزيل الشكر وبارك الله لكم في علمكم كما أتمنى أن تكون الفكرة واضحة ومستعد لإعطاء المزيد من التوضيح وأكرر شكري لكم وبارك الله فيكم وعليكم ورفع قدركم في علمكم وجعله شفيعكم يوم القيامة . ملاحظة الصالون هو للحلاقة الرجالية وتقبلوا مني جزيل الشكر

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

تفضل If MsgBox(" لديك " & DCount("*", "الاقامات", "[تاريخ نهاية الاقامة]-date()<=31") & " قاربت على الانتهاء ", vbOKCancel) = vbOK Then DoCmd.OpenForm "التحقق من الاقامات", acFormDS وهنا عليك مسح جميع اكواد النموذج "التحقق من الاقامات" وعند الفتح ! اخي وحبيبنا محمد عصام : ربنا يعطيك الصحة والعافية وحضورك في المنتدى له طعمه الخاص ! فلك وللاستاذ صاحب الخلق الرفيع عبدالرحمن هاشم اجمل التحايا وارقها ! بالتوفيق للجميع

مشاركة مع الاساتذة ماهو المدة التي هي مقياس لان تصبح الاقامات قاربة على الانتهاء ! مثلا التي بقي عليها 5 ايام فاقل ؟ وبعد كذا ساشارك بجواب للمطلوب ؟ سطر واحد .. تحياتي

جزاك الله خير وبارك فيك اخي ابو محمد ونفع بك اخي عندي سؤال لما نربط الجدوال بالا SQL ويكون حجم السجلات كبير يعني اكثر من 3 مليون سجل هل يكون الاتسعلام وجلب البيانات بطيئ ولا يكون اسرع من قاعده الاكسس الان انا عندي قاعده بيانات اكسس فيها تقريبا اكثر من 5مليون سجل ولما استعلم عن شخص واطلب استدعاء بياناته يكون فيه تأخير في جلب البيانات تقريبا يأخد دقيقه او اكثرحتى تظهر البيانات هل بالتحويل تنحل الى SQL تنحل المشكل وكيف طريقة اعدادها ارجو ان يكون سؤالي واضح بارك الله فيك وجزاك الله خير

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

السلام عليكم هذا مرفق اخر تختار الصنف من القائمة تظهر لك البارتز المرتبطه به في نموذج فرعي .. ولو لك سؤال حاضرين . itemsSubform.rar

السلام عليكم ورحمة الله جرب هذا المرفق ايام الاسبوع باللغة العربية Book1.rar

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

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

test.rar السلام عليكم هل هذا ما تريده دايما سبقنا كده في الخير عذرا لاني لم اري مشاركتكما تحياتي لك محمد عصامي واخي الغالي جعفر

وعليكم السلام شوف المثال اللي ارفقه أخي الاستاذ عبدالرحمن في الرابط التالي: http://www.officena.net/ib/topic/65649-إدراج-القيم-التابعة-لمربع-تحرير-وسرد-من-نموذج-في-نموذج-فرعي/?do=findComment&comment=427227 جعفر

تفضل اخي سعد مثال بسيط Desktop.rar

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

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

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

السلام عليكم أخي الحبيب ياسر أشكرك على إيثارك وحكمتك ...والسلام عليكم.

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

متشكر جدا للتوضيح وأنا فى أنتظار البرنامج .

تفضل الهدية ابو يوسف اول ملف به ساعه شغلنا وعلي قدنا والتانيه احترافيه والصراحه جايب المشروع جاهز ومش عدلت فيه تفضل New folder (3).rar Analog Clock.rar الاكواد هي هي باذن الله ولكن الربط بين الاتنين مجرد اضافة مكتبة الاكسيل الى الفيجوال وهو علي طول هيفهم وبعدين نقعد كدا مع الفيجوال بعد ما عرف الاكسيل نقوله تعرف الاكسيل دا مخلف اولاد قد ايه يقولنا معرفشي نقوله عنده المتغير رقم واحد وهو برنامج الاكسيل نفسه وعنده ابن تاني وهو متغير Workbook وكمان عنده ابن متغير Worksheet وكمان Range ودول متغيرات علي مستوى المشروع كله ويتم وضعهم في Module عشان لما نتعامل من اي مكان في البرنامج يبقي متعرفين معانا في كل مكان وعن طريقهم هنبدأ نتعامل مع اكواد الاكسيل العادية باذن الله بس واحده واحده مش ناخد مبادئ حتى ولما اوصل للنقطة دي خبراء القسم هيتفوقو طبعا عليا في اكواد التعامل مع الاكسيل لاني لم اتعامل كثيرا مع اكواد الاكسيل الا قريبا وعرفتها بسبب معرفتي للفيجوال

أخوانى الاعزاء سلام الله ورحمته وبركاته أين رابط الملف ؟؟؟؟؟ شكرا

السلام عليكم اشكرك استاذ ( محمد عصامـے ) علي جهدك واسف علي تاخري في الرد ( النت كان مفصول عندي) اشكرك استاذ karrar sabry علي الاضافة وهي المطلوب بالضبط لقد ساعدتموني وافدتموني جزاكم الله خيرا

جرب ورد عليه وقول لى الاخبار ايه

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

جرب هذا الكود مجرد ما تكتب رقم الفاتورة يتم الاستدعاء فاتورة salim.rar

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

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

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

لا استاذ محمد ... فهمتني غلط ... كنت اقصد اذا مسحت تقدير يتم مسح كلمة مدرسة الثانوية ... وهذا ما عملته انا بالمرفق 66666 ... وكنت اقصد انك نسيت هذه الفقرة

السلام عليكم ... استاذ محمد ... ماذا اذا اراد ان يمسح كلمة تقدير 66666.rar

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

السلام عليكم ورحمة الله وبركاته وجدته في مكتبتي : برنامج قاعات افراح _ مفتوح عقبى لمن هم في سن الزواج من الذكور والاناث افراحنا.rar

المرفق السابق كان يجب ادخال الرقم الوظيفى ورقم الاقامة للتمكن من فتح الفورم الخاص بـ بيانات ادارة الاقامات اتفضل بالتعديل ده ممكن تدخل للنموذج الخاص بـ بيانات ادارة الاقامات من خلال كتابة الرقم الوظيفى فقط أو رقم الاقامه فقط جرب مره الرقم الوظيفى 12345 دون كتابة اى شئ فى رقم الاقامة ودوس على الزر open form وجرب مره تانية برقم الاقامة 555 فقط دون كتابة اى شئ فى الرقم الوظيفى ودوس على الزر open form وللعلم الارقام لما تكون موجوده وصحيحه يتم التحويل لنموذج بيانات الاقامات اما ان كانت خاطئه تجد هذه الرساله التى نوهت عنها فى مشاركتك الاخيرة تقبل تحياتى نظام مراسلات-UP2.rar

ولا تزعل يا قمر اتفضل شوف التعديل ده وقولى رأيك نظام مراسلات-UP.rar

A problem occurred while Microsoft Access was communicating with the OLE server or Active X Control الرسالة دى بتظهر عندى فى كل ملفات الأكسيس اللى عندى وبصراحة مش عارف ليها اى حل غيرت نسخة الويندوز ونسخة الأوفيس ... نفس المشكلة على الرغم من أن البرامج دى كانت شغالة عادى جداً بس اللى حصل هو إنى كل فترة بنزل نسخة ويندوز جديدة آخر مرة بعد ما غيرت النسخة لاقيت الرسالة دى بتظهر فى كل الملفات حتى أى ملف أكسيس أنزله من النت تقابلنى نفس المشكلة ياريت لو حد يساعدنى أكون شاكر ليكم جداً

الاكسس يحفظ آليا بمجرد ادخال لبيانات وهذا هو كود الحفظ DoCmd.Save أو DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

لنفرض لدينا جدول مكون من صفين وعمودين. يطلق على العمود الأول A والعمود الثاني B . ويطلق على الصف الأول 1 والصف الثاني 2 . وبالتالي فإن أول خلية في الركن الأيمن تسمى A1 ( حسب العمود والصف ) ولإجراء عملية حسابية في الخلية A2 للقيام بجمع الأرقام الموجودة في الخلية A1 و B1 نقوم بالخطوات التالية: أولا : نضع الأرقام المراد جمعها في كل من الخلية A1 و B1 . ثانياً: نضع المؤشر في الخلية التي نرغب بإظهار الناتج فيها وهنا A2 . ثالثاً: من قائمة جدول نختار صيغة ثم نكتب في خانة الصيغة : (= A1 + B1 ). ملاحظة : إذا قمنا بتغيير الأرقام في الخلايا A1 أو B1 فإن الناتج في الخلية A2 لا يتغير تلقائياً ، ولتغييره نضلل الناتج ونضغط فوقه بزر الماوس الأيمن ونختار تحديث الحقل.

نعم اخي الغالي عبدالله سليمان .. هذا ما ابحث عنه وبارك الله فيك يا غالي... حقيقة لم اتوقع انها مثل ترقيم الاكسل ... a1 a2 ... وهكذا هذا السبب من طرح السؤال شكرا لك

لا أعلم طريقة لعمل معادلة بالمعني المفهوم ، أي تحدث مع تغير القيم و اتعامل معها من خلال ادراج ورقة اكسيل داخل الوورد و طريقة حساب المعادلات فى الوورد ، لابد من تكرارها مع التحديث ، و ما يشجعني علي تصور عدم وجود حل آخر هو هذه الجملة فى التعليمات Note Microsoft Word table calculations must be manually recalculated. Consider using Microsoft Excel to perform complex calculations. و الطريقة كما يلي نختار الخلية المطلوب حساب المعادلة فيها نختار formula فيظهر مربع الحوار التالي ثم نعدل المعادلة ان أردنا باستخدام نفس طريقة تسميات الخلايا فى الاكسل أو كلمة Above لكل ما هم أعلي أو Right لكل ما هو يمين الخلية و تكون النتيجة كالتالي و لكن لا تتحدث الا بتكرار ما سبق