هاني بدر

السلام عليكم ورحمة الله وبركاته ممكن أكون طماع حبتين واطلب ابداع آخر وهو أولا : الليبل اللي من 4 مكونات بالاضافه للونه المختلف يكون Blinking ثانيا : عند الوقوف بالمؤشر على الليبل يتم نسخ رقم الغرفه الى الخليه KE1 تقبلوا كل تحياتي

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

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

السلام عليكم ورحمة الله وبركاته اخي الكريم ابوالبراء كلنا نعلم مدى حرصك على مساعدة الاخرين ومهما تكلمنا فلن نوفيك ولو جزء مما تستحقه تقبل شكري وتقديري اخي الكريم الأستاذ الصقر ما اروعك حين تصيب الهدف بابسط الطرق نعم هو المطلوب الاول اما عن المطلوب الثاتي فببساطه كل ليبل به عدد من الاحرف او الارقام وكمثال لدينا ليبل عنوانه 101" 1 وآخر عنوانه 102" وهنا نلاحظ ان العنوان الثاني عدد مكوناته 4 وعليه يكون المطلوبان يكون كل ليبل عدد مكوناته 4 احرف او ارقام يتم تلوينه بلون مختلف ويظل كل ماهو اكثر من 4 مكونات بلونه الأصلي ولي طلب آخر واعتذر على الاطاله كيف يمكن التعامل مع كل ليبل سواء بالضغط عليه Click او بالمرور عليه Mouse move وليكن في كلا الامرين المستخدمين في المثال السابق يظهر عنوان جانبي بأول ثلاث مكونات لليبل فيكون في مثالنا من العنوان الأول هو .... رقم الغرفه 101 وفي عنواننا الثاني هو ..... رقم الغرفه 102 وأخيرا ارجو عمل Scroll للفريم حيث انه لو زادت عدد الصفوف فلن تظهر بعد الصفوف تقبل تحياتي وشكري الذي مهما افضت فيهم فلن اوفيك القليل من حقك

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

السلام عليكم ورحمة الله وبركاته اخي الكريم جرب المرفق للعلامة الاستاذ الحسامي تحياتي قوائم جديد_3.rar

السلام عليكم ورحمة الله وبركاته اخي الكريم تقبل تحياتي

السلام عليكم ورحمة الله وبركاته هذا الكود لتوليد ارقام عشوائية يمكن استغلاله في وضع الاسئلة كل حسب الرقم العشوائي الذي تم توليده Dim i As Long For i = 1 To 25 Range("A" & i) = Int(100 * Rnd) + 1 Next i تحياتي

السلام عليكم ورحمة الله وبركاته اخي الكريم جرب المرفق لعله يفي بالغرض ويمكن استبدال شرط الخلية I11 ووضع الخلية G36 Sub Transfer() If Sheets("1").[i11] = 0 Then MsgBox "عفواً لا توجد بيانات للترحيل", vbInformation, "بيانات غير مكتملة " Else TEST_TRANSFER End If End Sub تحياتي مستحقات العاملين والاستعاضة.rar

السلام عليكم ورحمة الله وبركاته اخي الكريم ارجو مشاهدة الرابط التالي في المشاركة رقم 5 لعله يفيد او ارفق ملف حتى يمكن المساعدة http://www.officena.net/ib/index.php?showtopic=60387&hl=

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

السلام عليكم ورحمة الله وبركاته هناك طرق كثيرة واسهلها هو ان تقوم بتعطيل عمل الكوماند المسئول عن الترحيل COMMANDBUTTOM 1. ENABLED =FALSE ,وذلك في نهاية كود الترحيل او في الموقع الذي يلائم اختيارات الترحيل ثم اعادة تشغيله عند البدء بتسجيل بيانات جديدة تحياتي

السلام عليكم ورحمة الله وبركاته في الملف المرفق اساس عمل الملف هو عمل تقرير بالارقام الغير مستخدمة MISSING SERIALS والمطلوب هو عند تجزئة الارقام او اعادة توزيعها بشرط وجود فرق بين الرقم وما يليه بما يتجاوز الفارق 50 ان لايقوم الكود بنقل آخر رقم في المجموعة الاولى ( على افتراض اننا سنقوم بتقسيم ارقام العمود الى مجموعتين ) تحياتي LEN_VALUES_IN_COLUMN.rar

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

