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

جرب هذا المرفق وطمنى اختيار عميل من يوزرفورم2.rar

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

أخي الكريم سامي إذا أردت الحفاظ على تنسيق العمود بحيث يظل تنسيقه كنص وفي نفس الوقت تريد التخلص من هذا الشكل .. اتبع الآتي حدد العمود C ثم اذهب للتبويب Data ثم اختر الأمر Text to Columns ثم اضغط Next مرتين ثم اختر الاختيار Text ثم أخيراً انقر على كلمة Finish تقبل الله منا ومنكم وكل عام وأنتم بخير

بسم الله والصلاة والسلام على رسول الله أخواني وأساتذتي كل عام وأنتم بخير أقدم لكم هذا الموضوع البسيط والذي ربما يكون عرض من أحد العمالقة في فترة غيابي لكننني بحثت ولم أجد عنه شيء قبل عرضه الموضوع هو أننا عن استخدام vlookup مع الفواتير والشهادات قد نحتاج بدلا من الطباعة إلى الاحتفاظ بنسخة بي دي إف وقد قمت بالتجربة إلى أن وصلت للكود التالي بفضل الله الحفظ يكون في نفس مكان الملف ويمكن أن يكون الحفظ في Documents لكنني فضلت أن يكون الحفظ في نفس مكان الملف مع العلم أنني وضعته في أبسط صوره ويمكن التعديل بحيث يحفظ جميع ما لديك ( جميع الفواتير أو الشهادات ) بضغطة واحدة أو حفظ مجموعة معينة من الشهادات - الفواتير مع الشكر لكم كود لحفظ الصفحات بي دي اف.rar

لغير متابعي موضوع ( VLOOKUP ) من البداية حتى الاحتراف حيث تعرضنا فية للدالة INDIRECT شرح الدالة INDIRECT INDIRECT.rar ........................................................... اتمنى ان يمثل الملف إضافة بسيطة

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

الأخ مصر 2015 ... ربنا يصلح مصر في 2015 يرجى تغيير اسم الظهور للغة العربية وباسم مناسب إذا أمكن (دا إذا مكانش يضايقك طبعاً) بالنسبة لطلبك سهل للغاية بفرض أن العمود الأول والثاني يحتوي قيم وتريد جمع القيم من العمودين في العمود الثالث C قم بتحديد العمود بالكامل .... من خلال النقر مرة واحدة على رأس العمود (انقر عليه هيطب سااااكت علطول ..) هتلاقي العمود كلها متحدد روح لشريط المعادلات وضع المعادلة فيه =SUM(A1:B1) واضغط Ctrl + Enter مش إنتر بس ... سيتم تنفيذ المعادلة على كامل العمود .. ملحوظة : يرجى عدم تطبيق المعادلة على كامل العمود .. لأن ذلك سيسبب ثقل في الملف حيث أن عدد الصفوف في ورقة العمل كبير جداً .. يكفي أن تكتب القيم مثلاً في العمودين ثم تسحب المعادلة مرة واحدة إلى نهاية النطاق الذي تعمل عليه أو تضغط دبل كليك على مقبض السحب .. تقبل تحياتي

شكرا على العيدية التى تليق بقيمة مبدع مثلك وكل عام وانتم بخير

تفضل الملف المرفق وحاول أن تطبق بنفسك لتستفيد حسابات محل.rar

سؤال ممتاز

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

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

فضلك الله بالجنه افضل رد لرجل لايذكى على الله

جزاك الله كل خير وبارك لك

تفضل اخى سامى / الخطأ ناتج عن كون تنسيق العمود TEXT تنسيق ارقام.rar

إبداعاتك مازلت تتوالى واحنا خلصنا فيك كل الكلام (الحلو) لم أجد أحلى من جزاك الله كل خير

الجزء السابع للمبدع اسلام رجب

رااائع كعادتك

أضف السطر التالي بعد سطر رسالة "تمت عملية الترحيل" Range("H11:K12").ClearContents وحاول أن تبتعد قدر الإمكان عن دمج الخلايا لأنه يسبب مشاكل مع الكود

أخي الكريم وجدي الحاج علي إليك الكود التالي عله يفي بالغرض Sub TransferDatabyDay() Dim lDay As String, LR As Long lDay = Day(Now) On Error GoTo YK With Sheets(lDay) LR = .Cells(65, "C").End(xlUp).Row + 1 .Range("C" & LR) = Range("H11").Value .Range("D" & LR) = Range("J11").Value End With MsgBox "تمت عملية الترحيل", vbInformation Exit Sub YK: MsgBox "لم تتم عملية الترحيل ، قد يكون السبب عدم وجود ورقة العمل", vbCritical End Sub في حالة عدم وجود ورقة العمل لليوم الحالي يتم إظهار رسالة تفيد بذلك لا تنسى تحديد أفضل إجابة وكذلك اضغط على "أعجبني هذا" (يعني قفل الموضوع لو تمت الإجابة عليه بشكل يرضيك) تقبل الله منا ومنكم حسابات محل.rar

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

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

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

اضافة رائعغة لبرنامج الورد تمكنك من كتابة كل الرموز الرياضية باللغة العربية word tools.zip

تفضل اخي عبد الجليل الملف جاهز و تحت الطلب 3333 salim.rar

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

الله يرحمك يا احمد شوق ... كنت مثال للعطاء وروح السعادة في هذا المنتدى

أخي العزيز ابا لميس تفقدتك فلم اجدك في المنتدى، ، فإرتأيت طرح الحل إختصاراً لوقتك وتحقيقيا لحاجتك كان الأصل عندي حل الامر عبر كود برمجي ولكنني رأيت سلوك الطريق الطويل الواضح حتي تصلك الفكرة بهدوء ثم تتولى انت كتابة الكود كما تشاء الاستعلام tblNameAct Query الاستعلام Query2 الاستعلام Query3 التقرير RepQ3 فإن كنت قد أحسنت الفهم عنك ، يكون مرادك قد تحقق .... وكفي والله من وراء القصد ... وهو حسبي NA_Horizontal_Split&Rep.rar