אופיס 365 פונקציות לתאריך עברי

[ארי4791]

יש קוד לבדיקת הפרש בין תאריכים עבריים?
תודה

 

[ארי4791]

סליחה על השאלה החצופה, אבל אולי למישהו יש את הקובץ שפורסם בהתחלה עם כל השינויים שעשו כאן?
תודה רבה מאוד

 

[ari rm]

בס"ד

יש קוד לבדיקת הפרש בין תאריכים עבריים?

תעתיק את זה

Public Function NumBetweendates(FirstDateHeb As String, LastDateHeb As String)
NumBetweendates = CLng(HebToDate(LastDateHeb) - HebToDate(FirstDateHeb))
End Function

זה שם הפונקציה: NumBetweendates
פרמטר ראשון: תאריך ראשון - "מתאריך"
פרמטר שני: תאריך אחרון - "עד תאריך"

נ.ב. לא בדקתי עדיין, אבל זה אמור לעבוד.

 

[moishy]

יש קוד לבדיקת הפרש בין תאריכים עבריים?

יש פונקציה DateDiff המחשבת הפרשים בין תאריכים לועזיים (כמובן ניתן לבחור איזו רזולוציה רוצים לחשב ימים חודשים או שנים). להשתמש בו בתאריכים עבריים, רק צריך להמיר את התאריכים העבריים לתאריכים לועזיים ולהשתמש בפונקציה הנ"ל.

 

[dvash01]

אני מנסה ליצור קובץ XL שבו לוח שנה
בטור אחד תאריך לועזי ובטור לידו תאריך עברי
אשמח מאוד אם מישהו מוכן ליצור אותו עבורי. אני ניסיתי ולא הצלחתי
תודה מראש

 

[דוד דוד]

יש לי את הקובץ המבוקש,
משום מה פרוג לא מרשה להעלות קובץ אקסל עם מאקרו,
תשלח לי מייל
<לא ניתן לפרסם מיילים באופן פומבי>

 

[משה מנחם]

נסה להעלות בסיומת xls

 

[ari rm]

בס"ד
לא הבנתי מה הכוונה לבנות לוח שנה, כ"א עושה לפי הצרכים שלו.
אבל בשביל להבין את הראיון...
מצורף
אם זה עדיין לא עוזר, אולי באמת ממולץ להעלות כאן את הקובץ

 

[dvash01]

בס"ד
לא הבנתי מה הכוונה לבנות לוח שנה, כ"א עושה לפי הצרכים שלו.
אבל בשביל להבין את הראיון...
מצורף
אם זה עדיין לא עוזר, אולי באמת ממולץ להעלות כאן את הקובץ

תודה רבה זה בדיוק מה שאני צריך
ושוב תודה לדוד דוד ששלח לי קובץ לאימייל

 

[דוד דוד]

ל ARI
בפונקציות תאריך שברשותך יש שיבוש קל, יש איזה בעיה לגבי חודש אדר,
לדוגמא בשנת 1996 כאשר ממיר לעברי יציג חודש אדר ב , והאמת שאין תאריך כזה אדר ב תשנו

מצורף קובץ עם נוסחאות מתוקנות

 

[dvash01]

ל ARI
בפונקציות תאריך שברשותך יש שיבוש קל, יש איזה בעיה לגבי חודש אדר,
לדוגמא בשנת 1996 כאשר ממיר לעברי יציג חודש אדר ב , והאמת שאין תאריך כזה אדר ב תשנו

מצורף קובץ עם נוסחאות מתוקנות

האם יש אפשרות לקבל גם פרשיות השבוע? הפטרה?

 

[ari rm]

בס"ד

בבקשה
היה כאן בעבר לא זוכר איפה

 

[רושם]

קודם כל תודה רבה על הפונקציות לתאריך עברי

