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

السلام عليكم اخى الكريم لتنفيذ مثل هذه المعادلات بشكل صحيح لابد من مراعاه اسبقيه تنفيذ العمليات الحسابيه .. وهى كالاتى الاقواس الاسس والجذور الضرب والقسمة الجمع والطرح لاحظ المثال التالى .. ومراحل تنفيذ المعادلة :- اما وعن معادلة حضرتك .. والتى توصلت اليها .. مراحل تنفيذها كالاتى واليك رابط فيديو ...حقا رائع .. ومدخل وافى لفهم جميع معادلات الاكسيل https://www.youtube.com/watch?v=eVJGbnCT7DE تقبل خالص تحياتى

السلام عليكم ورحمة الله وبركاته اخوتى وأحبابى فى المنتدى بناء على طلب أخينا سعد عايد فى موضوعى الماضى العمليات الحسابية الأربعة بمجرد المرور بالماوس فوق خلية http://www.officena.net/ib/topic/64689-%D8%A7%D9%84%D8%B9%D9%85%D9%84%D9%8A%D8%A7%D8%AA-%D8%A7%D9%84%D8%AD%D8%B3%D8%A7%D8%A8%D9%8A%D8%A9-%D8%A7%D9%84%D8%A3%D8%B1%D8%A8%D8%B9%D8%A9-%D8%A8%D9%85%D8%AC%D8%B1%D8%AF-%D8%A7%D9%84%D9%85%D8%B1%D9%88%D8%B1-%D8%A8%D8%A7%D9%84%D9%85%D8%A7%D9%88%D8%B3-%D9%81%D9%88%D9%82-%D8%AE%D9%84%D9%8A%D8%A9/ أقدم لكم طريقة اظهار واخفاء الفورم بالماوس مش بالـ الأكواد المستعمله بسيطة . تفضلوا المرفق ولا تنسونا فى دعائكم تقبل الله منا ومنكم صالح الأعمال اظهار واخفاء الفورم بالماوس .rar

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

السلام عليكم ورحمة الله وبركاته إخواني الكرام .. قد يكون موضوع الكسر موضوع شائك وفيه خلاف ، ولكن ربما يكون مفيد لصاحب العمل نفسه ، حيث أنه معرض لنسيان الباسورد الذي تم وضعه على محرر الأكواد .. الموضوع مميز لأنه يقوم بكسر الحماية بدون برامج على الإطلاق ..وبدون AddIns وبدون الاستعانة بأية برامج مجانية أو مدفوعة !! كسر محرر الأكواد بالأكواد نفسها (قنبلة الموسم) وعلى رأي المثل : علمته رمي السهام فلما اشتد ساعده رماني .. الكود قليل الأصل !! محفظش الجميل للبيئة اللي هو منها ، لأنه كسر بيئة محرر الأكواد !!! Sub HackVBA() Open "C:\Users\Future\Desktop\Test.xls" For Binary As #1 Put #1, 1, Replace(Input(LOF(1), 1), "DPB=", "DPX=", , 1) Close Workbooks.Open "C:\Users\Future\Desktop\Test.xls" End Sub المطلوب فقط أن تغير مسار الملف المراد كسره داخل الكود ، والمسار يوضع بين أقواس تنصيص .. أترككم مع الفيديو عله ينال إعجابكم وتستفيدوا منه إن شاء المولى .. ولا تنسونا من اللايكات على اليوتيوب !!!!! ....أكرر اللايكات على اليوتيوب ..فضلاً لا أمراً تقبلوا تحيات أخوكم أبو البراء

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

وعليكم السلام استاذ ابوانس الاكسل يعمل كل شئ في مكان واحد ، لهذا تستطيع عمل ماتريد في مكان واحد ، ولكن الاكسس يحتوي على جداول لحفظ البيانات ، استعلامات لفرز وتصفية وحساب البيانات ، نماذج لإدخال البيانات ووالتصرف بها ، تقارير لعرض النتائج وطباعتها ، ماكرو ووحدات نمطية للتصرف في البرنامج والبيانات. وهناك عدة طرق لعمل المطلوب ، وانا هنا اضع بين يديك احد الطرق: عمل استعلام يحسب الارقام الاقل من 40 ، والارقام بين 40 و 50 ، لكل حقل: . والنتيجة . ثم استخدام نتائج هذا الاستعلام لحساب مجموع حقول الاقل من 40 ، ومجموع حقول بين 40 و 50: . والنتيجة جعفر 244.db1.accdb.zip

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

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

