דילוג לתוכן
  • דף הבית
  • קטגוריות
  • פוסטים אחרונים
  • משתמשים
  • חיפוש
  • חוקי הפורום
כיווץ
תחומים

תחומים - פורום חרדי מקצועי

💡 רוצה לזכור קריאת שמע בזמן? לחץ כאן!
Y.Excel.AccessY

Y.Excel.Access

@Y.Excel.Access
אודות
פוסטים
294
נושאים
49
קבוצות
0
עוקבים
2
עוקב אחרי
0

פוסטים

פוסטים אחרונים הגבוה ביותר שנוי במחלוקת

  • יצירת טבלה הניתנת לעריכה מלאה ממש כמו אקסל/שיטס ב HTML
    Y.Excel.AccessY Y.Excel.Access

    @יוס אני גם מחפש כזה דבר, אבל בקוד פתוח (עדיף HTML וJS טהור) גם אם האפשרויות יהיו פחות מפותחות.

    מישהו מכיר?


  • if בלי "אם לא", מקונן בfilter בגוגל שיטס
    Y.Excel.AccessY Y.Excel.Access

    @שמחה-זו-הסיסמא דבר ראשון - אפשר לקנן BITOR, אבל זה יהיה קצת מגושם 7 רמות קינון...

    אבל פשוט - למה ללכת בכלל על FILTER כשיש לך את QUERY? פשוט לעשות

    =QUERY({A2:V14},"SELECT * WHERE Col1 = 'אברהם' OR Col2 > 1 ...(וכו')" )
    

    (באמת אני מרבה להשתמש בQUERY פי כמה מ FILETR, SORT וכד', פשוט פונקציה אחת שבוחרת מתוך מערך, ממיינת ומסננת הכי טוב שאפשר, ובפרט אחרי החידוש שאפשר לעשות פונקציות בעלות שם וביטויי למדה - נולדו פתאום בתחום גם הרבה קיצורי דרך ואפשרויות חדשות)


  • הצעה לתגית משולבת בפורום
    Y.Excel.AccessY Y.Excel.Access

    @A0533057932 'תגיות' הכוונה היתה לנושאים - והיינו הך, אלא שנושא הוא אחד, ותגית היא מרובה.

    אני יודע שאין את זה בפורום, ולכן הצעתי 🙂

    • ושים לב - אני מתכוון רק לתחומים המשותפים האלה, לא לכל הפורום (שבאמת יש בזה סיבוך מסוים כמו שכתבו כבר על זה).

  • הצעה ובקשה (הצעה לאפשרות דירוג נוספת, בקשה למניעת מחיקת פוסטים)
    Y.Excel.AccessY Y.Excel.Access

    @mekev כתב בהצעה ובקשה (הצעה לאפשרות דירוג נוספת, בקשה למניעת מחיקת פוסטים):

    אולי ניתן לעשות סוג של דירוג נוסף

    בעצם, יש הבדל בין 'מועיל' לבין 'נהנתי' ולבין 'נכון'.

    לפעמים הפוסט נכון, אבל האמירה שם היתה בסגנון - 'על ראש הגנב בוער...' ושאר אמרות כנף למיניהם - שם הדירוג הוא רק 'נהנתי', ולשיקול בעלי הפורום אם זה מתאים לפורום מקצועי.

    לפעמים האמירה היא לא מועילה, אבל נכונה. לדוגמה - 'סטיתם מהנושא, פתחו אשכול חדש!' או בקשה להוסיף משהו בפורום - כמו פוסט הראשון של @mekev שקיבל דירוג, אבל לא בגלל שזה עזר למישהו, רק הסכימו שהבקשה ראויה ונכונה.

    אז אני מצטרף לבקשה (כמובן אם מעשי וכו', לא יודע כמה קוד ועריכה זה דורש) לבדל ל2 דירוגים - 'מועיל', ו'נכון'.

    • (אפשרויות נוספות לשמות הדירוגים: 'הועיל לי', 'אני מסכים' וכדו'.

    • או בכלל להביע את זה באייקון של V ו X ל'נכון', ואייקון אחר - אין לי רעיון עכשיו, ל'מועיל')


  • הצעה לתגית משולבת בפורום
    Y.Excel.AccessY Y.Excel.Access

    רציתי להציע להוסיף אופציה בתגיות תוכנה, אינטרנט, ותכנות,
    שיוכלו לבחור כמה מהם על אותו פוסט, ולא תגית אחת בלבד כמו עכשיו.

    למה? כי יש ביניהם הרבה מן המשותף - לפעמים התכנות מתנגש בבעיות אינטרנט, ולפעמים במהלך הדיבור על תוכנה רוצים גם לדבר על הקוד שלה...
    הדבר משמעותי במיוחד בקוד אקסס, אקסל, וורד, ומוצרי גוגל המקבילים, שם היישום הוא תוכנה, הקוד הוא תכנות, ואולי - גוגל הוא אינטרנט...


  • תיבה בשולבת באקסס
    Y.Excel.AccessY Y.Excel.Access

    @A0533057932 לפי הידוע לי, אין פעולת מאקרו בטבלה שיכולה לעדכן תיבה משולבת באמצעות האופציה בקישור שהביא @OdedDvir , רק בטופס.

    (יש בגירסאות 2010 והלאה מאקרו בטבלה, אבל המאקרו האלה מאוד מוגבלים)


  • תוכנת אנקי לזכרון הלימוד
    Y.Excel.AccessY Y.Excel.Access

    @הפצת-אנקי
    הפרסומת כאן משולבת של אנקי במחשב ובטלפון.
    יש אפשרות להשיג פרסומת רק לאנקי בטלפון? (מסמך PDF להדפסה)

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


  • חידה: פירסור תאריך מסויים שנכשל
    Y.Excel.AccessY Y.Excel.Access

    @yossiz אני מנחש שיש משהו שהפך את האותיות, ויום בחודש 32 לא אפשרי אבל 22 כן.
    אבל עדיין לא מובן שאר האותיות למה לא נהפכו


  • VBA. איך לפתוח ולעבוד עם WORD על ידי ACCESS
    Y.Excel.AccessY Y.Excel.Access

    @OdedDvir כתב בVBA. איך לפתוח ולעבוד עם WORD על ידי ACCESS:

    אגב, כדי לטפל במאפייני קובץ, כגון להסיר נתיב\סיומת\וכו' מומלץ להשתמש באובייקט FileSystemObject שמיועד לכך.

    תודה רבה, ההוספה הזו היתה ממש תועלתית!
    לתועלת הכלל אני כעת לומד על זה מ https://trumpexcel.com/vba-filesystemobject/
    (מסתבר שיש עוד קישורים לאתרי לימוד מוצלחים, זה מה שראיתי כרגע)


  • VBA. איך לפתוח ולעבוד עם WORD על ידי ACCESS
    Y.Excel.AccessY Y.Excel.Access

    @OdedDvir ו @yossiz תודה רבה.
    זה באמת היה הכיוון מחשבה שלי, וקיבלתי את האישור (וא"כ אין הבאג תלוי אלא בי:( 🙂 - בקוד שניסיתי ליצור מזה, אבל השיטה נכונה.

    מה שהסתבכתי זה עם הקישור - אני צריך לפתוח את הקישור המסויים הזה, ולהתייחס לDOCUMENT הנכון.

    אני נתקע כאן בנסיונות למיניהם...

    Dim wrdDoc As Variant
         Set wrdDoc = wrdApp.Documents.Open(strPathFile)
    

    בקוד זה הוא אומר שספריית "C:\USERS\שם המשתמש שלי\DECUMENTS לא נמצאה

    Dim wrdDoc As Variant
    Set wrdDoc = wrdApp.Documents(Right(strPathFile, Len(strPathFile) - InStrRev(strPathFile, "\"))).Activate
    

    בקוד זה הוא אומר "שם קובץ לא תקין" שגיאה 4160

    כמובן בדקתי שהקישור פעיל - נפתח בלחיצה וכו'

    אשמח לעזרה שוב!


  • VBA. איך לפתוח ולעבוד עם WORD על ידי ACCESS
    Y.Excel.AccessY Y.Excel.Access

    @chagold תודה רבה,
    ניסיתי את זה, אבל אם הוורד פתוח כבר זה לא יעבוד.
    אם הוורד פתוח אני צריך לעבור ישירות לקובץ הפתוח כבר. ולא ליצור קובץ חדש.


  • VBA. איך לפתוח ולעבוד עם WORD על ידי ACCESS
    Y.Excel.AccessY Y.Excel.Access

    איך לפתוח WORD ולעבוד עליו על ידי ACCESS?

    הצורך הוא -
    אם הוא פתוח: להצביע על הגירסה הפתוחה שלו ולהעביר את המיקוד (FOCUS) אליו.
    אם הוא סגור: לפתוח אותו ולהצביע ולהתמקד עליו.

    אח"כ לערוך אותו וכו' זה כבר פשוט.

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


  • if בלי "אם לא", מקונן בfilter בגוגל שיטס
    Y.Excel.AccessY Y.Excel.Access

    דבר ראשון, שים לב - הפונקציות שלך לא שלמות, הם לא יכולות לרוץ ככה. (לא סגרת את הסוגריים), כך שזה קצת מערפל את השאלה.
    גם לא הבנתי כל כך מה התכוונת, יש לי 3 אפשרויות:

    • התכוונת להתנות האם לסנן או לא, לפי ערך תא G1, שאם הוא שווה ל "X" יש לסנן לכל מה שהשעה בו פחותה מ 15:00, ואם לא להביא הכל בלי סינון, וכמו שכתבת

    @שמחה-זו-הסיסמא כתב בif בלי "אם לא", מקונן בfilter בגוגל שיטס:

    הבעיה שלי היא שאני מעוניין לעשות תנאי בפילטר, דהיינו אם G1 שווה ל X אז אני רוצה לקבל רק טווח שעונה לקריטריון, ואם G1 אינו שווה לX אני רוצה לקבל את כל הטווח.

    בשביל זה, צריך לעשות IF חיצונית לפילטר.

    =ARRAYFORMULA(IF("x"=G1,FILTER(A:C,HOUR(B:B)<15),A:C))
    
    • אפשרות שניה - התכוונת לסנן לפי אחד משתי תנאים, ולכן כתבת IF בשביל זה.
      בשביל זה צריך להשתמש ב OR, דא עקא, שבOR יש את אותה שגיאה שכתבת כי הוא מתאים רק לנתונים יחידים ולא למערך, אז לזה צריך להשתמש ב BITOR, ככה:
    =ARRAYFORMULA(FILTER(A:C,BITOR(HOUR(B:B)<15,"x"=G1))
    
    • אפשרות שלישית - התכוות למשהו אחר, ואני לא קראתי את דבריך מספיק בעיון (וסליחה).
      אוכל לענות על שאלה אחת שהבנתי:

    גוגל שיטס יחזיר שגיאה *הפונקציה FILTER מכילה גדלים לא תואמים של טווחים. ספירת השורות שהייתה צפויה להתקבל: ****. ספירת העמודות: 1. ספירת השורות שהתקבלה בפועל: 1, ספירת העמודות: 1.
    הסיבה לזה היא מכיון שלא נתתי לו בדיקה של כל הטווח שבחרתי אלא רק של "" ריק וזה בעצם ערך יחיד

    יש לזה פתרון שאני משתמש איתו, פונקציית MAKEARRAY, תוכל לראות עליה עוד בקישור זה https://www.benlcollins.com/spreadsheets/makearray-function/
    ותוכל כמובן לחפש גם בעברית - זה מה שמצאתי מחיפוש מהיר של GOOGLE SHEETS MAKEARRAY.


  • להורדה | סקריפט פייתון לחישוב האם השנה מעוברת או פשוטה ,האם חשון וכסליו מלאים או חסרים ובאיזה יום יוצא ראש השנה
    Y.Excel.AccessY Y.Excel.Access

    @האדם-החושב
    הנה בקובץ אקסל, אפשר להקיש F-11 להגיע לקוד.

    הפונקציות פועלות גם בתוך אקסל.

    מכיל פונקציות להמרת תאריך לועזי לעברי.xlsm


  • REGEX איך לחפש מילה שלימה / תחילת מילה
    Y.Excel.AccessY Y.Excel.Access

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

    Public Sub Regex_HideSpecialCharacter(ByRef str As String)
    
        Dim specialCharacters As Variant, i As Integer
        specialCharacters = Array("[", "\", "$", "&", "+", ",", ":", ";", "=", "?", "@", "#", "|", "'", "<", ">", ".", "^", "*", "(", ")", "%", "!", "-", "]")
        For i = 0 To 24 ' == Len("[\$&+,:;=?@#|'<>.^*()%!-]") - 1
            str = Replace(str, specialCharacters(i), "\" & specialCharacters(i))
        Next i
    
    End Sub
    

  • REGEX איך לחפש מילה שלימה / תחילת מילה
    Y.Excel.AccessY Y.Excel.Access

    הצלחתי!
    ככה:

            "([^a-zA-Z0-9_]|^)" & myStr & "([^a-zA-Z0-9_]|$)"
    
    

    ובהחלפה להתייחס לקבוצה שלפני כ $1 והקבוצה שאחרי כ $2.

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

    Public Sub Regex_החלפה_לפי_מילה_שלימה(ByRef טקסט As String, ByVal מילה_לחיפוש As String, ByVal מילה_מחליפה As String)
        Regex_HideSpecialCharacter מילה_לחיפוש
        Dim regExp As Object
        Set regExp = CreateObject("vbscript.regexp")
    
        With regExp
            .Pattern = "([^a-zA-Z0-9_]|^)" & מילה_לחיפוש & "([^a-zA-Z0-9_]|$)"
            .Global = True
            טקסט = .Replace(טקסט, "$1" & מילה_מחליפה & "$2")
        End With
    End Sub
    

  • REGEX איך לחפש מילה שלימה / תחילת מילה
    Y.Excel.AccessY Y.Excel.Access

    אשמח שוב את עזרתכם (בפרט @yossiz )

    שאלתי מתכנת שאני מכיר,
    הוא הביא לי את הקוד הזה:

    "((?<=[^a-zA-Z0-9_])|^)" & MyStr & "((?=[^a-zA-Z0-9_])|$)"
    

    זה מחפש את הטקסט אבל לא בוחר אותו.
    לדאבוני זה לא עובד ב VBA...
    אז הביא לי את זה:

    "(?:[^a-zA-Z0-9_]|^)("& MyStr &")(?:[^a-zA-Z0-9_]|$)"
    

    שזה בוחר את הטקסט בשלוש קטעים שונים, כך שיהיה אפשר אח"כ להתייחס אל כל קטע.
    הבעיה שאני לא יודע איך לבחור שוב את הקטע בלי להחליף אותו.

    מצאתי מעין זה לגבי חיפוש והחלפה רגילים של וורד, (לא הצלחתי ליישם בפועל כאן):

    @yossiz כתב בעזרה בחיפוש והחלפה בוורד:

    @אוריי תשתמש בתווים כלליים ככה:
    0f0decc3-b9b0-4801-98c6-ecd3aab219c5-image.png

    החיפוש:

    (^13[א-ת]@)\\].
    

    החלפה:

    \1.
    

    הסבר:

    חיפוש:

    • (...) מכיל קבוצה שניתן לציין אח״כ בהחלפה
    • ^13 סימן סוף פיסקה (בחיפוש עם תווים כלליים)
    • [א-ת] כל תו בטווח א-ת
    • @ 1 או יותר מהנ״ל
    • \]. מייצגים את עצמם, צריך מילוט (\) לפני ה-\] אחרת יש לתו זה משמעות מיוחדת

    החלפה:

    • \1 התוכן של הקבוצה הראשונה בחיפוש (...)
    • . נקודה

    תודה רבה!


  • להורדה | סקריפט פייתון לחישוב האם השנה מעוברת או פשוטה ,האם חשון וכסליו מלאים או חסרים ובאיזה יום יוצא ראש השנה
    Y.Excel.AccessY Y.Excel.Access

    @האדם-החושב
    יש לי קוד VBA ברור שעבדתי איתו הרבה, הבסיס מיובא מפרוג ורק הוספתי עליו קצת, כך שלא אוכל לתת עליו אחריות... אבל תוכל להשוות.
    ממיר תאריך לועזי לעברי, ומציג את זה בגימטריה ב STRING. (=> 'י"ב חשוון תשפ"ג').
    בהמשך הקוד - להציג במספרים, להמיר בחזרה ללועזי, בודק את השנים אם מעוברות, חישוב המולד, וכו'.
    הקובץ להורדה


  • REGEX איך לחפש מילה שלימה / תחילת מילה
    Y.Excel.AccessY Y.Excel.Access

    @chagold ניסיתי, ואולי הצלחתי.
    זה אמור להיות טוב? לכאורה זה עובד לי...

    ((^|[^a-zA-Z0-9_א-ת])אניי($|[^a-zA-Z0-9_א-ת]))
    

    ו מצאתי בעיה אחרת... שההחלפה בקוד VBA שהבאתי מחליפה לי גם את התווים הסובבים, ולא רק את המילה.

    כלומר מהטקסט "אניי, רוצה ללמוד באנייה שלי"
    יוצא לי "אני רוצה ללמוד באנייה שלי" - בנוסף למילה, הפסיק הסמוך לה נמחק
    ומהטקסט "אניי ,רוצה ללמוד באנייה שלי" יוצא לי "אני,רוצה ללמוד באנייה שלי" - בנוסף למילה ששונתה, הרווח הסמוך לאות נמחק.
    והבעיה שאני צריך שימצא את המילה על ידי בדיקת התו הקודם לה והמאוחר ממנה ב REGEX, אבל שלא יחליף באמת כי אם את המילה עצמה...


  • REGEX איך לחפש מילה שלימה / תחילת מילה
    Y.Excel.AccessY Y.Excel.Access

    @chagold כן, הבנתי את הרעיון, פשוט - אין כזה דבר - צור אותו.
    כמובן הקפת רק את הסוגריים והפסיק ולא את כל האפשרויות, אבל זה הכיוון שאתה מציע:

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

  • 1
  • 2
  • 7
  • 8
  • 9
  • 10
  • 11
  • 14
  • 15
  • 9 / 15
  • התחברות

  • אין לך חשבון עדיין? הרשמה

  • התחברו או הירשמו כדי לחפש.
  • פוסט ראשון
    פוסט אחרון
0
  • דף הבית
  • קטגוריות
  • פוסטים אחרונים
  • משתמשים
  • חיפוש
  • חוקי הפורום