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

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

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

كل عام وحضراتكم جميعا بألف خير وصحة وسلامة Calendar.rar

بسم الله الرحمن الرحيم لا توجد طريقة امنة لحماية الاكسيل كما نعرف والذي لا يعرفه الكثيرين ان حماية الملفات التنفيذية ايضا لا فائدة منها فهي هشه كالملفات العادية فقمت بوضع حل نهائي ولكن سيكون صعب علي البعض وهو التعامل مع الفيجوال بيسك مباشرة وانشاء برنامجك من عليه وجعل ملف الاكسيل مجرد قاعدة بيانات وحتى ان كنت تريد حماية البيانات ايضا فبنعمل حماية للملف ايضا بكلمة مرور وهي صعب فكها اكيد في المثال المرفق برنامج قمت بطرحه مسبقا ولكن لم يلاحظ احد الحماية الموجودة به فهو ربط الفيجوال بيسك بالاكسيل الكل نظر له انه مجرد ربط فقط ولكنه اكثر الطرق حماية للاكسيل نفسه مرفق مثال بسيط عبارة عن ملفان ملف التشغيل وقاعدة البيانات وقاعدة البيانات aseel.dat هي عبارة عن ملف اكسيل بامتداد aseel.xlsx وتم وضع كلمة مرور عليه كلمة المرور رقم هاتفي طبعا المهم الطريقة امامكم طبعا حد يقدر يستخرج المعادلات او يعدل علي القاعدة بطرق غير الموجودة داخل البرنامج فانا اتيح لك اظهار ملف الاكسيل عادي ان قمت بعمل بعض التعديلات واخفاء الملف لن يستطيع احد العبث بالملف نهائيا وان تفرغت باذن الله اضع لكم شرح لهذا الموضوع باذن الله تعالى مع تحياتي ياسر العربي 101010.rar

شكرا لك اخي رمهان وجزاك الله خيرا على هذا العمل كانت اجابتك لي شافية كافية وفي الصميم انتهى الموضوع

تفضل : Private Sub أمر88_Click() If Me.km.Form.RecordsetClone.RecordCount > 0 Then MsgBox ("اسف .. هناك توزيع سابق !!"): Exit Sub Me.km.SetFocus: DoCmd.GoToRecord , , acNewRec For ii = 1 To الاشهر Me.km![رقم القسط] = ii Me.km![الاستحقاق] = DateAdd("m", (ii - 1) * [يدفع كل], [تاريخ اول دفعة]) Me.km![الايجار] = الايجار DoCmd.GoToRecord , , acNext Next End Sub بالتوفيق

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

بعد اذن استاذنا الحبيب رمهان اخي عصام نفس الموضوع حصل معي وكانت المشكلة في جزئين علما اني استخدم 2013 1. تغيير ص الي am لو الاوفيس انجلش . 2. تغير العلامات ; الي , وجرب لو ما ظبط هرسلك المثال غدا انشالله

السلام عليكم اخي الكريم محسن محمد بالامكان عمل البرنامج ان لديك افكار للاليه التي تريدها كي تخدمك في عملك بدون مقابل يحتاج منك صبر وللعلم المنتدى هنا للمعرفه وتبادل الخبرات تحياتي

نفضل اخى الكريم الملف المرفق الحل بالمعادلات اختر الموقع من الخليه D1 ارجوا من حضرتك عندما تطلب شئ توضح طلبك من البدايه بالتفصيل وعايز يكون الحل بالمعادلات او الاكواد تقبل تحياتى اظهار بيان مواد.zip

