الحسامي

السلام عليكم يبدو اخي ان اعمالك لها نصيب من اسمك بارك الله فيك

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

بارك الله فيك

أخي الكريم أرجو التأكد من توقيعك ؟؟؟؟؟؟؟؟؟؟؟؟؟

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

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

السلام عليكم اخي konafa4000 ما شاء الله عليك ونفعنا الله بعلمك معلومات اكثر من رائعة ولاثراء الموضوع اخي سعد استعمل الكود التالي ويعمل على عمل نسخة بنفس الاسم مع زيادة اسم الشهر والسنة مع الاسم القديم ويمكنك تسمية اسم الملف من داخل الكود اذا اردت انسخ الكود واربطه بزر لعمل النسخة Option Explicit Sub SaveWithBackup() Application.DisplayAlerts = False With ThisWorkbook .SaveCopyAs ThisWorkbook.Path & "\" & _ NameWithOutExt(.Name) & " " & _ Format(Now, "mmmm") & Format(Now, "yyyy") & ".xls" .Save End With Application.DisplayAlerts = True End Sub Function NameWithOutExt(pStr_FileName As String) Dim lStr_FileName As String Dim lint_Pos As Integer lStr_FileName = pStr_FileName lint_Pos = InStr(1, lStr_FileName, ".") If lint_Pos > 0 Then lStr_FileName = Left _ (lStr_FileName, InStr(1, lStr_FileName, ".") - 1) NameWithOutExt = lStr_FileName End Function

السلام عليكم بارك الله فيك اخي المتميز بالعطاء والابداع اخي وحبيبي احمد زمان واخي وحبيبي الخالدي لا يوجد من الكلام ما يعطيك حقك وتستحق الكثير من الشكر على ابداعاتك ---------------------- ولاثراء الموضوع بالاكواد يمكنك اخي استخدام الكود التالي عند تلوين خلية واحدة فقط Cells.Interior.ColorIndex = 6 Target.Interior.ColorIndex = 3 وعند تلوين سطر كامل استخدم الكود التالي Cells.Interior.ColorIndex = 6 Rows(Target.Row).Interior.ColorIndex = 3 وعند تلوين عمود كامل استخدم الكود التالي Cells.Interior.ColorIndex = 6 Columns(Target.Column).Interior.ColorIndex = 3 وعند تلوين السطر والعمود معا ادمج الكودين السابقين معا هكذا Cells.Interior.ColorIndex = 6 Columns(Target.Column).Interior.ColorIndex = 3 Rows(Target.Row).Interior.ColorIndex = 3 وهذه الاكواد توضع في الحدث Worksheet_SelectionChange وهنا مرفق يوضح ذلك Classeur1.rar

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

السلام عليكم الاخوة الاعزاء konafa4000 ... حفظك الله احمد حمور العقباوي ... حفظك الله اي انتخابات اخي احمد الحمد لله بحياتي ما انتخبت نادر ... حفظك الله عادل حنفي ... حفظك الله اسامة ... حفظك الله وحتى تتمكن من معرفة الاكسل وخفاياه عليك بالصبر والاجتهاد khhanna ... حفظك الله يمكنك الربط وكانك تستعمل الفورم العادي سعد عابد ... حفظك الله شكرا على كلماتك الرائعة وللعلم لك دور كبير في هذه الفكرة خالد ... حفظك الله مزلزل ... حفظك الله يمكنك الربط وكانك تستعمل الفورم العادي ابو علاء ... حفظك الله cat101 ... حفظك الله kemas ... حفظك الله خبور خير ... حفظك الله وما تعلمنا الا على ايادي اساتذة عظام انت واحد منهم جزاك الله خيرا onejan1977 ... حفظك الله خالد القدس ... حفظك الله بارك الله فيك على كلماتك بارك الله فيكم وجزاناكم الله خيرا ---------------------------- الموضوع عبارة عن فورم عادي ويمكن من الداخل ربط اي كبسة بأي امر وكانك تتعامل مع اي فورم اخر الموضوع بسيط جدا

السلام عليكم اخي العزيز لا ادرى عن ماذا تتحدث فالبرنامج القديم يلون تبعا لتاريخ الدخول ويزيل اللون تبعاً لتاريخ الخروج هذا البرنامج كذلك ادخل تاريخ الادخال ثم اضغط على زر " اضغط للادخال "فيقوم بالتلوين البرنامج القديم يزيل اللون تبعاً لتاريخ الخروج وهذا البرنامج كذلك ادخل تاريخ الاخراج ثم اضغط على زر " اضغط للاخراج "فيقوم بازالة اللون البرنامج القديم يعطينا بيانات الشحنة الموجودة في أي موقع بمجرد الضغط على الخلية الملونة وكذلك هذا البرنامج هناك قائمة في الصفحة W7 W9 في الاعمدة من AA الى af تحتوي على رقم الصفحة واحداثيات الموقع لكل موقع وبناءا عليها يتم التلوين وتم استخدام دالة vlookup لذلك كيف تريدني العمل على صفحة غير الصفحة الرئيسية وهي الصفحة التي تحتوي على البيانات اخي العزيز وبدون زعل انت منذ طرح الموضوع لم تكن منطقيا في طرحه في البداية جعلت الموضوع مبهم واعطيناك حل لذلك ثم بعثت لنا ملف واعطيناك حل لذلك بالرغم من انك اردت شئ اخر غير الذي طلبته واعطيناك الحل لذلك اخي الكريم لا اعتقد انه بوسعي غير الذي قدمته لك فهذا اقصى ما يمكن تقديمه

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

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

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

السلام عليكم اخي ابو محمد عذرا على هذه الاحداث التي حصلت وهنا المرفق بكل التعديلات واعتقد ان الملف تمام 100 % واية تعديلات اخرى انا موجود ترحيل تاريخ محدد جديد.rar

السلام عليكم بارك الله اخي خبور مرفق ملف Book12.rar

السلام عليكم اخي الكريم فكرة البرنامج اكثر من رائعة وخيالية بعض الشئ وهذا ما شدنا اليه ولدي عدة افكار للتعديلات التي تريدها ولها العديد من الحلول البرنامج يحتاج الى عمل دقيق بعض الشئ مما يجعل صياغة الاكواد فيه حساسة بعض الشئ لذا ان امكن : - عدد المخازن هل هي فقط 6 كما هو موضح - حدود المستودع الافقية والعمودية هل هي من A الى d فقط عموديا ومن 1 ال 12 افقيا -------------------- اما صفحة (كتابتا) فهي موجودة في ملفك من قبل وكنت اريد سؤالك هنها وكانت هذه الصفحة مخفية

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

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

السلام عليكم اخي ابو محمد تم التعديل على الملف حسب المطلوب عسى ان يكون المطلوب ترحيل تاريخ محدد.rar

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

السلام عليكم اخي العزيز حسب ما فهمت من السؤال اليك ملف لمثال عسى ان يكون مناسب اختيار الصفحات.rar

السلام عليكم بارك الله فيك استاذنا خبور على علمك وعلى سعة صدرك كان هناك خطأمطبعي لا اكثر وتم تعديل الملف في المشاركة السابقة

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

بفضل الله ومن ثم بفضل افكارك وابداعك اخي ابو عبدالله