السلام عليكم بدأت الأفكار تتوارد ...ولا أدري إن كانت تتوالد...لتنجب أعمالاً رائعة..

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

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

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

برنامج حسابات ، اتمنى انه يفيد ولو شخص واحد برنامج محاسبى.rar

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

بسم الله الرحمن الرحيم لاحظت في الفترة الأخيرة كثرة الأسئلة عن موضوع نسيان كلمات مرور ملفات الإكسل أو بعض ورقات العمل بالملف فأحببت أن أشارك إخوتي وأحبّتي أعضاء ومشرفي وخبراء منتدانا الرائع هذه الإضافة MasNoPass لفك حماية أوراق العمل في ملفات الإكسل وتعمدت تسهيل عملها &&&&&&&&&&& فقط تحتاج لإضافة الوظيفة الإضافية: 1 في ويندوز xp نسخ المرفق إلى المسار التالي C:\Documents and Settings\***\Application Data\Microsoft\AddIns حيث أن C هو قرص النظام و *** هو اسم المستخدم 2 في ويندوز 7 نسخ المرفق إلى المسار التالي C:\Users\***\AppData\Roaming\Microsoft\AddIns حيث أن C هو قرص النظام و *** هو اسم المستخدم ****************** بالنسبة لمستخدمي إكسل 2003 من خلال: فتح برنامج الإكسل والضغط على قائمة أدوات tools ===> وظائف إضافية Addins ===> ثم اختر MasNoPass ثم موافق ok وبالنسبة لمستخدمي إكسل 2007 يتم ذلك من خلال : فتح برنامج الإكسل والضغط على زر الأوفيس ثم خيارات إكسل Excel options ثم اختيار وظائف إضافية Addins من الجانب الأيمن/الأيسر ثم اذهب go ثم اختيار MasNoPass ثم موافق ok وبالنسبة لمستخدمي إكسل 2010 وما بعدها يتم ذلك من خلال : فتح برنامج الإكسل والضغط على قائمة ملف file ثم خيارات إكسل Excel options ثم اختيار وظائف إضافية Add-ins من الجانب الأيمن/الأيسر ثم اذهب go ثم اختيار MasNoPass ثم موافق ok /////////////////// طريقة العمل:- بعد تسجيل الوظيفة الإضافية تجد ظهور قائمة جديدة باسم (فك الحماية) وتحتاج فقط إلى فتح الملف المحمي ثم الضغط على قائمة فك الحماية واختيار (إزالة كلمة المرور) بعدها سيتم البدء في عدّ المحاولات والوقت المنقضي في إجراء العملية بعدها تظهر رسالة تفيد أنه تم إزالة كلمة المرور عن الملف وبعد الضغط على الرسالة ستجد الملف مفكوك بين يديك $$$$$$$$$$$$$$$$ و أذكّر نفسي وإياكم بأن الصحابة عليهم رضوان الله كان الواحد منهم إذا أراد أن يدعو لنفسه دعا لأخيه فيقول له الملك آمين ولك مثلها فلا ينقصني سوى دعائكم وأخيرا أذكر بخطورة الموقف وأرجو عدم استعمالها فيما حرّم الله وعند النقل يجب ذكر المصدر منتديات أوفيسنا اللهم قد بلّغت ... اللهم فاشهد أخوكم محمد صالح فيديو لشرح كيفية استعمال الأداة ولا ينقصني سوى دعاؤكم ينصح بالاشتراك في القناة وتفعيل جرس التنبيه ليصلكم كل جديد ومفيد وقت صدوره MasNoPass.rar New_MasNoPass.rar

