ابوعلي الحبيب

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

يعطيك العافية استاذ عبدالله واعتذر على الاطالة صحيح يحفظ الان بدون التنسيق الشرطي ولكن اصبح يخفي التلوين العادي للصفوف والخلاياء التي ليست تنسيق الشرطي والمشكلة الثانية عندما انسخ ورقة العمل المشروع 1 الى مشروع 2 ومشروع 3 ومشروع 4 ومشروع 5 ومشروع 6 ومشروع 7 وووو يعمل على المشروع الاول فقط هل يمكن الغاء تحديد الشيت بحيث يعمل على الي شيت يتم نسخ الشيت ((المشروع)) ولك جزيل الشكر

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

السلام عليكم ياكرام مطلوب كود يقوم بـ ( تعطيل / تفعيل ) التنسيق الشرطى الموجوده بالصفحة ثم تفعيل بعد تنفيذ الامر الامر هو حفظ pdf بدون ظهور التلوين في التنسيق الشرطي وبعد الحفظ يتم اعادة التنسيق الشرطي كما كان للمتابعة ولكم جزيل الشكر مرفق الملف كود اريد حفظ نطاق معين فقط بصيغة pdf.xlsb

جزاكم الله خير الجزاء

اشكرك استاذ عبدالله اشكرك على الرد ولكن اريده يحفظ الصفوف الموجودة فقط الان يحفظ ;كل شي الى z999 حتى لوكانت فارغة عند الفرز احتمال يكون لدي معلومات في النطاق الى 30 صف فقط وارغب بحفظها وبعد مدة تزيد او يتم الفرز واحتاج حفظ المفروز وللمعلومية يوجد بيانات اسفل الصف 999 لذالك اعتقد الحل هو في استخدام z2:z999.End(xlUp).Row) ولم استطع اضافتها بالكود بالشكل الصحيح ولك جزيل الشكر

Range("A2:z999" & Cells(Rows.Count, 1).End(xlUp).Row).ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ ThisWorkbook.Path & "\" & " " & Range("AA1").Value _ & " " & Format(Now, "yyyy-mm-dd,hh.mm"), Quality _ :=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False If a = vbNo Then End السلام عليكم ياكرام امل المساعدة بالتعديل على الكود اريد حفظ نطاق معين فقط بصيغة pdf يوجد كتابة اسفل z1000 لا اريدها ان تظهر فقط يحفظ الموجود بينن نطاق z2 الى z 999 ولكم جزيل الشكر

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

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

السلام عليكم ياكرام اذا كان الرقم بالخلية المقابلة سالب تظهر كلمة المبلغ ناقص امل المساعدة امل المساعدة =IF($J15<>"";VLOOKUP($J15;{"-","المبلغ ناقص ",""};2;0);"") اذا كان الرقم بالسالب تظهر كلمة المبلغ ناقص.xlsx

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

السلام عليكم امل المساعدة في معادلة تظهر الجمع تلقائي بعد الفرز والتصفية الارقم مرحلة بالمعادلات حيث جربت =SUBTOTAL(109;G5:G23) =SUBTOTAL(9;G5:G23) ولم تظهر النتيجة امل المساعدة وشكرا ترحيل البيانات حسب اسم الشيت الاصل.xlsx

استاذ طارق محمود الاحمر لا يعمل ولا يظهر بعد التجربة

السلام عليكم قام الاستاذ إيهاب عبد الحميد بمساعدتي مشكوراً ولكن وجهة مشكلة في كود التنسيق الشرطي حيث يلون الصفوف الفارغة =IF(AND(I9<>"";K9<>"تم التجديد";(I9-NOW())<100);IF(I9>NOW();"باقي "&(ROUND((I9-NOW())+1;0))&"";"منتهي قبل "&(-ROUND((I9-NOW())+1;0))&"");"") هل يوجد حل بحيث اذا كانت الخلاياء فارغة يتركها بدون تلوين ولك الشكر والتقدير إنتهاء الرحصة222.xlsm

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