طارق محمود

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

أخي الحبيب / ناصر أتفهم المشكلة حجم البيانات الكبير وممكن عمل اكواد وماكرو بدلا من المعادلات وإن كانت أيضا ستثقل من عمل الملف وليس حجمه ولكن جرب النصيحة التالية كل وقت معين وليكن أسبوع مثلا تعمل نسخ لصق خاص - قيم فقط Copy - Past Value للبيانات في التي العمودين I ، J مع ترك فقط آخر عدد من الأسطر وليكن 100 مثلا بالنسبة لرفض الزيادة في عمود الكميات المنصرفة بطريقة التحقق من الصحة فقد تم إضافتها مع التنسيق الشرطي. تفضل المرفق مراقبة صرف اصناف2.rar

السلام عليكم تفضل أخي المرفق به ماطلبت عداد التذاكر.rar

السلام عليكم اخي الكريم تم عمل عدة أعمدة يمكنك إخفاؤها عدد 12 عمود لاحتساب ايم الخميس والجمعة + عمود لمجموعها +عمود لعد يوم آخر في حالة أن وقت انتهاء الموضوع أقل من وقت إدخاله (مما يعني أنه تعدي 8 ساعات) الفرق الان في عمودين كما وضعتهم أنت ، عمود للأيام وآخر للساعات تفضل المرفق Events 12.01.2011.rar

السلام عليكم أخي الكريم مراد تفضل المرفق ان شاء الله يكون كما تريد كرونولوجيا الأحداث والمتغيرات لموظفي الشركة3.rar

السلام عليكم أخي الكريم عندي مشكلة في التحميل للمنتدي تفضل الرابط التالي http://www.4shared.com/file/A8WsWuTe/___online.html ستجد الملف المطلوب

السلام عليكم أخي الكريم أضف شرط للمعادلة للتحقق من أن القيمة رقمية أم لا بمعني أن تستبدل المعادلة في الخلية G11 بالتالي =IF(ISNUMBER(F11),IF(F11>=90,"ممتاز",IF(F11>=80,"جيد جدا",IF(F11>=70,"جيد",IF(F11>=60,"مقبول",IF(F11<60,"راسب",IF(F11="صفر","راسب")))))),"راسب") ثم تنسخها للأسفل

إن شاء الله قريبا (يوم يومين علي الأكثر) بس عندي بعض التحديدات في الدخول عالنت

السلام عليكم الكود التالي في حدث فتح الملف يتكرر كل دقيقة يمكنك تغيير التعبير + 1 / 60 / 24 في كلا من السطر الثاني والخامس إلي + 5 / 60 / 24 Private Sub Workbook_Open() x = Time + 1 / 60 / 24 For i = 1 To 1000 Application.OnTime TimeValue(x), "Khaled01" x = x + 1 / 60 / 24 Next i End Sub حيث أن كود Khaled01 يلون مربع باللون الأحمر هذا هو كود Khaled01 Sub Khaled01() ' Range("J3:O3,O4:O12,J4:J12,K12:O12").Interior.Color = 255 End Sub جرب المرفق ثم امسح اللون الأحمر وانتظر دقيقة وهكذا Do_It_@5min.rar

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

السلام عليكم أخي الكريم مراد أولا عذرا لانقطاعي عنك لظروف خاصة تقول لايوجد خطأ ، يبدو أنك محوت يدويا بعض الأحداث ولم تمحها كما أشرت لك في المشاركة السابقة ولاداعي للإنزعاج فأنا أري أن الحدث الخامس الخاص بالعامل كريم كرماوي تم نقله بالفعل لكن عليك فقط إذا محوت يدويا فعليك تسجيل ما محوته في الخلية الزرقاء N1 يدويا بمعني أنه بعد استخدام الملف عدة أيام ستجد الخلية الزرقاء N1 مثلا تحتوي علي رقم 5 فإن قمت بحذف يدوي لبيانات عدد 3 أحداث فعليك إضافة رقم 3 للذي موجود بالخلية N1 فيكون 8 وهكذا

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