السلام عليكم ورحمة الله وبركاته اخواني/اخواتي رأيت الكثير من الاسئلة حول تصدير بيانات الاكسس الى الاكسل ، وكل سؤال يختلف عن غيره بطريقة او اخرى ، فحبيت ان اضع بين يديكم برنامج اشتغلت عليه ، واتمنى من الله سبحانه وتعالى انه يقدر يخدم الكل البرنامج سهل الاستعمال ، فكل المطلوب في الواجهة ، ولا تحتاج الذهاب للكود اولا: الواجهة: 1. تختار من مربع السرد ، جدول او استعلام ، 2. على اساس الاختيار في رقم 1 ، ستظهر لك قائمة باسماء الجداول او الاستعلامات في برنامجك ، 3. اسم ملف الاكسل المراد حفظه به ، ومجلد التخزين ، فتلقائيا يكون في نفس مجلد البرنامج ، 4. هنا تكتب اسم صفحة الاكسل التي تريدها (انظر الصورة في الاسفل) ** تستطيع ان تصدر اي عدد من الصفحات الى اكسس (طبعا التصدير يكون باستعمال البرنامج عدة مرات ، في كل مرة تستخدم اسم صفحة جديدة) ، ** تستطيع ان تصدر بيانات جديدة الى نفس الصفحة في اكسس (طبعا التصدير يكون باستعمال البرنامج عدة مرات ، في كل مرة تستخدم *الادخال من خانة* اسفل الخانات الموجودة في الاكسل) ، 5. تستطيع بدء تصدير البيانات الى اي خانة في اكسل مثل A2 او C5 او اي خانة اخرى ، ** تستطيع ان تصدر بيانات جديدة الى نفس الصفحة في اكسس (طبعا التصدير يكون باستعمال البرنامج عدة مرات ، في كل مرة تستخدم *الادخال من خانة* اسفل الخانات الموجودة في الاكسل) ، 6. تستطيع ان تحفظ ملف الاكسل بالصيغ التاليه: "xls" او "xlsx" او "xlsm" او "xlsb" او "csv" او "txt" ، والصيغتين الاوليتين هما الاهم ، والصيغتين الاخيرتين بهم قيود معينة ، 7. تستطيع ان تختار المجلد الذي تريده ، مع كتابة اسم الملف المناسب لك (انظر الرقم 3 اعلاه) ، 8. تستطيع تصدير البيانات مع اسماء الحقول (في الاكسس) ، وتستطيع تصدير البيانات مع عناوين/مسميات الحقول (في الاكسس) ، نلاحظ اعلاه ، بان الجدول elemnts لا يحتوي على عناوين/مسميات الحقول بالعربي ، بينما الجدول elemnts2 يحتوي عليها ، وتستطيع تصدير البيانات فقط بدون اسماء الحقول ، 9. تستطيع ان تصدر البيانات الى ملف اكسل فيه بيانات سابقة ، وهنا تستطيع الاستفادة من الارقام 4 و 5 اعلاه ، او ان تحذف ملف الاكسل الموجود حاليا بنفس الاسم ، وتبدأ تصدير ملف جديد ، 10. بعد تصدير البيانات الى اكسل ، هل تريد إحتواء وتوسيع كل الاعمدة فيه ، حتى ترى كل البيانات بدون الحاجة الى توسيع كل عمود على حدة ، او لا تريد توسيع الاعمدة. 11. الزر الذي يقوم بعملية تصدير البيانات الى اكسل ، حسب الاختيارات اعلاه ، مع ملاحظة: يجب تعبئة الحقول داخل المربعات الحمراء ، اما بقية الحقول فإختيارية ، 12و 13. لجعل هذا البرنامج يعمل على اي من برامجكم الحاليه ، يجب تصدير النموذج frm_Export_to_Excel و الوحدة النمطية fFolder_Dialog اليها. طبعا هناك أفضلية تصدير البيانات من الاستعلام ، حيث تستطيع ان تتحطم بالبيانات المطلوب تصديرها. ملاحظات؟ اخطاء/عطل؟ إضافات؟ انا في الخدمة ، قدر المستطاع جعفر -------------------------------------------------------- الموضوع منقول من منتدى شقيق وتم نقله كماهو وذلك للاهميه الرجاء الدعاء للاستاذ : جعفر بارك الله فيه Export_to_Excel تصدير البيانات الى اكسيل.zip

