A few VBA functions for converting Jalaali (Jalali, Persian, Khayyami, Khorshidi, Shamsi) and Gregorian calendar systems to each other.
Jalali calendar is a solar calendar that was used in Persia, variants of which today are still in use in Iran as well as Afghanistan. Read more on Wikipedia or see Calendar Converter.
Calendar conversion is based on the algorithm provided by Kazimierz M. Borkowski and has a very good performance.
Create a module in Excel's VBA and paste the code in module.vb file into it.
You can use all of the functions inside Excel Formulas
Converts a Gregorian date to Jalaali.
toJalaali(2016, 4, 11) // { jy: 1395, jm: 1, jd: 23 }Converts a Jalaali date to Gregorian.
toGregorian(1395, 1, 23) // { gy: 2016, gm: 4, gd: 11 }Checks whether a Jalaali date is valid or not.
isValidJalaaliDate(1394, 12, 30) // false
isValidJalaaliDate(1395, 12, 30) // trueIs this a leap year or not?
isLeapJalaaliYear(1394) // false
isLeapJalaaliYear(1395) // trueNumber of days in a given month in a Jalaali year.
jalaaliMonthLength(1394, 12) // 29
jalaaliMonthLength(1395, 12) // 30This function determines if the Jalaali (Persian) year is leap (366-day long) or is the common year (365 days), and finds the day in March (Gregorian calendar) of the first day of the Jalaali year (jy).
jalCal(1390) // { leap: 3, gy: 2011, march: 21 }
jalCal(1391) // { leap: 0, gy: 2012, march: 20 }
jalCal(1392) // { leap: 1, gy: 2013, march: 21 }
jalCal(1393) // { leap: 2, gy: 2014, march: 21 }
jalCal(1394) // { leap: 3, gy: 2015, march: 21 }
jalCal(1395) // { leap: 0, gy: 2016, march: 20 }Converts a date of the Jalaali calendar to the Julian Day number.
j2d(1395, 1, 23) // 2457490Converts the Julian Day number to a date in the Jalaali calendar.
d2j(2457490) // { jy: 1395, jm: 1, jd: 23 }Calculates the Julian Day number from Gregorian or Julian calendar dates. This integer number corresponds to the noon of the date (i.e. 12 hours of Universal Time). The procedure was tested to be good since 1 March, -100100 (of both calendars) up to a few million years into the future.
g2d(2016, 4, 11) // 2457490Calculates Gregorian and Julian calendar dates from the Julian Day number (jdn) for the period since jdn=-34839655 (i.e. the year -100100 of both calendars) to some millions years ahead of the present.
d2g(2457490) // { gy: 2016, gm: 4, gd: 11 }This project is a direct conversion of the Jalaali JavaScript project, created by @behrang
MIT