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

تفضل اخى الكريم مرفق لتسجيل الدخول والخروج وامكانية تسجيل مستخدم جديد فى البرنامج log(off-on).rar

الأخ الحبيب حسام صقر المنتدى وأحد الكبار الذين نتعلم منهم اسمح لي بمشاركة بسيطة بناءً على الكود الذي تفضلت به Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Row > 1 Then If Target.Column >= 1 And Target.Column <= 4 Then ActiveCell = Cells(1, Target.Column) End If End If End Sub تقبل تحيات أخوك أبو البراء

السلام عليكم ورحمة الله وبركاته فورم إضافة وبحث وتعديل مرن (الاصدار الثالث) بمعية فورم لادخال التاريخ الجديد في هذا الاصدار 1 - امكانية اضافة التاريخ في تاكست الادخال بوضع مؤشر الفارة على التاكست والضغط عل الزر Calendar 2 - اضافة زر اختيار للبحث للتبديل بين البحث العام والبحث من بداية الكلمة 3 - اضافة زر للذهاب الى السجل النشط شرح امكانيات الفورم وكيفية الاستخدام 1 - استخدام الفورم لاكثر من قاعدة بيانات في المصنف على ان يكون لكل قاعدة كود لاظهار الفورم يتغير فيه معطياتك في متغيرات kh_SetAddrss اولاً : اسم ورقة البيانات ( افتراضي ) ثانياً : نطاق صف رؤوس اعمدة البيانات ( افتراضي ) ثالثاً : عمود التسلسل ( اختياري ) اذا اردت ادخال رقم تسلسل البيانات الخاص بالفورم تلقائيا في عمود معين سجل عنوان راس العمود . مع ملاحظة انه لا يكون من ضمن نطاق رؤوس اعمدة البيانات كما هو معمول في المثال 2. 2 - تستطيع اضافة قائمة لعمود معين في الفورم باضافة تعليق على عنوان العمود وتكتب اسم نطاق القائمة . 3 - ينسخ التنسيقات والمعادلات في السجل الجديد . 4 - يبحث في جميع الاعمدة حسب الاختيار من القائمة في الفورم . 5 - يعطي نتائج صحيحة عند البحث عن تاريخ اذا شيكت الزر البحث عن تاريخ . 6 - امكانيات زر البحث عن تاريخ يتم تحويل اي قيمة تضعها في مربع النص للبحث الى تاريخ بالتنسيق الافتراضي للفورم ,, مع امكانية ادخال رقم صحيح بين 1 الى 31 ليفهم على انه تاريخ اليوم للشهر الحالي والسنة الحالية 7 - ثوابت بامكانك تغييرها حسب طلبك بداية اكواد الفورم 1- تغيير تنسيقات إظهار التاريخ في الفورم في الثابت DtF 2- تغيير عٌرض مربعات الادخال في الثابت iWgt1 8 - بامكانك انتقاء الاعمدة التي تريدها عند تسمية النطاق وترتيبها حسب ما تريد مع ملاحظة ان العمود الذي يعتمد عليه في احتساب آخر صف هو العمود الاول من التسمية مثلا "E15,C15,H15:AX15" الشرح بداخل الملف للاستخدام يجب نقل الفورمين الى ملفك المرفق 2003 فورم ادخال و تعديل مرن بمعية فورم ادخال التاريخ.rar ============================================ تم اضافة زر للطباعة في الرابط ادناه http://www.officena.net/ib/index.php?showtopic=52300 ============================================