حفظ قاعدة البيانات بأخذ نسخة ووضعها على D:\ عند إغلاق قاعدة البيانات ( أي في كل مرة تغلق فيها قاعدة البيانات ) وتسميتها بالعام مثلا 1429/1430 يتم تحديث بيانات النسخة الاحتياطية عند كل إغلاق ، وفي نهاية السنة وبداية سنة جديدة يتم نسخ قاعدة جديدة باسم العام الجديد ليبقى لكل عام قاعدة تخصه . تقبلوا تحيات أخيكم ... ابو خليل.. في المرفقات المثال قم بعمل التالي : 1 - اجلب الوحدة النمطية SaveFolder الموجودة في المثال إلى قاعدة بياناتك فقد تحتاج اليها مستقبلا عندما تود تحديد مكان النسخة 2- يوجد في النموذج مربعي نص مخفية قم بنسخهما إلى النموذج الرئيسي في قاعدة بياناتك 3 في حد ث عند الإغلاق للنوذج الرئيسي الصق هذا الكود : كود On Error Resume Next Dim OldFile As String, DBwithEXT, DBwithoutEXT, NewFile As String, CopyMyDB OldFile = [DBOld] DBwithEXT = Dir(OldFile) DBwithoutEXT = Left(DBwithEXT, Len(DBwithEXT) - 4) NewFile = [DBNew] & "\" & DBwithoutEXT & "-" & (Format(Date, "yyyy") - 1) & "-" & Format(Date, "yyyy") & Right(DBwithEXT, 4) CopyMyDB = "cmd.exe /C copy " & """" & OldFile & """" & " " & """" & NewFile & """" Shell CopyMyDB, 0 Exit Sub وفي حدث عند التحميل الصق هذا الكود : كود '[DBOld] = CurrentDb.Name اختيار قاعدة البيانات الحالية [DBOld] = "c:\z1.mdb" 'اختيار مسار القاعدة البديلة [DBNew] = "D:\" 'اختيار مكان حفظ النسخة __________________.rar