الصق هذا التعبير بديلا لعمود التاخير في الاستعلام : التاخير: Format(TimeValue("08:00 am")-TimeValue([hodoor]);'Short Time') & IIf([hodoor]<=#08:00:00 ص#;"+";"-") اتمنى ان يكون لما اردت وبالتوفيق

السلام عليكم ورحمة الله وبركاته هدفيه للعاملين بالكنترولات المدرسيه ...... _ سجلات اعمال الكنترول كامله ... _ توزيع الملاحظين اليا على اللجان .... مع تحياتى ....

اخي محمد عصام انظر الملف المرفق في المشاركة رقم 3 والصق التعبير السابق بديلا لعمود التاخير ! وملاحظات اخي وائل في مكانها بالاضافة الى : * قد يكون الصقته في عمود جديد وهنا سيتم تكرار لاسم العمود لانه باسم "التاخير" ويوجد عمود سابق باسم "التاخير" هذا ان كان التطبيق على نفس الاستعلام بالمشاركة الثالثة ! الاحظ عدم وجود ترقيم للمشاركات بعد التحديثات الجديدة فياليت الادارة تعيد هذه الميزة المهمة مشكورين تحياتي

جزاك الله كل خير أستاذنا الخبير (رمهان)

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

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

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

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

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

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

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

مشكووووورررررررررررررررررررر

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

السلام عليكم ورحمة الله اخي الفاضل حسام صراحة قول حق اكثر من رائع جزاك الله خير

ابداع بمعنى الكلمة . جزاك الله خيراً.

وعليكم السلام ورحمة الله وبركاته إزيك يا راجل ، وحشتنا ، اخبارك ايه، من زمان ما سمعنا منك ان شاء الله تكون والاهل بخير وعافية اما نحن فبخير الباري ونعمه والطافه وبعد رد السلام ، تفضل: أفضل طريقة في اخفاء صف (المسمى الاصح هو تصفية سجل) ، هو ان تجعل الاستعلام مصدر لنموذجك او تقريرك ، واذا افترضنا ان اسم الحقل الذي تريد اجراء التصفية عليه اذا كان فارغا ، myID ، فضع المعيار التالي له في الاستعلام: is not null AND [myID]<>'' او ان تجمع هذين المعيارين في امر واحد: len([myID] & '')<>0 جعفر

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

جزاك الله كل خير ........... حل اكثر من رائع ولك منى الف مليون تحيه ... وجعله الله في ميزان حسناتك

الغالى ابو يوسف جزاكم الله خيرا دائما ما تعطر المشاركات بتعليقاتك تقبل تحياتى

السلام عليكم السموحه على التأخير وذلك لانشغالي تفضل المرفق البحث بمعيارين_111.rar

السلام عليكم ورحمة الله وبركاته بسم الله ما شاء الله لا قوة إلا بالله أخي الحبيب الصقر حل رائع حسب كل شركة ...جزاكم الله خيراً...

تقويم رائع وتنسيق جميل جزاكم الله خيراً والسلام عليكم

أشكرك أخي الحبيب م/ياسر على كلامكم العطر ومروركم الجميل ودعائكم وأقول : آمين لي ولكم بمثله أخي الحبيب والسلام عليكم ورحمة الله وبركاته.

نعم بارك الله فيك وزادك الله علماً ورزقك من حيث لا تحتسب شاكر ومقدر لك

شكرا لكم تم الوصول للحل وللفايدة راجعوا هذا الفيديو للمبدعة ساجدة العزاوي https://www.youtube.com/watch?v=2fCGJFTP_0M

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

Protect All Worksheets in Workbook using VBA Sub sbProtectAllSheets() Dim pwd1 As String, pwd2 As String pwd1 = InputBox("Please Enter the password") If pwd1 = "" Then Exit Sub pwd2 = InputBox("Please re-enter the password") If pwd2 = "" Then Exit Sub 'Check if both the passwords are identical If InStr(1, pwd2, pwd1, 0) = 0 Or _ InStr(1, pwd1, pwd2, 0) = 0 Then MsgBox "You entered different passwords. No action taken" Exit Sub End If For Each ws In Worksheets ws.Protect Password:=pwd1 Next MsgBox "All sheets Protected." Exit Sub End Sub Insert a Module for Insert Menu ولحمايته لفترة زمنية كفترة تجريبية Sub workbook_open() If Time >= " 01-01-2016" Then msgbox "the time work of this application is finished" ThisWorkbook.Close False End Sub

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

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

السلام عليكم ورحمة الله اخي ارسل مثال ولو صورة ووضح تريدها علي عمود معين وهل هي علي كل الشيتات او شيت معين ايش يعني الاوليدون كود

أستاذى أبو خليل وأستاذ محمد عصام وأستاذ صاحب الموضوع جزاكم الله خيرا جميعا أستاذى أبو خليل هل سيختلف تعريف المكتبة اذا اختلف نظام التشغيل win7 أو winXp أو أى اصدار آخر . وجزاكم الله خيرا أستاذى محمد عصام حمدا لله على السلامة وعود أحمد " أعذرنى جائت متأخرة شيئا ما ولكنى لم أكن متابعا للمنتدى منذو فترة" ولكن نورت المنتدى ووحشتنا "امممممممممممممممممم"

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

لم يبق في رصيدي إضافة الاعجاب لهذا اليوم .. فتفضّل خلاصة كلامي أستاذي الغالي ياسر خليل أبو البراء

السلام عليكم ورحمة الله وبركاته .. كنت سافتح موضوع جديد لهذا الأمر حيث أن الموضوع مهم جداً ،، أنا شخصياً مهتم بأمر المستخدمين وتوزيع الصلاحيات وأستفذت كثيراً من هذا المنتدى الرائع ،، مرفق برنامج صغير من تصميم الأخوان في المنتدى وأعتقد أني نزلته من هذا الموضوع بالتحديد .. Users maker -Third Edition أستخدمته من قبل وكان ينقصه تحديد نموذج صفحة البداية وكان غير معرب ... بعد أذن الأخوان أرجوا أن يتقبلوا التعديلات التي أدخلتها عليه وهي التعريب و إضافة صفحة البداية كل ما عليك هو أن تعيد تسمية النموذج الذي تريده أن يظهر مع تشغيل البرنامج إلى index ثم تقوم بتشغيل البرنامج المرفق ومتابعة الخطوات ... تقبلوا تحياتي أخوكم .. eng-Hussam Users maker -Third Edition (1).rar

الحمد لله الذي من علينا بالعلم و بارك الله بالعلماء

وفقكم الله وبانتظار ابداعات اخرى

اكتب المعادلة التالية ("DATEDIF(E3, E4,"d= حيث ان e3 هو التاريخ الأقدم e4 هو الاحدث أما اذا اردت عدد الشهور استبدل d ب m

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

بارك الله فيك أخي خبور وجعل هذا العمل في ميزان حسناتكم.

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