مهندسی آچار فرانسه!

دیگر توضیح ندارد!

مهندسی آچار فرانسه!

دیگر توضیح ندارد!

تبدیل متفاوت تاریخ شمسی به میلادی و بالعکس در آفیس

سلام

جهت حمایت از این وبلاگ، وبسایت شهید رسول را تبلیغ و اطلاع رسانی کنید:

shahidrasul.ir


در پست های قبلی، پستی داشتم که به روشی متفاوت در آفیس تاریخ میلادی رو به شمسی تغییر می داد. اما در بسیاری از ورودی های وبلاگ دیدم که بیشتر به دنبال عکس این تبدیل هستند. از آنجایی که رویه من در آفیس عدم استفاده از ماژول هست، یک روش ساده برای این کار طراحی کردم که تاریخ شمسی رو به تاریخ میلادی تبدیل می کنه:

( فایل اکسل 2007 رو از اینجا می تونید دانلود کنید، حجم: 10 کیلوبایت فرمت: zip در صورتی که اکانت جی میل ندارید از اینجا دانلود کنید. پسورد: kmisagh.blogsky.com. استفاده با درج منبع بلامانع است.)


فرض کنید تاریخ مورد نظر شما در سلول O18 ذخیر شده است:



کد سال (ابتدا باید قسمت سال را از کل تاریخ جدا نمود و میزان فاصله ی آن را از تاریخ اولیه به دست آورد):

=IF(MOD(LEFT(O18;SEARCH("/";O18)-1);4)=3;INT((LEFT(O18;SEARCH("/";O18)-1)-1299)*365.25)-1;INT((LEFT(O18;SEARCH("/";O18)-1)-1299)*365.25))

کد ماه (بعد از آن نوبت به ماه می رسد که از کل تاریخ جدا شود و تعداد روز گذشته از سال به دست آید):

=IF(VALUE(MID(O18;SEARCH("/";O18)+1;SEARCH("/";O18;SEARCH("/";O18)+1)-SEARCH("/";O18)-1))<8;(MID(O18;SEARCH("/";O18)+1;SEARCH("/";O18;SEARCH("/";O18)+1)-SEARCH("/";O18)-1)-1)*31;(MID(O18;SEARCH("/";O18)+1;SEARCH("/";O18;SEARCH("/";O18)+1)-SEARCH("/";O18)-1)-1)*30+6)

کد روز (روز گذشته در هر ماه):

=MID(O18;SEARCH("/";O18;SEARCH("/";O18;SEARCH("/";O18)+1))+1;2)


کد کلی (که از مجموع سه عدد بالا به اضافه 7385 به دست می آید):

=IF(MOD(LEFT(O18;SEARCH("/";O18)-1);4)=3;INT((LEFT(O18;SEARCH("/";O18)-1)-1299)*365.25)-1;INT((LEFT(O18;SEARCH("/";O18)-1)-1299)*365.25))

+IF(VALUE(MID(O18;SEARCH("/";O18)+1;SEARCH("/";O18;SEARCH("/";O18)+1)-SEARCH("/";O18)-1))<8;(MID(O18;SEARCH("/";O18)+1;SEARCH("/";O18;SEARCH("/";O18)+1)-SEARCH("/";O18)-1)-1)*31;(MID(O18;SEARCH("/";O18)+1;SEARCH("/";O18;SEARCH("/";O18)+1)-SEARCH("/";O18)-1)-1)*30+6)

+MID(O18;SEARCH("/";O18;SEARCH("/";O18;SEARCH("/";O18)+1))+1;2)+7385


تعجب نکنید! این عدد همان تاریخ مورد نظر است، کافی است در تنظیمات سلول مورد نظر را با فرمت تاریخ تنظیم کنید (روی سلول راست کلیک کنید و در فرمت سل (format cell)، نوع مقادیر را به تاریخ تغییر دهید).


نظرات 9 + ارسال نظر
مسعود 10 شهریور 1388 ساعت 23:12

به نام خدا
سلام
آقا شما خجالت نمی کشی توی کار ما کامپیوتری ها دخالت میکنی؟
تو برو مثلا روش چگونه با امبردست به جای سیم چین یا کف چین سیم را ویرایش نماییم بنویس:دی

سلام
طاعات قبول!
مگه آخه من دل ندارم؟ شما که آفیس رو آدم حساب نمی کنید! به هر حال یکی باید پیدا بشه که آفیس به ملت یاد بده یا نه؟

فرساران 11 شهریور 1388 ساعت 12:00 http://www.farsaran.ir

با سلام
اگر موافق هستید یک نگاهی به وبلاگ
www.farsaran.blogfa.com
من بیندازید تا تبادل لینکی با هم داشته باشید. لطفا به من ایمیل بزنید.
مرسی

مرتضی 13 شهریور 1388 ساعت 01:58 http:///http://www.mortezarohani.blogfa.com

سلام
با مطلبی تحت عنوان مرگ و مرگ آگاهی به روز کردم
یا علی مدد

اکبر 16 شهریور 1388 ساعت 10:59

سلام
آقا میثم عکست خیلی خوشگله ها...

سلام
خودتی!

سعید آذری 7 آبان 1388 ساعت 19:25

لذت بردم تو را خدا خیر دهد من از تبدیل تاریخ میلادی به شمسی در اکسس ۲۰۰۳و اکسل ۲۰۰۳ استفاده کردم این هم بسیار مفید بود منتظر ابتکارات بعدی شما هستم

navid 28 فروردین 1390 ساعت 16:20 http://navidsweden.blogfa.com/

behtar azs shoma be parvarsh shotormorghtan bepardazez marg bar asl velayat faghe va eslam fasheste

نه دیگه شما ها رو پرورش دادیم بسه.
الآن کار جدید دست گرفتیم، که گندکاری هاش چند سال دیگه رو می شه!!!
جدای از شوخی، این جا فک کنم وبلاگ سیاسی ای نیست! نمی دونم شما چرا انقدر اینجا عصبانی شدی!!

مهدی 14 خرداد 1390 ساعت 16:27

سلام رفیق
من این کدها رو تو افیس 2010 پیاده کردم اما تاریخ درست در نمیاید
تبدیل میلادی به شمسی درسته ولی شمسی به میلادی درست نیست

سلام

مهدی 14 خرداد 1390 ساعت 16:37

سلام مجدد
درست شد رفیق 7385 رو اضافه نکرده بودم
مرسی

سلام مجدد

امید 25 اردیبهشت 1393 ساعت 09:39

سلام میشه یه مثال برای ما تازه کارها بزنید
من وقتی این کد ها را در اکسل کپی میکنم هی بهم اررو میده
نمی دونم چکار باید کنم؟
ممنون میشم راهنماییم کنید

سلام
فایل هایی که در بلاگ گذاشته شده رو دانلود کنید.
احتمالا فرمول های شما با "," جدا شده است به جای ";"
اگر فایل های رو دانلود کنید متوجه می شید.

برای نمایش آواتار خود در این وبلاگ در سایت Gravatar.com ثبت نام کنید. (راهنما)
ایمیل شما بعد از ثبت نمایش داده نخواهد شد