هذا هو الرابط http://www.4shared.c...wdD/Result.html

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

السلام عليكم أخي الكريم مرفق ملف أخي الفاضل الحسامي مرة أخري مع تعديل طفيف عليه ليناسب طلبك ترحيل الخصم لما سبق3.rar

أخي العزيز سألغي الموضوع السابق لأنه تكرار لهذا

السلام عليكم أخي الكريم وضعت خلية منفصلة لتاريخ التقرير وهي A7 ثم وضعت تنسيقا شرطيا إضافيا في خلايا الكفيل C2:C4 ليجعل لونها أحمر إذا توفر شرطين في نفس الوقت وهما (1) أن الشخص باقي عليه مبالغ اكثر من صفر (2) وأن أكبر تاريخ في الأقساط أقل من تاريخ التقرير تفضل المرفق test2.rar

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

السلام عليكم تفضل أخي المرفق بالكود Sub shft() For i = 1 To [D1000].End(xlUp).Row a = Cells(i, 4) x = WorksheetFunction.Max(Cells(i, 5), Cells(i, 6)) If a <> "" And x > 0 Then Sheets("ورقة2").[D1000].End(xlUp).Offset(1, 0) = a Sheets("ورقة2").[D1000].End(xlUp).Offset(0, 1) = x End If Next i End Sub ترحيل.rar

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

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

وهذا الملف كاملا بكل الطلبات افتح المرفق ثم أنظر لصفحات العهد(deposit1.. deposit4) جيدا وضعت قيم افتراضية للممولين والضريبة في ثلاث صفحات من الصفحات الأربعة وبنفس الطريقة السابقة يتنقي الماكرو القيم التي بها ضريبة أرباح تجارية فقط ويقوم بتخزينها لديه ثم مسحها ثم إعادة كتابتها في صفحة الضرائب TAX بعد آخر سطر مملوء الآن إضغط الزر الأخضر لنقل الممولين من العهد تفضل المرفق الورقة الاصلية3.rar

السلام عليكم أخي الكريم تم تنفيذ الجزء الأول من المطلوب وهو نقل الموردين إفتح المرفق ثم أنظر لصفحة الموردين (Suppliers) جيدا وضعت قيم افتراضية للضريبة في الجداول الأربعة عشوائيا ويتنقي الماكرو القيم التي بها ضريبة أرباح تجارية فقط ويقوم نتخزينها لديه ثم مسحها ثم إعادة كتابتها في صفحة الضرائب TAX الآن إضغط الزر الأصفر نقل الموردين وقريبا الطلب الثاني إن شاء الله تفضل المرفق الورقة الاصلية2.rar

السلام عليكم لاأعلم شيئا عن برنامج امي بروكر لتحليل الفني مع أنني من المساهمين بالأسهم المصرية ولكنني سأقول لك علي أحد الأسرار الجميلة للإكسل إن شاء الله ستفيدك أحسن من برنامج امي بروكر قف علي المنحني الحقيقي للأسعار بالماوس كليك يمين ستظهر لك قائمة إختر منها trendline ومن الخيارات والتشكيل إختر منحني درجة 2 أو 3 أو 4 حسب ماتحس به فنيا لأقرب منحني يتطابق مع غالبية القيم المسجلة ومن التشكيل أيضا إختر تنبؤ 5 أيام تداول قادمة ، ستفاجأ بالنتيجة مثلا في مثالك هذا وفي الصفحة الأولي parabolic sar عملت ماسبق واخترت منحني درجة 4 ومع 5 أيام مستقبلية (في علم الله طبعا) ولكن الأكثر إحتمالا أن هذا المؤشر سيرتفع وأن آخر يوم هذا قاع والله أعلم أنظر المرفق

السلام عليكم يمكن عند عدم التمكن من وضع كلمه السر تعطيل الماكرو ثم اغلاق النافذه الخاصه بكلمه السر تعطيل الماكرو يتم عن طريق الضغط علي Ctrl-Break معا انظر الصورة