اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

عمل وميض ينبهني عند انتهاء تواريخ الجوازات والاقامات


الردود الموصى بها

اخواني واحبابي في منتدى اوفيس العملاق تحيه بالبدايه لمقامكم الكريم 

 

اخواني اريد المساعده في عمل وميض ينبهني عند انتهاء تواريخ الجوازات والاقامات الموضحه في المرفق 

 

علما انه عندي الاوفيس 2003  لو تصمم لي على 2003 و 2007 يكون احسن

 

 

 

 

تحياتي لكم احبابي الاعزاء

 

 

تاريخ انتهاء الجواز والاقامه.rar

رابط هذا التعليق
شارك

السلام عليكم
 ( ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال.)
لقد تم تعديل عنوان الموضوع
فارجوا الانتباه لاحقا لهذه النقطة لكي لا يتعرض الموضوع للاغلاق
 

قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة
و بصفة خاصة نؤكدعلى ما يلي

1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة
2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد.
3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال.
4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا.....
5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم.

ومخالفة ذلك تعرض الموضوع للحذف

رابط هذا التعليق
شارك

السلام عليكم

 ( ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال.)

لقد تم تعديل عنوان الموضوع

فارجوا الانتباه لاحقا لهذه النقطة لكي لا يتعرض الموضوع للاغلاق

 

قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة

و بصفة خاصة نؤكدعلى ما يلي

1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة

2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد.

3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال.

4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا.....

5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم.

ومخالفة ذلك تعرض الموضوع للحذف

شكرا لتعديل الموضوع

  • Like 1
رابط هذا التعليق
شارك

 الأستاذ / التوي

 

السلام عليكم ورحمة الله وبركاته

 

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

 

تاريخ انتهاء الجواز والاقامه1.rar

تاريخ انتهاء الجواز والاقامه.rar

رابط هذا التعليق
شارك

أستاذنا الكبير / شوقي ربيع

 

السلام عليكم ورحمة الله وبركاته

 

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

السلام عليكم

شكرا جزيلا لدعائك الجميل اخي الفاضلة

تحياتي لكي

رابط هذا التعليق
شارك

الاستاذ الفاضل شوقى ربيع .. الكود رائع

ولكن لماذا عند تغيير التاريخ لا يتوقف الوميض

السلام عليكم

شكرا اخي لتنبيهي بالمشكلة

تم تعديل الكود

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim sh As Worksheet
Dim r As Integer
Dim Dy
Set sh = ThisWorkbook.Sheets("Sheet1")
Start = True
Dy = Date
Do While Start
For r = 5 To 100
x = sh.Range("G" & r)
If sh.Range("G" & r) - Dy >= 0 Then
Tamer
sh.Range("H" & r).Interior.Color = 65535
Tamer
sh.Range("H" & r).Interior.Pattern = xlNoneElse
End If
Next
Loop
End Sub

تاريخ انتهاء الجواز والاقامه.rar

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information