السلام عليكم 1. من المعروف ان تنسيق النص في مربع القائمة ListBox هو من اليسار الى اليمين ، مشكلة كانت تصادفني دائما ، وهو تنسيق القيم في مربع القائمة لتكون من اليمين الى اليسار بالنسبة للغة العربية (طريقة تغيير مربع القائمة الى مربع تحرير ونص ، ثم عمل التنسيق عليه من اليمين الى اليسار ، ثم اعادته الى مربع قائمة لا يعمل معظم الوقت) ، موقع http://www.lebans.com والذي يحتوي على مالذ وطاب عنده طريقه لهذا التنسيق: http://www.lebans.com/justicombo.htm كذلك. 2. ونفس المشكلة مع موضوع تنسيق الشجرة TreeView من اليمين الى اليسار. النتيجة: و وطريقة العمل ، يوضع هذا الكود في وحدة نمطية: Option Compare Database Option Explicit #If VBA7 And Win64 Then '64 bits Public Declare PtrSafe Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As LongPtr, ByVal nIndex As Long) As Long Public Declare PtrSafe Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As LongPtr, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Public Declare PtrSafe Function InvalidateRect Lib "user32" (ByVal hwnd As LongPtr, lpRect As Long, ByVal bErase As Long) As Long Public Declare PtrSafe Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As LongPtr, ByVal hWnd2 As LongPtr, ByVal lpsz1 As String, ByVal lpsz2 As String) As LongPtr Public Declare PtrSafe Function GetFocus Lib "user32" () As LongPtr Public Declare PtrSafe Function GetWindow Lib "user32" (ByVal hwnd As LongPtr, ByVal wCmd As Long) As LongPtr Dim hwnd As LongPtr #Else '32 bits Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Public Declare Function InvalidateRect Lib "user32" (ByVal hwnd As Long, lpRect As Long, ByVal bErase As Long) As Long Public Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long Public Declare Function GetFocus Lib "user32" () As Long Public Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long Dim hwnd As Long #End If Public Const GW_CHILD = 5 Public Const WS_EX_LAYOUTRTL = &H400000 Public Const GWL_EXSTYLE = (-20) Function RTL_Set(frm As Form, ctl As Control) Dim varHwnd As Variant Dim OldLong As Long frm.SetFocus ctl.SetFocus varHwnd = GetFocus() OldLong = GetWindowLong(varHwnd, GWL_EXSTYLE) SetWindowLong varHwnd, GWL_EXSTYLE, OldLong Or WS_EX_LAYOUTRTL InvalidateRect hwnd, 0, False End Function Function RTL_SetTree(frm As Form, ctl As Control) Dim OldLong As Long OldLong = GetWindowLong(ctl.hwnd, GWL_EXSTYLE) SetWindowLong ctl.hwnd, GWL_EXSTYLE, OldLong Or WS_EX_LAYOUTRTL InvalidateRect hwnd, 0, False End Function ' ' From http://www.microsoft.com/middleeast/msdn/faq.aspx ' 'Place OnLoad of the Form ' Dim OldLong As Long 'For Form ' OldLong = GetWindowLong(Me.hwnd, GWL_EXSTYLE) ' SetWindowLong Me.hwnd, GWL_EXSTYLE, OldLong Or WS_EX_LAYOUTRTL ' InvalidateRect hwnd, 0, False 'For List ' OldLong = GetWindowLong(List1.hwnd, GWL_EXSTYLE) ' SetWindowLong List1.hwnd, GWL_EXSTYLE, OldLong Or WS_EX_LAYOUTRTL ' InvalidateRect hwnd, 0, False 'For The StatusBar ' OldLong = GetWindowLong(StatusBar1.hwnd, GWL_EXSTYLE) ' SetWindowLong StatusBar1.hwnd, GWL_EXSTYLE, OldLong Or WS_EX_LAYOUTRTL ' InvalidateRect hwnd, 0, False 'For TreeView ' Dim nodX As Node ' Set nodX = TreeView1.Nodes.Add(, , "R", "Root") ' Set nodX = TreeView1.Nodes.Add("R", tvwChild, "C1", "Child 1") ' Set nodX = TreeView1.Nodes.Add("R", tvwChild, "C2", "Child 2") ' Set nodX = TreeView1.Nodes.Add("R", tvwChild, "C3", "Child 3") ' Set nodX = TreeView1.Nodes.Add("R", tvwChild, "C4", "Child 4") ' nodX.EnsureVisible ' OldLong = GetWindowLong(TreeView1.hwnd, GWL_EXSTYLE) ' SetWindowLong TreeView1.hwnd, GWL_EXSTYLE, OldLong Or WS_EX_LAYOUTRTL ' InvalidateRect hwnd, 0, False 'For ListView ' OldLong = GetWindowLong(ListView1.hwnd, GWL_EXSTYLE) ' SetWindowLong ListView1.hwnd, GWL_EXSTYLE, OldLong Or WS_EX_LAYOUTRTL ' InvalidateRect hwnd, 0, False 'For ProgressBar ' ProgressBar1.Value = 50 ' OldLong = GetWindowLong(ProgressBar1.hwnd, GWL_EXSTYLE) ' SetWindowLong ProgressBar1.hwnd, GWL_EXSTYLE, OldLong Or WS_EX_LAYOUTRTL ' InvalidateRect hwnd, 0, False 'For ToolBar ' mhwnd = GetWindow(Toolbar1.hwnd, GW_CHILD) ' OldLong = GetWindowLong(mhwnd, GWL_EXSTYLE) ' SetWindowLong mhwnd, GWL_EXSTYLE, OldLong Or WS_EX_LAYOUTRTL ' InvalidateRect hwnd, 0, False في اسفل الكود انا تركت الكود لبقية الاشياء اللي يمكن عملها من اليمين الى اليسار. اما تنفيذ التنسيق لمربع القائمة ، فهو وضع هذا الكود عند تحميل النموذج الذي يحتوي على هذا المربع (وهنا اسم حقل مربع القائمة هو List0_RTL ) : 'ListBox RTL Call RTL_Set(Me, List0_RTL) وتنسيق الشجرة ، فهو وضع هذا الكود عند تحميل النموذج الذي يحتوي على الشجرة (وهنا اسم الشجرة هو TreeView1) : 'TreeView RTL Call RTL_SetTree(Me, TreeView1) وللأمانة العلمية ، فاني استخدم قاعدة البيانات التي وضعها الاخ محمد في الرابط: http://www.officena.net/ib/index.php?showtopic=60781 جعفر تعديل 1: 18-11-2021 ، جعل البرنامج يعمل على النواتين 32بت و 64 بت 54.RTL_TreeView_ListBox_32bits_n_64bits.accdb.zip

الموضوع هو تحقيقا لطلب احد اخواننا االكرام وفيه يمكن تحديد الازار داخل نظام المستخدمين في المثال المستخدم محمد معرف =1 والسري=1 مسموح له جميع الازرار ما عدا زر الصلاحية والمستخدم ابوخليل معرف=2 والسري=2 مسموح له الصلاحية فقط آمل ان تجدوا الفائدة صلاحية الازرار.rar

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

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

بارك الله فيك اخي الحبيب عبدالعزيز على هذه اللمسة الجميلة والرائعة والمفيدة .

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

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

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

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

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

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

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

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

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

