نجوم المشاركات
Popular Content
Showing content with the highest reputation on 12/15/15 in all areas
-
بسم الله الرحمن الرحيم تحية طيبة وبعد:/ اليوم اعرض عليكم برنامج لاستخراج ملفات الاكسيل العادية من الملفات التنفيذية بكل يسر وسهولة قد قمت بتصميم هذا البرنامج منذ فترة ولكن هناك ما يجعلني متردد في عرضه وطرحه داخل المنتدى لاني ارى ان معظم المتواجدون يتعلقوا باي كلمة فيها اسم عمل حماية للاكسيل وليس فك حماية فاليوم اعرض عليكم شكل البرنامج وطريقة عمله فقط لابداء الرأي فيه واقتراح وضعه ام اتحفظ عليه وابعاده لانه هيبقي محبط لمعظم الاخوة الذين كانو يبحثون عن الحماية داخل الملفات التنفيذية البرنامج قمت بتجربة علي معظم برامج التحويل وليس كلها يعني ممكن والله اعلم ان لا يعمل مع برامج تحويل اخري ولكن علي يقين اني استطيع فكهم ايضا باذن الله ولكن يبقي القرار قراركم الان البرنامج لا يحتاج الى عناء مجرد فتح الملف عن طريق البرنامج ولو الملف فيه اي مشكلة او غير متوافق اوي اي حاجه في اي حاجه بردو هنفك امه ونضغط علي استخراج ليتم جلب الملف الاصل للفولدر المرفق مع البرنامج yasser لكم مني كل الشكر والتقدير في انتظار القرار منكم ياسر العربي4 points
-
بسم الله والصلاة والسلام على رسول الله أما بعد السلام عليكم ورحمة الله وبركاته إخوتي الكرام أخي الحبيب ياسر فتح عظيم في مجال اﻹكسيل غاية في الروعة والجمال واﻹتقان له مزايا على أنه تطور مطلوب فكما أننا نرغب بمعرفة طريق الذهاب وجب أن نعلم طريق اﻹياب ...ولكن لحساسية هذا الموضوع حيث صار بإمكان كل من يريد الحصول على موضوع يحصل عليه بأقل من دقيقة بينما هناك من تعب وعانى ليظهر ملفه بشكل رائع أرى وجوب النظر بحقوق الملكية والنشر وضمانها قبل طرحه للجميع لأنه سيسبب التقاعس عن تقديم أي عمل بمجهود مضن...أما كيفية ضمان حقوق الملكية والنشر والتوزيع فيعود البت به لأهل الخبرة ..والسلام عليكم ورحمة الله وبركاته3 points
-
2 points
-
بسم الله الرحمن الرحيم لا توجد طريقة امنة لحماية الاكسيل كما نعرف والذي لا يعرفه الكثيرين ان حماية الملفات التنفيذية ايضا لا فائدة منها فهي هشه كالملفات العادية فقمت بوضع حل نهائي ولكن سيكون صعب علي البعض وهو التعامل مع الفيجوال بيسك مباشرة وانشاء برنامجك من عليه وجعل ملف الاكسيل مجرد قاعدة بيانات وحتى ان كنت تريد حماية البيانات ايضا فبنعمل حماية للملف ايضا بكلمة مرور وهي صعب فكها اكيد في المثال المرفق برنامج قمت بطرحه مسبقا ولكن لم يلاحظ احد الحماية الموجودة به فهو ربط الفيجوال بيسك بالاكسيل الكل نظر له انه مجرد ربط فقط ولكنه اكثر الطرق حماية للاكسيل نفسه مرفق مثال بسيط عبارة عن ملفان ملف التشغيل وقاعدة البيانات وقاعدة البيانات aseel.dat هي عبارة عن ملف اكسيل بامتداد aseel.xlsx وتم وضع كلمة مرور عليه كلمة المرور رقم هاتفي طبعا المهم الطريقة امامكم طبعا حد يقدر يستخرج المعادلات او يعدل علي القاعدة بطرق غير الموجودة داخل البرنامج فانا اتيح لك اظهار ملف الاكسيل عادي ان قمت بعمل بعض التعديلات واخفاء الملف لن يستطيع احد العبث بالملف نهائيا وان تفرغت باذن الله اضع لكم شرح لهذا الموضوع باذن الله تعالى مع تحياتي ياسر العربي 101010.rar2 points
-
شكرا لك اخي رمهان وجزاك الله خيرا على هذا العمل كانت اجابتك لي شافية كافية وفي الصميم انتهى الموضوع2 points
-
تفضل : 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 بالتوفيق2 points
-
السّلام عليكم و رحمة الله و بركاته ألف شكر أستاذنا الغالي " ياسر العربي " .. هدية ثمينة و غالية .. من انسان رائع و كريم .. حتّى و إنْ كنّا نبحث دومًا عن الحماية .. لكنّنا نجد أنفسنا في كثير من المرّات بحاجة ملحّة و ماسّة و ضرورية لمثل هكذا برامج فك الحماية .. كل البرامج لها ما لها و عليها ما عليها .. المسألة إذن .. مسألة كل واحد و قناعته بكيفية استخدامه لهكذا ملفات ..مثل هذا الملف التقني المبهر الذي أراه أمامي الآن .. ليس مفروضًا أنْ أساهم في تفجيرات هيروشيما بهذا الملف أخي "ياسر العربي" .. لكن من حقّي كمتعلّم أن أعرف مركّبات القنبلة التي دمّرتها .. بل سأسعى من أجل تعلّمها و تطوير أفكاري و معارفي .. بارك الله فيك .. جزاك الله خيرًا و زادك من علمه و فضله .. فائق إحتراماتي و إعجاباتي بهذا المشروع المميّز فوق العادة .. أخوك / عبد العزيز البسكري2 points
-
بعد اذن استاذنا الحبيب رمهان اخي عصام نفس الموضوع حصل معي وكانت المشكلة في جزئين علما اني استخدم 2013 1. تغيير ص الي am لو الاوفيس انجلش . 2. تغير العلامات ; الي , وجرب لو ما ظبط هرسلك المثال غدا انشالله2 points
-
السلام عليكم اخي الكريم محسن محمد بالامكان عمل البرنامج ان لديك افكار للاليه التي تريدها كي تخدمك في عملك بدون مقابل يحتاج منك صبر وللعلم المنتدى هنا للمعرفه وتبادل الخبرات تحياتي2 points
-
نفضل اخى الكريم الملف المرفق الحل بالمعادلات اختر الموقع من الخليه D1 ارجوا من حضرتك عندما تطلب شئ توضح طلبك من البدايه بالتفصيل وعايز يكون الحل بالمعادلات او الاكواد تقبل تحياتى اظهار بيان مواد.zip2 points
-
الصق هذا التعبير بديلا لعمود التاخير في الاستعلام : التاخير: Format(TimeValue("08:00 am")-TimeValue([hodoor]);'Short Time') & IIf([hodoor]<=#08:00:00 ص#;"+";"-") اتمنى ان يكون لما اردت وبالتوفيق2 points
-
السلام عليكم ورحمة الله وبركاته هدفيه للعاملين بالكنترولات المدرسيه ...... _ سجلات اعمال الكنترول كامله ... _ توزيع الملاحظين اليا على اللجان .... مع تحياتى ....1 point
-
تماااااااااااااااااااااااااااااااااااااااااااااااااااااااااااام ايون كده الله يفتح عليك يا استاذ وائل جزاكم الله خيرا استاذى الجليل ومعلمى القدير كل الشكر والتقدير لاهتمامكم ومتابعتكم الكريمة جزاكم الله عنا كل الخير والله انا كنت محرج جدا انى اطلب من حضرتك المثال وبالاخص بعد ما الاستاذ " المعتزبالله" رد بدون ابداء اى تعليق وكل ملاحظاتك القيمة اخذتها بعين الاعبار اثناء تجربتى الا ما تطرق اليه الاستاذ " وائل " جزاكم الله عنا كل الخير وهذا المرفق لمن اراد وهذا التعبير الخاص باللغة الانجليزية كما تفضل به الاستاذ وائل التاخير: Format(TimeValue("08:00 am")-TimeValue([hodoor]),'Short Time') & IIf([hodoor]<=#08:00:00#,"+","-") ولكن لى سؤال للاستاذ الفاضل والمعلم الجليل "رمهان" هل هذا التعبير لو وضع فى استعلام قاعدة بيانات تم انشائها على اوفيس باللغة الانجليزية ولو اردنا فتح هذه القاعدة على اوفيس باللغة العربية لن يعمل ؟ التاخير بالسالب.rar1 point
-
شكرا على الاهتمام اخى ابا الحسن والحسين المشكلة عندى ملف اكسيل اضعة على Google Drive ومن خلاله يقوم بعض الاشخاص بتعبئة بعض البيانات وقد يقوم احد الاشخاص بالتعديل فى الخلايا المكتوبه ولذلك اريد حمايتها وللأسف الأكواد لا تنفذ على Google Drive وشكرا على مجهودك ومحاولة المساعدة1 point
-
اخي محمد عصام انظر الملف المرفق في المشاركة رقم 3 والصق التعبير السابق بديلا لعمود التاخير ! وملاحظات اخي وائل في مكانها بالاضافة الى : * قد يكون الصقته في عمود جديد وهنا سيتم تكرار لاسم العمود لانه باسم "التاخير" ويوجد عمود سابق باسم "التاخير" هذا ان كان التطبيق على نفس الاستعلام بالمشاركة الثالثة ! الاحظ عدم وجود ترقيم للمشاركات بعد التحديثات الجديدة فياليت الادارة تعيد هذه الميزة المهمة مشكورين تحياتي1 point
-
شكرا اخي الغالي احمد لمرورك الكريم وحاول تتعمق في لغة البرمجه شوية مش كفاية انك تعرف معادلات ركز وربنا يكرمك باذن الله اخي الغالي م/ ياسر كما تقول الاسم الغالي شكرا لدعمك حبيبي اما الشرح فانا مشتت ونفسي اتلم علي بنود وعناصر وموضوع منسق ولكن هذا يتطلب وقت كبير وتفرغ ولكن سأ قوم باذن الله بمحاولة توضيح وشرح كيفيه العمل علي هذه البرامج ولو حتى جزء صغير كل مره بارك الله فيك اخي واستاذي الغالي ابو يوسف دائما مساند لنا وحافذ علي العطاء باذن الله لك مني كل الاحترام لشخصكم الكريم1 point
-
مش بقولك يا أخى الحبيب / ياسر العربى إظهر وبان عليك الأمان عمل أكثر من رائع وفى الإحتياج له فى بعض الأحيان وليس لفك الحماية بل للتعلم ليس أكثر فجر القنبلة فى إنتظار عرضة وشرحة برده متنساش يا صاحبى تقبل خالص تحياتى وتقديرى لشخصكم الكريم1 point
-
ما شاء الله تبارك الله أخي ياسر الا الامام سر ونحن معك ابهرنا بإبداعاتك زادك الله بسطة في العلم1 point
-
1 point
-
تشكر ربنا يزيدك علما ونفعا للاخرين ماقصرت وماعللية كلام تسلم الايادي1 point
-
1 point
-
اخى الحبيب السلام عليكم ورحمة الله احب ان اشكرك على تلك الكلمات الطيبة التى لا استحقها فاءن كان هناك فضل بعد الله تعالى لأحد لكان لهذا المنتدى العملاق الجامعة المفتوحة لكل عشاق الاكسل بالنسبة الى الحل يوجد عمود تم اخفاؤه فى كل ورقة وهو العمود "AA" وفى الخلية "AA1" تم كتابة اسم الورقة التى هى مسماة باسم العميل او المسافر وبداية من الخلية "AA2" تم ادراج المعادلة التالية =IF(Conso!B2=$AA$1;COUNTIF(Conso!B2:$B$2;$AA$1);"") وفى الجدول وضعنا المعدلة التى تحدثت عنها فى ردك السابق ارجو ان اكون قد وفقت فى الشرح ودمتم بألف خير1 point
-
وعليكم السلام ورحمة الله اخى الكريم ابا الحسن مرورك على الموضوع هو الاروع والاجمل جزاكم الله خيرا تقبل تحياتى1 point
-
1 point
-
1 point
-
اخي العزيز مجهود رائع وكود مفيد هل يمكن اجراء تعديل على الكود ليستخدم مع 25 ماده رئيسيه تقريبا ويظهر صورها عند وضع الماوس على اسماءها مع الشكر1 point
-
اخى السيفانى ان شاء الله سيتم استكمال الموضوع ثم بعد ذلك يتم تنقيح الموضوع ارجو التماس العزر فى التأخير وفى توقف الدروس ولكن ان شاء الله فى القريب نستكمل باقى الدروس تقبل تحياتى1 point
-
1 point
-
السلام عليكم ورحمة الله وبركاته بسم الله ما شاء الله لا قوة إلا بالله أخي الحبيب الصقر حل رائع حسب كل شركة ...جزاكم الله خيراً...1 point
-
1 point
-
1 point
-
أشكرك أخي الحبيب م/ياسر على كلامكم العطر ومروركم الجميل ودعائكم وأقول : آمين لي ولكم بمثله أخي الحبيب والسلام عليكم ورحمة الله وبركاته.1 point
-
نعم بارك الله فيك وزادك الله علماً ورزقك من حيث لا تحتسب شاكر ومقدر لك1 point
-
السّلام عليكم و رحمة الله و بركاته ألف شكر أستاذنا الغالي " ياسر فتحي البنّا " على الكود الرّائع .. جزاك الله خيرًا و زادك من علمه و فضله لإثراء الموضوع و التّنويع بالملفات .. أقدّم هذا الملف .. حيث بعد انتهاء صلاحيته المحددة سلفًا بتاريخ محدّد مثلما مشار إليه بالسّهم الأحمر سيُطلب منّا كلمة المرور و التي هي 123 .. و هناك العديد من الأمثلة المتنوعة .. إذا أردت الزّيادة .. زدناك أخي الكريم " أبو تيم " فائق إحتراماتي حماية الملف بتاريخ محدد.rar1 point
-
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 Sub1 point
-
بارك الله فيك وفى أعمالك الرائعة أبى وأستاذى القدير / محمد حسن المحمد جعله الله فى ميزان حسناتك1 point
-
1 point
-
1 point
-
السلام عليكم ورحمة الله اخي ارسل مثال ولو صورة ووضح تريدها علي عمود معين وهل هي علي كل الشيتات او شيت معين ايش يعني الاوليدون كود1 point
-
وإياك أخونا ابو ليالي نسأل الله أن يكون عملنا هذا صادق لوجه الله وأن يتقبله شكرا لحضرتك أخونا hgefdjd140 نشأل الله القبول1 point
-
ان شاء الله ممكن انشر قريبا شرح تفصيلي لالية عمل ribbon فهو جميل جدا في اكسس عموما هناك برنامج اسمهribboncreator البرنامج رائع جدا يمكن للجميع الاستفادة منه هذا رابطه http://www.ribboncreator2010.de/en/ بالنسبة لالية اغلاق حسابات السنة حاليا يدوية ولكن افكر بجعلها آلية بحيث يقوم البرنامج بتوليد القيد الختامي اما فصل قاعدة البيانات عن البرنامج فهو خيار صعب لتجنب مشاكل الربط بين الواجهة والقاعدة ولكني فعلا احتاج الى المساعدة في موضوع تدوير السنة المالية فلو عندك اي اقتراحات يرجى ابلاغي بها جزاك الله خيرا استاذ عبد الله1 point
-
أستاذى أبو خليل وأستاذ محمد عصام وأستاذ صاحب الموضوع جزاكم الله خيرا جميعا أستاذى أبو خليل هل سيختلف تعريف المكتبة اذا اختلف نظام التشغيل win7 أو winXp أو أى اصدار آخر . وجزاكم الله خيرا أستاذى محمد عصام حمدا لله على السلامة وعود أحمد " أعذرنى جائت متأخرة شيئا ما ولكنى لم أكن متابعا للمنتدى منذو فترة" ولكن نورت المنتدى ووحشتنا "امممممممممممممممممم"1 point
-
الشكر والدعاء لكل من كتب حرفا يقصد نفع غيره . فالمعلومة ليست حكرا على احد ، حتى صاحب المسألة يشكر لانه سبب في ثمرة هذا الموضوع . لذا يجب ان نعتني بمسألة الاحتساب اليس المسلم يعمد الى النوم او الاكل بنية التقوي للعبادة او بنية طلب الرزق الحلال يؤجر ؟1 point
-
السلام عليكم ورحمة الله وبركاته .. كنت سافتح موضوع جديد لهذا الأمر حيث أن الموضوع مهم جداً ،، أنا شخصياً مهتم بأمر المستخدمين وتوزيع الصلاحيات وأستفذت كثيراً من هذا المنتدى الرائع ،، مرفق برنامج صغير من تصميم الأخوان في المنتدى وأعتقد أني نزلته من هذا الموضوع بالتحديد .. Users maker -Third Edition أستخدمته من قبل وكان ينقصه تحديد نموذج صفحة البداية وكان غير معرب ... بعد أذن الأخوان أرجوا أن يتقبلوا التعديلات التي أدخلتها عليه وهي التعريب و إضافة صفحة البداية كل ما عليك هو أن تعيد تسمية النموذج الذي تريده أن يظهر مع تشغيل البرنامج إلى index ثم تقوم بتشغيل البرنامج المرفق ومتابعة الخطوات ... تقبلوا تحياتي أخوكم .. eng-Hussam Users maker -Third Edition (1).rar1 point
-
اخى هذا ما اقصدة وعملت مثال بسيط خالص للصلاحيات mared 123 ادمن mido 123 زائر فقط مثال على ظهور زر لوحة التحكم فى حالة دخول مارد واخفاؤه فى حالة دخول اى مستخدم اخر وهكذا يمكن اضافة اى صلاحيات اخرى http://www.mediafire.com/download/jhsz550vq2kwlpm/صلاحيات_مبتدئين.rar1 point
-
الحمد لله الذي من علينا بالعلم و بارك الله بالعلماء1 point
-
وفقكم الله وبانتظار ابداعات اخرى1 point
-
اكتب المعادلة التالية ("DATEDIF(E3, E4,"d= حيث ان e3 هو التاريخ الأقدم e4 هو الاحدث أما اذا اردت عدد الشهور استبدل d ب m1 point
-
السلام عليكم .... أخي السيوي هذه مشاركة أتمنى تفيدك وتفيد الجميع مضافا على ما تفضل به الاخوه من حلول ... يوجد لدي ملفين حملت أحدهم منذ فترة من هذا المنتدى والآن لاأعلم بالظبط لأي الأعضاء والآخر ربما يفيدك لمعرفة الإختصارات وعلى أي حال إليك الملفين حيث يمكنك إخفاء وإستعادة القوائم و الوضع الإفتراضي بمجرد ضغط F3 ..... والسلام استعادة قوائم و اعدادات الأكسل.rar1 point
-
السلام عليكم ورحمة الله وبركاتة رايت العديد من الاخوة يسال عن التنسيقات في الاكسيل . من بين اضافة اللوان والحدود والاشكال الهندسية التي تجعل من صفحة الاكسيل اكثر اشراقة وابداع . وسنبدائها بتنسيق الخلايا . الخلاية : هي نقطة التقي عمود مع صف فمثلا الخلية A1 هي التقي العمود A مع الصف 1. يمكنك جعل اسماء الخلايا فقط ارقام من خلال (ادوات)ثم (خيارات)ثم (عام)انقر فوق (نمط المرجعR1C1) وعادا الحرف يسبق الرقم .وهذا هو اسم الخلية وهو يظهر في مربع الاسم. لتغير اسم الخلية :حدد الخلية او مجموعة الخلايا التي تريد تغير اسمها ثم اذهب الي (ادراج) ثم (اسم) ثم (تعريف)اكتب في مربع (الاسماء في المصنف)الاسم الجديد .بعدها ستلاحظ ان اسم الخلية قد تغير من الاسم السابق الي الاسم الجديد .طبعا في مربع الاسم . وهذا يفيد في : سرعة الانتقال الي هذة الخلايا. ضع المواس عند مربع الاسم ستجد قائمة جديدة تم فتحها وفيها مربع تحرير وستجد الاسم الجديد عند النقر عليها تجد امامك الخلايا ثم تحديدها تلقائيا . كذلك يمكنك استخدام الاسم الجديد في المعادلات . للاشارة الي الخلايا . تنسيق الخلايا :اذا فتحنا تنسيق الخلايا نجد مجموعة من الخيارات اولها الرقم : وهذا يساعد علي تنسيق الارقام داخل الخلايا مخاذة : وهويحدد شكل النص داخل الخلية حرك الخط الموجود عند كلمة نص الي الاعلي ضمن خيار (اتجاة) او الي الاسفل واضغط انتر تجد شكل النص تغير الي الدرجة التي حددتها . يمكنك كتابة رقم الدرجة المراد للنص التحرك فية في ( الدرجات) اسفل اتجاة ويجب ات تكون الدرجة مابين صفر الي 90او انقر علي المربعات الصغيرة السوداء ليتغير لونها الي الاحمر ويتجة الخط اليها . التحكم بالنص يمكنك من دمج الخلايا في خلية واحدة . حدد الخلايا التي تريد دمجها . تجد ها تختلف عن الخلايل التي فوقها او التي اسفل منها واصبح اسمها واحد. مخاذة النص :يحدد هذا الخيار شكل النص داخل الخلية (طبعا اذا كانت الخلية لة طول وعرض اكبر من المعتاد او كانت مدمجة)لتجعل النص مثلا يكون في اعلي او اسفل الخلية اوفي المنتصف او في اليسار او اليمين . الخط :و هو لتنسيق الخط داخل الخلية ما بين نوع الخط والنمط والحجم واللوان والتاثيرات علي الخطوط . الحدود : وهي لاضافة حدود حول الخلية او مجموعة الخلايا . يمكنك ضمن (السطر)تحديد نوع السطر الذي تريد رسم للخلية و(اللوان)لتحديد لون هذا السطر طبعا حدد اللوان اولا ثم نوع السطر وستلاحظ ضمن المعاينة شكل الحدود قبل تطبيقها علي الخلية .لتطبيق الحدود بسهول انقر فوق المربعات الضغيرة الموجودة حول المعاينة (حدود تميز)تقوم فقط بوضع السطر للحدود الخارجية للخلايا (حدود داخلية) تعمل فقط في حالة تحديد مجموعة من الخلايا لتحدد شكل السطور بين الخلايا وبعضهاالبعض او الحدود الخارجية (بلا)تقوم بمسح جميع الحدود التي تم رسمها . نقش:وهي لتعطي الخلية او الخلايا المحددة الوان جملية . وهي طبعا لا تاثر علي لون النص المكتوب داخل الخلية الا اذا كان لون النقش هو نفس لون الخط . حيث يصبح اللوان غير مرئي . حماية :وهي للحفاظ علي جميع التنسيقات التي تم وضعها علي الخلايا.يترتب عليك اولا الذهاب الي (ادوات)واختيار (حماية ورقة العمل)ووضع كلمة السر. (مؤمنة)تجعل الخلايا التي تم تامينها غير قابلة للتعديل اي بعد ادخال كلمة السر الصحيحة.(اخفاء)تخفي الصيغ و المعادلات من شريط الصيغ .حتي لة وضعت المواس قوف خاية بها معادلة فلن تتمكن من رؤية المعادلة.سوف تلاحظ انك لاتستطيع فتح (تنسيق الخلايا) عندما تكون مؤمنة . هذا ما استطعت كتابة .وسيكون هناك المزيد ان شاء الله1 point