الحمد لله الذي جعل العلم ضياء والقرآن نوراً الحمد لله الملك الحق المبين ، الذي هدانا إلى الإيمان واليقين نحمــده تعالى وهـــو الرب الجليل ، الهادي إلى ســـواء الســـبيل ، الذي لا يخفى عليه الكــثير ولا القليــل . والصلاة والسلام على المبعوث في الأميين معلماً ورسولاً ومرشداً وحكيماً وأشهد أن لا إله إلا الله وحده لا شريك له أمر بإتباع الحق ونهى عن إتباع الباطل ، ورفع من شأن العالم دون الجاهل ، وأشهد أن سيدنا محمداً عبده ورسوله جــــاء بالحــــق المبــــين ، فكان رحمــــة للعالمين ، صلى الله عليه وعلى آله وأصــحابه وســـلم تســـليماً كــــثيراً . اللهم اجعل العام الهجري الجديد فاتحة خير علي المسلمين وبلاد المسلمين ا أحبائي واخواني في منتديات اوفيسنا الاحبة كشجرة الياسمين لا تكتفـــي أن تظـــلك بـــــــل لا تترككــ الا معطــــرا بعبيرهـــا فاســعد الله من كانوا دومــــا زهــــور الياسمــين في حـــياتنا . موضوعنا اليوم حول برنامج يخدم شريحة من الطلبات لادارة النشاط التجاري والخدمي وراعينا ان يكون البرنامج سلس ومرن ليتناسب مع اغلبية الاحتياجات . وايضا لاستكمال مواضعينا السابقة عن دمج الاكسل ببرامج التصميم المختلفة والتحكم في خصائص الادوات لليوزرفورم . برنامج نور التجاري والخدمي اول انتاج مشترك بيني وبين اخي الحبيب العبقري / شوقي ربيع في سلسلة البرامج الخدمية ان شاء الله تعالي . البرنامج يقوم بإدارة النشاط بصــفة عامة ، وادارة عمليات البيع بإصدار الفواتير ، وطباعتها ، واصدار ســـندات القبض وطباعتها ، وادارة العمليات المتعلقة بفواتير الشراء ومرودتها واثبات عمليات الشراء والاصناف واصدار سندات الصرف وطباعتها . الجديد في البرنامج كثيرا تم طرح نماذج فواتير بيع باضافة عدد محدد من التكسات بما يتناسب مع صفوف الفاتورة الواحدة لكن في البرنامج تناولنا الموضوع بطريقة اخري باضافة عدد تكسات رئيسية تقوم بترحيل الي ليست بوكس ومنها الي الشيت وبذلك يمكن اصدار الفاتورة بعدد لا محدود من الاصناف وطباعتها . شاشة الدخول اسم المستخدم وكلمة المرور الافتراضية admin الشاشة الرئيسية للبرنامج شرح واعداد البرنامج بالكامل اضغط هنا بالمرفقات اللهم اجعلنا ممن طاب ذكرهم ، وحسنت سيرتهم ، واستمر أجرهم في حياتهم وبعد موتهم اللهم امين Nour Commercial V 1.0.0.rar

السلام عليكم قوائم مخصصة على الفورم باستخدام كومندبار مع اضافة قوائم فرعية (اختياري) القوائم الرئيسية هي النطاقات المسمى باسم الليبلات النطاق الاول: Lbl_ST_1 النطاق الثاني: Lbl_ST_2 النطاق الثالث: Lbl_ST_3 النطاق الرابع: Lbl_ST_4 اذا اردت زيادة قائمة اخرى اضف جدول آخر وسميه Lbl_ST_5 واضف ليبل آخر بنفس التسمية واعمل له كودين مشابهين لاكواد الليبلات الاخرى مع تغيير الرقم الى 5 مثال : الكود الاول Private Sub Lbl_ST_5_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) kh_AddBar sNeme & 5 End Sub الكود الثاني Private Sub Lbl_ST_5_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) kh_Set1 sNeme & 5 End Sub وهكذا اذا اردت اضافة ليبل آخر القوائم الفرعية تحتاج فقط لاضافتها اضافة نطاق وسميه باي اسم وضع هذا الاسم في القائمة الذي تريد اظهار القائمة الفرعية فيها مع وضع العلامة <<< لكي يفهم الكود انها قائمة . ويمكنك اضافة قائمة فرعية بداخل قائمة فرعية اخرى. يمكنك ايضا التحكم في النطاقات بادخال ما تريده من اكواد او الحذف او الاضافة . ================================================ لاختيار ارقام صور الكومندبار حمل الملف التالي http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=58279 ================================================ المرفق 2003-2010 قوائم مخصصة على الفورم باستخدام كومندبار+2.rar

السلام عليكم امثلة على طباعة السجل من (فورم ادخال وتعديل وبحث) الاصدار الثالث http://www.officena.net/ib/index.php?showtopic=51955 هذه ثلاثه امثله مختلفة في المرفق 1 - طباعة في مصنف جديد او من خلال الفورم اذا كانت الشاشة تظهر جميع بيانات السجل 2 - طباعة الى ورقة معينة في الملف حسب تنسيق معين لجميع بيانات السجل 3 - طباعة الى ورقة معينة في الملف حسب تنسيق معين لبعض بيانات السجل المرفقات 2003 فورم ادخال و تعديل مرن مع الطباعة 1.rar

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

بعد اذنالاخوة هذا حل ثالث زيادة في اثراء الموضوع vllokup salim.rar

السلام عليكم جزا الله خيرا استاذ خالد الرشيدى على حله وزياده فى الحلول هذا حل اخر تقبلوا تحياتى vllokup.rar

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

يمكنك تحميل الملف من الرابط التالي: http://www.kutub.info/library/book/17306

السلام عليكم / جرب المرفق ان كان ما بالمرفق هو المطلوب قم بتحديدة كافضل اجابة vllokup.rar

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

ا/ ياسر اولا حمد لله على السلامة ثانيا : سبقتنى و فعلتها و كنت سوف اطلبها ثالثا : جزاك الله خيرا