السلام عليكم ورحمة الله وبركاته بارك الله فيك اخي الكريم استاذ ياسر ودائماً الى الامام بكل ماهو جديد ومميز واسمح لي ان اوضح لاخونا السائل الاستاذ محيي الدين عن اول ما جال بخاطري عن هذا الكود احيانا قد نحتاج الى عرض تقرير معين لحساب معين باكثر من متغير كالتاريخ او اسم من قام بتسجيل البيان او ... او ... الخ وهو امر سهل وبسيط ومتعارف عليه ولكن ماذا لو كان المطلوب هو تقرير معين لاكثر من حساب وبمتغيرات محددة ؟؟؟ وهنا تبرز فائدة الكود وللتوضيح اكثر لنفترض ان لدينا قاعدة حفظ بيانات ( عبارة عن قيود يومية ) ولنفترض انني اريد عمل تقرير لمجموعة حسابات منتقاة كل حسب كوده في دليل الحسابات وذلك خلال فترة معينة لنوعية القيود التي تحمل النوع PAYABLES وتم اختيار ارقام الحسابات عن طريق ليست بوكس MULTI SELECTION وتم وضع هذه الارقام في صفحة محددة بشكل عمودي ولتكن صفحة بمسمى مؤقت وبتنفيذ الكود بالشكل التالي نحصل على المطلوب اولا : عمل تقرير لآخر رقم حساب في صفحة مؤقت وادراجه في صفحة التقارير ثانياً : حذف آخر سطر من صفحة مؤقت ثم تكرار الكود بنفس الخطوات مع مراعاة لصق النتائج الجديدة في آخر سطر بصفحة التقارير حتى يتم حذف كل ماهو موجود في صفحة مؤقت وبذلك نكون قد حصلنا على تقرير لاكثر من حساب مختار وباكثر من متغير ارجو ان تكون الفكرة واضحة تحياتي للجميع

السلام عليكم ورحمة الله وبركاته هل من كود يوضع في بداية عمل الملف يقوم بتنفيذ امر موحد على كل يوزر فورم في الملف كان يكون على سبيل المثال With AllUserfomrs .Zoom = 90 .widith =500 .اى حاجة = " اى حاجة " end with تحياتي Book1.rar

السلام عليكم ورحمة الله وبركاته اخي الكريم الاستاذ احمد اعتذر على التاخر في الرد واشكرك ايضاً على الايضاح ولكن حتى لو ان هناك ملفات يتم تحديثها او تغذيتها عن طريق الانترنت فمن الممكن تسهيل الامر بعمل ماكرو في الملف الرئيسي يقوم باستيراد كافة البيانات من الملف ( الانترنت ) في بداية عمل الملف الرئيسي وجعل كافة البيانات موجودة في ملف واحد وهو الرئيسي ومن ثم بداية التشغيل بتسجيل التغيرات واستخراج التقارير المطلوبة هذا في اعتقادي سيغنيك عن عمل معادلات عن طريق Links تقبل تحياتي

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

السلام عليكم ورحمة الله وبركاته بارك الله فيكم ميعاً اما انت بقى عزيزي أستاذ ياسر فانا عندي كلمة واحدة هرد بها على كل اهاناتك ليا One For The Game بس يابتاع الطماطم !!! فاكرها ولا ناسيها فعلاً هذا الموقع به درر لمن أراد ان ينهل منها وطبيعي ان كل باحث عن معلومة هيقابل مواقع زى دي والحمد لله اني كتبت في الأول منقول والا كانت هتبقى الفضيحة بجلاجل تحياتي لك صديقي العزيز أستاذ ياسر وفي انتظار تحفة جديدة من معرض التحف المسجل رسمياً باسمك و التي ننهل منها جميعاً

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

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

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

السلام عليكم ورحمة الله وبركاته تم إضافة عمود لعمل مسلسل رقمي والذي يفضل ان يحل محله تاريخ الحركة وكذلك عمود للقيمة الاجمالية في نهاية السطر والمعادلة المستخدمة هي ٍSumifs وأيضا المعادلة lookup حيث ان ملفك معناه اننا مانفعله هو التعديل على البيانات وليس تسجيل البيانات تحياتي المخزون.rar

السلام عليكم ورحمة الله وبركاته عزيزي أستاذ الصقر انت هتتعبني معاك بس انا راضي والله علشان خاطر انت لك معزة خاصة عندي شوف يا عزيزي في الملف اللي انت ارسلته لم اجد معلومة تفيد بان حركة البيع ليس لها تاثير على متوسط تكلفة الوحدة وفي المثال لنفترض اننا لم نقم بحركة بيع في تاريخ 18/01/1434 هـ احسب المتوسط المتحرك في تاريخ 20/01/1434 هـ ستجده كالتالي المتوسط المتحرك =(18800 +8400 ) / (1800 +700 ) = 27200 / 2500 = 10.88 اما في حالة البيع كما في المثال فستجد متوسط تكلفة الوحدة في نفس التاريخ = 11.125 وبص من الاخر حركة البيع لها تاثير على متوسط تكلفة الوحدة مرفق صورة من المثال الذي ارسلته لي تحياتي

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