مشکل با تابع تاریخ و if

[beheshty]

سلام دوستان
من یک فایل دارم که کالاهایی که به صورت نسیه میفروشم همراه با نام افراد و تاریخ فروش در آن ذخیره میکنم
افراد باید یک ماهه بدهی خود را پرداخت کنند
من درa1 این تابع قرار دادم =j_today(1)
در e2 تاریخ فروش کالا درج کردم
در b2 این فرمل قرار دادم =if(a1<e2;"بدحساب";"خوب")

حالا مشکل در اینجاست که بلافاصله بعد از یک روز از تارخ فروش پیام اخطار ظاهر میشود اما من میخواهم بعد از یک ماه این پیام ظاهر شود
فرمل به این صورت هم نوشتم خطا میده =if(a1+30<e2;"بدحساب";"خوب")

[Amir Ghasemiyan]

سلام دوستان
من یک فایل دارم که کالاهایی که به صورت نسیه میفروشم همراه با نام افراد و تاریخ فروش در آن ذخیره میکنم
افراد باید یک ماهه بدهی خود را پرداخت کنند
من درa1 این تابع قرار دادم =j_today(1)
در e2 تاریخ فروش کالا درج کردم
در b2 این فرمل قرار دادم =if(a1<e2;"بدحساب";"خوب")

حالا مشکل در اینجاست که بلافاصله بعد از یک روز از تارخ فروش پیام اخطار ظاهر میشود اما من میخواهم بعد از یک ماه این پیام ظاهر شود
فرمل به این صورت هم نوشتم خطا میده =if(a1+30<e2;"بدحساب";"خوب")

سلام دوست عزيز
در فرمول if بايد اين شرط رو بررسي كنيد:

J_DIFF(A1;E2)>30

[beheshty]

[QUOTE=amir ghasemiyan;26543]
سلام دوست عزيز
در فرمول if بايد اين شرط رو بررسي كنيد:

J_DIFF(A1;E2)>30

[/QUOT]
ممنونم
میشه یه فایل نمونه قرار دهید

[Amir Ghasemiyan]

ممنونم
میشه یه فایل نمونه قرار دهید

بفرماييد خدمت شما

[beheshty]

ممنونم
فقط یه مشکل دیگه هم دارم
اگه خانه تاریخ خرید خالی باشه فرمل خطا میده میشه کاری کرد که در صورت خالی بودن هم بنویسه خوب

[Javid Mokhtari]

با سلام و کسب اجازه از دوست عزیر آقا امیر.
به جای کد قبلی این کد را جایگزین کنید:

=iferror(if(j_diff(d4;b4)>30;"بدحساب";"خوب");"خوب") 

البته چون حروف فارسی داره چپ و راست نوشته

[beheshty]

ممنونم دوستان خوبم
من این فرمل در قسمتی از فایل قرار دادم و هنوز به کل فایل اعمال نشده ,با این وجود خیلی کند شده
آیا راهی برای بالا بردن سرعت این فایل هست
فایلو در زیر پیوست کردم

[khakzad]

درمورد سبک کردن فایل و افزایش سرعت قبلا بحث شده.
جستجو کنید پیدا م یکنید.

یکی از عوامل اصلی سنگین شدن فایل border هست
اگر border دارید سعی کنید حذف کنید

[beheshty]

درمورد سبک کردن فایل و افزایش سرعت قبلا بحث شده.
جستجو کنید پیدا م یکنید.

یکی از عوامل اصلی سنگین شدن فایل border هست
اگر border دارید سعی کنید حذف کنید

ممنونم خانم خاکزاد
جستجو کردم دوست عزیز
بیشتر بحث ها در مورد ماکروهاسنگین بود که در فایل من ماکرو خاصی نیست و همینطور انتخاب شدن محدوده زیاد که برای فایل من کم کردن محدوده بیش از این امکان ندارد
علت کم شدن سرعت فایل به کار گیری فرمول در سل های زیاد تقریبا 800 سل
و مخصوصا این فرمول که خیلی سرعت فایلم کم کرد

=iferror(if(j_diff(gn4;$p$1)>31;"تاخیر در پرداخت";"شرح خرید");"شرح خرید")

اگه بشه به جای این فرمول ماکرو خاصی قرار داد که همین کارو برام انجام بده فکر کنم سرعت فایل خوب میشه
لطفا اگه نظر خاصی دارید بیان کنید

[khakzad]

خواهش می کنم
این فرمول رو می تونید در قالب کد در بیارید. یک حلقه for لازم دارید که فرمول برای هر سل اجرا بشه (معادل درگ در فرمول نویسی)
بعد همین فرمول رو می نویسید و اختصاص میدید به سل مناسب. (با توجه به شمارنده که در حلقه تعریف کردید، سل ها رو ادرس می دید)

[beheshty]

ممنونم
سل ها در كنار هم نيستند و حدود 800 تا هستن كه هر چند وقت يه بار با اضافه شدن مشتري جديد گسترش ميابند
چه جوري بايد ادرس دهي كرد
من زياد به vba آشنايي ندارم
از دوستان كسي ميتونه با توجه به فايل اين كد را برام بنويسه