يحيى حسين
-
Posts
2,148 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
3
Community Answers
-
يحيى حسين's post in بدء تسلسل التاريخ ب 0 بدلا من 1 was marked as the answer
السلام عليكم و رحمة الله في الخلية A2 ضع المعادلة :
=IF(EOMONTH(A1,-1)+1=A1,TEXT(0,"0"),EOMONTH(A1,-1)+1)
-
يحيى حسين's post in كيفية ادراج زر طباعة was marked as the answer
أخ الحبيب لعمل ذلك يجب أولا تحديد نطاق هذه الخلايا و تعريفه من ضمن منطقة الطباعة
PrintArea
و الكود التالي سيقوم بتحديد منطقة طباعة من العامود A و لغاية العامود C
Sub PrintMySheets() Dim ws As Worksheet Dim LR As Long Set ws = ActiveSheet 'قم بتغييرها حسب اسم الشيت عندك LR = ws.Range("A" & Rows.Count).End(xlUp).Row With ws .PageSetup.PrintArea = "A1:C" & LR .PrintOut End With End Sub و لربطها بزر طباعة
من تاب إدراج Insert
قم بإدراج أي شكل موجود عندك
و من ثم رايت كليك على الشكل بعد إدراجه و إختر
assign MAcro
و اختر اسم الكود اعلاه
-
يحيى حسين's post in إضافة الصفر .. was marked as the answer
السلام عليكم و رحمة الله
إضافة لطرق الأخوة أعلاه
اتبع الخطوات التالية :
حدد النطاق . رايت كليك تنسيق الخلايا اختر مخصص ضع الكود التالية "0"0 -
يحيى حسين's post in دالة (VLOOKAnyCol) تبحث فى اى عمود من الجدول وتستخرج النتيجة من آخر was marked as the answer
عمل أكثر من رائع
و فيه توفير كبير للوقت خصوصا لمن يحتاجون دوال البحث
و كلمة شكر يجب أن تقال لأستاذنا أبو تامر على مجهوده الرائع
اللهم بارك لابو تامر في عمره و ماله و علمه و عملهو و لده
و زده من النعيم و العلم يا أرحم الراحمين
و بانتظار المزيد منك يا أبو تامر
و دمتم بود