ניסיתי להמיר תאריך באמצעות הפונקציה DateToHeb לתאריך 18/02/2018
והתאריך שאני מקבל שגוי (ג' באדר ב תשע"ח) כי תשע"ח היא שנה פשוטה כמובן
תודה רבה וגמר חתימה טובה לכולם

בפונקציות תאריך שברשותך יש שיבוש קל, יש איזה בעיה לגבי חודש אדר,
לדוגמא בשנת 1996 כאשר ממיר לעברי יציג חודש אדר ב , והאמת שאין תאריך כזה אדר ב תשנו

חודש אדר שמח לכולם!
ערכתי שינוי בקוד בנסיון לפתור את הבעיה של "אדר ב" בשנה פשוטה, בהמרה מלועזי לעברי:
בפונקציה GregToHeb (בשורה 143 של mdlCore)
במקום:
If bLeap Or nMonthH <> 5 Then
כתבתי:
If bLeap Or nMonthH <> 6 Then

האם זה יוצר בעיות חדשות?

 

[א חדש]

איזה נוסחה כותבים בחלון שנפתח ?? את הסמן משאירים על התאריך ??

 

[אפר]

איזה נוסחה כותבים בחלון שנפתח ?? את הסמן משאירים על התאריך ?? צפה בקובץ המצורף 891160

משתמשים כמו כל פונקציה
מכניסים תאריך או הפניה לתא עם תאריך

 

[kishkush]

שנה טובה
משום מה הפונקציות ממירות באופן שגוי
קיימת תוספת של עשרה ימים בהצגת התאריך העברי המומר מהתאריך הלועזי של היום

 

[תלמידים]

פונקציות לתאריך עברי ב-SHEETS:

אקסל - האשכול המרכזי לשאלות באקסל/גוגל שיטס

היי @מאסטר באקסל יש לי קובץ אקסל עם עשרות sheets ונוסחאות רבות בכל אחד מהם שבניתי במשך שנים. בזמן האחרון בכל פתיחה של הקובץ מקבל את ההודעה הבאה: הוא לא מראה איפה ובאיזה sheet יש את הבעיה עם הפורמולה. איך אני יכול למצוא את הפורמולה הבעייתית? טנקס

www.prog.co.il

חגים ומועדי ישראל (תודות לעוזר הבלתי נלאה @אפר )

אקסל - האשכול המרכזי לשאלות באקסל/גוגל שיטס

אשמח לעזרה חיפוש נתון מעמודה אחת קבלת תשובה מעמודה אחרת מכמה תאים (דהיינו למשל חיפוש שם בעמודה אחת ובכל מקום שיפיע השם יקח את הסכום מהעמודה השניה ויחשב לתוצאה אחת) צירפתי קובץ לדוגמא תודה מראש תעשה לפי העיקרון שבקובץ המצורף

www.prog.co.il

 

[moishy]

שנה טובה
משום מה הפונקציות ממירות באופן שגוי
קיימת תוספת של עשרה ימים בהצגת התאריך העברי המומר מהתאריך הלועזי של היום

איפה יש שגיאה, בקובץ הראשון שפורספם באשכול זה?

 

[משה גרוס]

@moishy בקוד האקסל המקורי שפרסמת ישנה בעיה בהמרת תאריך עברי ללועזי בשנים ח' וי"ט במחזור שני העיבור
הפונקציה IsValidHebDate שולחת את השנה לפונקציה isLeapYear בלי האלפים מה שגורם לכך שהתשובה מתאימה עבור השנה מהאלף הראשון לבריאה...
המחזורים באלף הראשון היו מאוחרים בשלוש שנים מהמחזורים באלף השישי כך שבשנה רגילה אין בעיה ורק בשנים המעוברות שלא לפי הרצף של פעם בשלוש שנים נוצרת הבעיה
לעצמי תיקנתי ככה

Public Function IsLeapYear(ByVal nYearH As Long) As Boolean
    Dim nYearInCycle As Long
    
    If nYearH < 5000 Then
        nYearH = nYearH + 5000
    End If


    nYearInCycle = nYearH Mod 19
    IsLeapYear = nYearInCycle = 3 Or _
                 nYearInCycle = 6 Or _
                 nYearInCycle = 8 Or _
                 nYearInCycle = 11 Or _
                 nYearInCycle = 14 Or _
                 nYearInCycle = 17 Or _
                 nYearInCycle = 0
End Function

אולי תשנה את הקובץ בהתחלה לתועלת הציבור

 

[משה גרוס]

@moishy שתי באגים נוספים בקוד
חודש אדר של שנה פשוטה מופיע כאדר ב'
אם מזינים שנה עם אלפים מקבלים אותה כחישוב של אחדות
אני מצרף קובץ עם תיקונים וכמה פונקציות נוספות (פרשת שבוע ועוד...)