السلام عليك اليك هدا الحل ربما يكون هو التاريخSZ.rar

وعليكم السلام ورحمة الله وبركاته أخى على حد علمى أن هذه المشكلة ظهرت معى عند اختلاف نسخة اﻷفس التى تم أخذ الملف التنفيذى منها -النسخة العربية-عن النسخة التى يعمل عليها-النسخة الانكليزية- والحل الذى وجدته حتى اﻵن هو أخذ النسخة ade من على نفس الجهاز الذى تحدث فيه المشكلة.

السلام عليكم ورحمة الله وبركاتة اخي الكريم شاهد المرفق ان شاء الله يكون هو المطلوب . forma.rar

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

ربما يكون المطلوب اضغط افضل اجابة اذا كان كذلك Book1 faux.rar

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

طبعا من المعلوم انه لكل استعلام في عرض التصميم له جملة استعلام تسمى ال sql ! ولعرضها وانت في عرض التصميم تذهب الى عرض sql من ايقونة خيارات العرض ! هي نفس الجملة تقريبا وبوضع جمل ال sql في متغير نصي ومحاطة الجمة ب دبل كوتس " . وخليها في سطر واحد اسهل لك وطبعا اذا لم تكن الجملة طويلة . واليك هذه الروابط http://www.officena.net/ib/index.php?showtopic=40873&page=1 http://www.officena.net/ib/index.php?showtopic=49060 http://www.officena.net/ib/index.php?showtopic=58494 بالتوفيق

تفضل استخدمنا استعلام مساعد Govx.rar

وعليكم السلام اذا اللي فهمته صح ، جدولك فيه حقل التاريخ والقيمة: وانت تريد النتيجة هكذا: والتي عملناها هكذا: جعفر 87.Database1.accdb.zip

بسم الله الرحمن الرحيم الاستعلام الإجرائي هو استعلام يُجري تغييرات على العديد من السجلات أو ينقلها في عملية واحدة فقط . توجد أربعة أنواع من الاستعلامات الإجرائية: حذف وتحديث وإلحاقي وتكوين جداول. نقوم بتحويل الاستعلام الاجرائي الى جملة vba كنوع من الحماية ولتقليل واختصار الكائنات داخل القاعدة وإليكم الطريقة حيث سنطبق الدرس على استعلام حذف : 1- بفرضية ان لدينا جدول باسم tbl1 يحتوي على العديد من الحقول وكثير من البيانات ثم قمنا بانشاء استعلام حذف واخترنا الكل أي اننا نفتح استعلام حذف جديد ثم نختار الجدول ثم نختار الحقل الاول من الجدول والذي هو عبارة عن نجمة الآن لو تم تشغيل الاستعلام لقام بحذف كافة البيانات داخل الجدول . 2- في عرض تصميم الاستعلام ننقر بالزر الايمن تم نختار عرضSQL ثم ننسخ الجملة البرمجية التي تظهر لنا وستظهر على الهذا النحو : DELETE Tbl1.* FROM Tbl1; ولكنها هكذا مادة خام تحتاج الى اضافات حتى نتمكن من تشغيلها داخل الكود وتتمثل الاضافات بالتالي : - جعل الجملة على سطر واحد ، او اضافة ( _ ) في نهاية كل سطر لتقسيم الجملة الى اسطر (في المرفقات برنامج يقوم بذلك ) - جعل الجملة بين علامتي تنصيص مزدوجتين - اضافة امر تشغيل جملة سكول docmd.RunSQL في بداية الجملة وهناك اضافات خارج الجملة وهي لمنع رسائل التحذير عند بدء تشغيل الكود واعادتها في نهاية التشغيل وتتمثل في السطرين التاليين DoCmd.SetWarnings False قبل بداية الجملة DoCmd.SetWarnings True بعد انتهاء الجملة لتظهر الجملة في النهاية داخل الكود هكذا : DoCmd.SetWarnings False Docmd.RunSQL"DELETE Tbl1.* FROM Tbl1" DoCmd.SetWarnings True هذا كل شيء ،، في المرفقات برنامج من مكتبتي يقوم بتحويل الاستعلام الى جمل sql وتنسيقها .. ادعوا لصاحبه جزاه الله خيرا تحويل SQL إلى VBA.rar

طريقة اخرى 332.rar

أستاذنا ومعلمنا

اخى الكريم ان شاء الله سيكون بهذا الشكل strSql = "SELECT Salaries.a, Salaries.b, [A]+[B] AS C " & vbCrLf & _ "FROM Salaries;" حيث اسم الجدول Salaries و a & b المراد جمعهم و c حقل الناتج ومرفق برنامج يمكنك من تحويل جمل SQL لاستخدامها بالمحرر SqltoVBA.rar