Printable View
با سلام
دوستان متاسفانه با برنامه نویسی و ماژولهای اکسس هیچگونه آشنایی ندارم.
توی سایت هم زیاد گشتم ماژولها و کوئری های زیادی پیدا کردم اما متاسفانه نمیتونم ازشون استفاده کنم. نمیدونم چیزی کم و کسر داره یا نه؟
نمونه هاش رو هم اینجا قرار میدم.
بی زحمت اگه یه فایل اکسس آماده باشه ممنون میشم.(شرمنده :خجالت::خجالت::خجالت:)
در دو ستون تاریخ شمسی باشه و اختلافشون بر حسب سال و ماه و روز نشون بده.
سلام منتظر باشید اصلاحش میکنم.نقل قول:
نوشته شده توسط SardareEshgh
تقدیم به شمانقل قول:
نوشته شده توسط mohsen1393
واقعا ممنونم دوست عزیز. از وقتی که گذاشتید و زحمت کشیدید.نقل قول:
نوشته شده توسط mohsen1393
ببخشید این رو بخوام برحسب سال و ماه و روز نشون بده چیکار باید بکنم.
سوابق یه کارمند رو که چند سالی است در شرکت کار میکنه از روز استخدامش تا روز تسویه حسابش میخوام بر حسب سال و ماه و روز نشون بده.
سلامنقل قول:
نوشته شده توسط SardareEshgh
کل روز تقسیم بر 30 تعداد ماه بدست میآید
اما یه مشکل وجود داره اون هم تعداد روزهای 6 ماهه اول و دوم سال هست
آخرش کمی نیاز به محاسبات دستی پیدا میکنه
البته میشه به کد نویسی درآوردش اما متأسفانه وقت لازم رو برای انجام این کار رو ندارم
انشالله سایر دوستان هم مشارکت کنند و تکمیلش کنند
موفق باشید
باز هم از شما سپاسگزارم.نقل قول:
نوشته شده توسط mohsen1393
از اساتید بزرگوار اگه کسی کمک کنه ممنون میشم
با سلام
به سایت زیر مراجعه کنید و با مطالعه دقیق، از نمونه های موجود کمک بگیرید... (جا داره مجدداً از زحمات دوست و استاد گرامی، جناب پیروزمهر تشکر و قدردانی کنم)
http://www.cpsd.ir/forum/forumdisplay.php?fid=5
نمونه ذیل خواسته شما رو برآورده میکنه که از آدرس فوق استخراج شده است...
ضمیمه 143853
موفق باشید
یا علی
با سلام
در پیغامتون، تصویر خطا رو من ندیدم، به نظر بد آپلود شده...
بهر حال در توضیح باید خدمتتون عرض کنم نمونه ای که در پوشه مسیر نصب برنامه و در فولدر sample با نام Access هست، نمونه مورد نظره...
قبلش ذکر 2 نکته ضروریه:
1- این اکتیوایس فقط روی آفیس 32 بیتی جواب میده (مهم نیست ویندوز 64 بیت باشه)...
2- باید چک کنید که اکتیوایس در لیست رفرنس اکسس رجیستر شده باشه مانند تصویر پیوست...
ضمیمه 143864
مجددا تاکید می کنم استفاده از این اکتیوایس نیاز به یک مقدار مطالعه و استفاده از کدهای VBA داره...
نگران نباشید، خیلی راحت و با استفاده از نمونه فوق الذکر به نتیجه مورد نظر خواهید رسید...
موفق باشید
یا علی
با سلام
منبع : https://support.office.com/en-us/art...c-e24fc238f85f
Dim TheDate As Date ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date")
Msg = "Days from today: " & DateDiff("d", Now, TheDate)
MsgBox Msg
بدست آوردن اختلاف دو تاریخ : فرضا ۱۳۵۷/۴/۲۰ و ۱۳۹۸/۲/۲۸
کم کردن یکسال از سال باضافه ی روزهای ماه های شمسی سپری شده از اول فروردین باضافه ی سال های کبیسه از ۱/۱/۱ تا تاریخ موردنظر دو عدد برای هر تاریخ بالا بدست می آید از هم کم می کنیم اختلاف دو تاریخ شمسی است .
۱۳۵۶*۳۶۵ باضافه ی ۳*۳۱ و ۲۰ باضافه ی تعداد سال های کبیسه از سال یک تا ۱۳۵۶ ( تقریبا ۱۳۵۶÷۴ ) = ۴۹۵۳۹۲ منظور تعداد روزهای سپری شده از سال یک تا ۵۷/۴/۲۰
۳۶۵*۱۳۹۷ باضافه ی ۳۱ و ۲۸ باضافه ی تعداد سال های کبیسه از سال یک تا ۱۳۹۷ ( تقریبا ۱۳۹۷÷۴ )= ۵۱۰۳۱۳ منظور تعداد روزهای سپری شده از سال یک تا ۵۷/۴/۲۰
اختلاف دو عدد ۴۹۵۳۹۲ و ۵۱۰۳۱۳ میشود اختلاف ولی چون تعداد کبیسه ها تقریبی است اختلاف یک یا دو روز کمتر طبیعی است .
سلام وقت بخیرنقل قول:
نوشته شده توسط gerailly
ببخشید دوست عزیز نمونه ندارد قرار بدید که تو فرم دو تاریخ رو اختلافشون حساب کنه مثلا تاریخ تولد تو یکی زد و تو یکی سن رو برحسب سال و ماه و روز نشون بده ؟
خیلی ممنون میشم اگه بتونید زحمت نمونه بکشید فکر کنم بدرد خیلیا بخوره خصوصا اونایی که مثل من ناواردن
ممنون
سلام. این فایلی که واسه دوستمون فرستادید رو منم دنبالش می گشتم. بدون کم و زیاد فقط همون مقدار زمان بین 2 تا تاریخ رو میخوام
من یه فرم توی پست زیر گذاشتم و میخواستم سئوال کنم از شما که چطوری این کدها رو وارد کنم.؟ فاصله بین امانت بردن کتاب و برگشت کتاب رو محاسبه کنه و توی فیلدش بنویسه
https://barnamenevis.org/showthread.p...50#post2414450
فایل هم اینه:
http://uupload.ir/view/j3zn_%DA%A9%D...%B1%D9%85.zip/