Ali Mohamed Ali

أحسنت استاذ سليم عمل ممتاز بارك الله فيك وجعله الله فى ميزان حسناتك الأمر بسيط yasse.w.2010 عليك بتغيير هذا الصف من كود الحذف ws.Cells(FR.Row, 1).Resize(, 7).Delete واستبداله بهذا ws.Cells(FR.Row, 1).Resize(, 7).ClearContents

وعليكم السلام - لك ما طلبت حضور ادارة المشتريات1.xlsx

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

تفضل كيفية إضافة توقيع في Outlook 8 نموذج لتوقيع بريد الكتروني مهني

وعليكم السلام يمكنك ذلك من خلال التنسيقات الشرطية بهذه المعادلة =and($C2<=TODAY()-3,$c2<>"") متابعة1.xlsx

بعد اذن الأستاذ حسين ولإثراء الموضوع يمكنك هذا بهذه المعادلة =IFERROR(IF(B2="عام",VLOOKUP($E2&"/"&$D2,الحالة!$N$2:$Q$80,2,0),VLOOKUP($E2&"/"&$D2,الحالة!$H$2:$K$80,2,0)),"") المنتوج+المحور+الاستحقاق1.xlsx

جزاك الله كل خير استاذنا الكريم

بارك الله فيك استاذ مجدى

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

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

أحسنت استاذ مجدى بارك الله فيك ورحم الله والديك

عليك استخدام هذه المعادلة طبقاً لطلبك =IF(A3="","",IF($A3="Can limon",0%,IF($A3="Rosie",100%,70%))) New Microsoft Excel Worksheet1.xlsx

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

تفضل كما تريد .... بالتنسيق الشرطى حمادة.xls

بعد اذن الأستاذ خيماوى ولإثراء الموضوع يمكن ذلك بهذه المعادلة المعرفة MYVLOOKUP فعليك بفتح مديول جديد ووضع هذا الكود به وبالطبع فمعادلة الأستاذ خيماوى تعمل بكفاءة ولكن يظهر هذا الخطأ معك لأنك لم تستخدمة نسخة 365 من الأوفيس فهذه المعادلة موجودة بهذه النسخة فقط Function MYVLOOKUP(lookupval, lookuprange As Range, indexcol As Long) Dim r As Range Dim result As String result = "" For Each r In lookuprange If r = lookupval Then result = result & " " & r.Offset(0, indexcol - 1) End If Next r MYVLOOKUP = result End Function وعليك بوضع هذه المعادلة بداية من الخلية J7 سحباً للأسفل =MYVLOOKUP($I7,$D$6:$E$190,2) ورقة عمل Microsoft Excel جديد __.xlsm

أحسنت استاذ عبد اللطيف عمل رائع بارك الله فيك ورحم الله والديك

أحسنت استاذ السيد جعله الله فى ميزان حسناتك

تفضل بعد اذن الأستاذ ابراهيم طبعاً ... فكان عليك تعيين زر لحسن عمل الكود , تفضل نسخة من المصنف1 1.xlsm

وعليكم السلام-يمكنك استخدام هذه المعادلة =IFERROR(NETWORKDAYS.INTL(L2,A2,6),"لم يصرف") تقرير فواتير مبيعات رواج من 1-1-2021 الى 18-1-2021.xls

أحسنت استاذ ماجد بارك الله فيك وزادك الله من فضله

بارك الله فيك استاذ ماجد وجزاك الله خير الثواب

بارك الله فيكم جميعا وفى جهودكم

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

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

أحسنت استاذ مجدى عمل ممتاز جعله الله فى ميزان حسناتك