السلام عليكم ورحمة الله وبركاته أسعد الله صباح النوابغ الذين يبذلون بأفكارهم النيرة ليسعد المجتمع الذي أحيط بالأشواك إحاطة السوار بالمعصم "لن تنالوا البر حتى تنفقوا مما تحبون" (حديث مرفوع) حَدَّثَنَا رَبِيعٌ الْمُؤَذِّنُ ، قَالَ : حَدَّثَنَا ابْنُ وَهْبٍ ، قَالَ : أَخْبَرَنِي ابْنُ أَبِي الزِّنَادِ ، عَنْ مُوسَى بْنِ عُقْبَةَ ، عَنْ عَبْدِ اللَّهِ بْنِ الْفَضْلِ ، عَنْعَبْدِ الرَّحْمَنِ الأَعْرَجِ ، عَنْ عُبَيْدِ اللَّهِ بْنِ أَبِي رَافِعٍ ، عَنْ عَلِيِّ بْنِ أَبِي طَالِبٍ رَضِيَ اللَّهُ عَنْهُ ، قَالَ : كَانَ رَسُولُ اللَّهِ صَلَّى اللَّهُ عَلَيْهِ وَسَلَّمَ يَقُولُ وَهُوَ رَاكِعٌ : " اللَّهُمَّ لَكَ رَكَعْتُ وَبِكَ آمَنْتُ ، وَلَكَ أَسْلَمْتُ ، وَأَنْتَ رَبِّي ، خَشَعَ لَكَ سَمْعِي وَبَصَرِي وَمُخِّي وَعَظْمِي وَعَصَبِي لِلَّهِ رَبِّ الْعَالَمِينَ ، وَيَقُولُ فِي سُجُودِهِ : اللَّهُمَّ لَكَ سَجَدْتُ ، وَلَكَ أَسْلَمْتُ ، وَأَنْتَ رَبِّي ، سَجَدَ وَجْهِي لِلَّذِي خَلَقَهُ وَشَقَّ سَمْعَهُ وَبَصَرَهُ تَبَارَكَ اللَّهُ أَحْسَنُ الْخَالِقِينَ " . حَدَّثَنَا مُحَمَّدُ بْنُ خُزَيْمَةَ ، قَالَ : حَدَّثَنَا عَبْدُ اللَّهِ بْنُ رَجَاءٍ ح . وَحَدَّثَنَا ابْنُ أَبِي دَاوُدَ ، قَالَ : حَدَّثَنَا الْوَهْبِيُّ ، وَعَبْدُ اللَّهِ بْنُ صَالِحٍ ، قَالُوا : أَنْبَأَنَا عَبْدُ الْعَزِيزِ بْنُ الْمَاجِشُونِ ، عَنِ الْمَاجِشُونِ ، وَعَبْدِ اللَّهِ بْنِ الْفَضْلِ ، عَنِ الأَعْرَجِ ، فَذَكَرَ بِإِسْنَادِهِ ، مِثْلَهُ . بقي من الردود أين يكتب الكود...برسم علماء الإكسيل؟ والسلام عليكم.

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

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

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

بارك الله فيك وزادك من علمه

عمل جميل يا استاذ وائل أحمد ... بارك الله فيك التحدي الحقيقي هو عمل مثل هده الأزرار يدون وجوب استرادها من تطبيقات خارجية ... ممكن بواسطة ال API GDI الموجودة في الويندوز

اخى الحبيب / عبد العزيز البسكرى جزاك الله خيرا .. حقا اداه رائعه خالص تحياتى وتقديرى

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

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

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

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

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

اخى الصقر ايه الجمال والحلاوه دى بالفعل هذا مااريده بالظبط ................................. على فكره انا استخدمت sumifs وادت المطلوب .......................................... ولكنى كنت عايز اشوفك هتعملها ازاى لاننى حاولت استخدام sum وعرفتش قولت اشوفك هتستخدم sum ولا sumif لكننى بصراحه لم اكن اتوقع هذا الحل الجميل الاكثر من الرائع باستخدام countifs تقبل تحياتى

لفته جميله رحم الله استاذنا عماد الحسامي

بعد إذن أساتذتي أتمنى أن يكون هذا طلبك اخي الكريم عند عمل الفلتر لاى عمود اريد ان يكون عمود المسلسل ايضا مظبوط.rar

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

تمام

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

هذا هو اسم البرنامج اخى الكريم -kit_ent_8.1.2670