سلام خسته نباشید در ماکرو اکسل چطور میشه درصورتی که تاریخ وارد شده بین دو تاریخ یا مساوی تاریخ باشه برنامه هشدار بده مثلا ما در سیستم یک تاریخ از ۹۷/۱۱/۱۲ الی ۹۷/۱۱/۱۸ داریم درصورتی که یک تاریخ مابین این تاریخ یا مساوی ان وارد کنیم برنامه هشدار بده ممنون فایل اماده ندارم بزارم خدمتتون
-
-
با سلام
فایل پیوست را بررسی بفرمایید
کد PHP:Sub TEST()
XX1 = Val(Replace(Range("A2"), "/", ""))
XX2 = Val(Replace(Range("B2"), "/", ""))
XX3 = Val(Replace(Range("C2"), "/", ""))
If XX1 > XX2 Or Len(Range("A2")) <> 10 Or Len(Range("B2")) <> 10 Or Len(Range("C2")) <> 10 Then
MsgBox "تاريخ ابتدا و انتها درست نيست"
ElseIf XX3 >= XX1 And XX3 <= XX2 Then
MsgBox "تاريخ در محدوده مورد نظر ميباشد"
Else
MsgBox "تاريخ وارد شده در محدوده مورد نظر نميباشد"
End If
End Sub
Last edited by iranweld; 2019/02/16, 09:14. -
ممنون دوست عزیزکامنت
کامنت