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

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

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

אוריי

@אוריי
אודות
פוסטים
913
נושאים
116
קבוצות
0
עוקבים
1
עוקב אחרי
1

פוסטים

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

  • חלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד
    אורייא אוריי

    ראשית כל ברצוני להודות לכל המשיבים שעמלו מזמנם היקר...
    לסיכום:
    מה שאני צריך לעשות כדי להגיע לתוצאה המיטבית זה כך:

    1. ליצור רשימה של כל הסימנים שיש באקסל או באקסס (כולל גרשיים ומקפים לפי הצורך) א' ב' ג' ... י"א.. י"ב וכו' ולסדר את המילים הרעות כגון תרצ"ח וכו' (או גם וגם).
    2. לעבור על הרשימה ולסמן אלו אופציות ודאי לא יכול להיות חוץ מסימנים.
    3. לחפש את כל התוצאות שנשארו ולקבל אותם לתוך טבלה (אקסס או אקסל), עמודה ראשונה 3 מילים לפני, עמודה שניה התוצאה, עמודה שלישית 3 מילים אחרי.
    4. לעבור על הרשימה ולסמן אלו תוצאות שיש לפניהם מילים שמכריחות סימן ואלו זה וודאי ר"ת בפני עצמם.
    5. ואת כל השאר שנשארו ספק לסמן בסגנון נפרד ולעבור עליהם ידנית.

    כעת עומדות לפני 2 שאלות:

    1. האם לעשות את הטבלה באקסס או באקסל?
    2. היות ויש לי עשרות קבצים כאלו (למעלה ממאה) האם לעשות קוד באקסס \ אקסל שיגש לקובץ וורד או ליצור קוד בוורד שיגש לdb שלו שזה אקסס \ אקסל.

  • חלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד
    אורייא אוריי

    @davidnead כתב בחלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד:

    רצויה היכרות טובה מאוד עם ביטויים רגולריים

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


  • חלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד
    אורייא אוריי

    עלה לי כעת עוד מחשבה ע"פ מש"כ @קומפיונט
    שאני יכול ליצור קוד שיחזיר לי את כל הר"ת בכל המסמכים לתוך טבלת אקסל, ופשוט לעבור אחד אחד ולחלק ל3 קטגוריות

    1. צריך להשאיר.
    2. ודאי למחוק.
    3. ספק.

    לאחר מכן על הספק לעשות בדיקה איזו מילה יש לו לפני ולפי"ז למחוק או להשאיר ומה שנשאר בספק שיסמן לי אותו בסגנון נפרד ולעבור ע"ז ידנית.

    השאלה היא האם זו הדרך הנכונה?
    והאם זה לא מידי אגרסיבי לקוד vba החלש לעשות מליוני פעולות בצורה כזו?

    עריכה: ראוי לציין שהחומר הוא די עקבי ...


  • חלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד
    אורייא אוריי

    @davidnead כתב בחלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד:

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

    @אוריי כתב בחלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד:

    לעבור על למעלה מכמה מיליוני מילים ואין הצר שווה ...


  • חלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד
    אורייא אוריי

    @Y-Excel-Access כתב בחלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד:

    משמעותי מאוד איך סיכמת את החומר

    למה כוונתך?

    @Y-Excel-Access כתב בחלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד:

    יש לך דוגמה שאפשר להראות שהיא מספיק משקפת?

    מקור הלכה 45.doc

    @Y-Excel-Access כתב בחלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד:

    נ.ב. אשמח מאוד לראות את הקוד שלך, גם אם לא כיסה הכל...

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


  • חלום \ אתגר | זיהוי ראשי תיבות של סימני מקורות בקבצי וורד
    אורייא אוריי

    יש לי מלא קבצים עם מלא מקורות לסימנים בשו"ע או תשובות בשו"ת או אותיות וכו'
    בקבצים האלו המקורות מסומנים בצורה כזו לדוגמא סי' שח כתוב כך ש"ח עם גרשיים ואם זה סימן ח זה כתוב כך ח'
    כעת אני רוצה להוריד את כולם ולעבור על למעלה מכמה מיליוני מילים ואין הצר שווה ... 🙄 🙄
    הבעיה היא שיש מלא סוגי "

    1. יש הדגשה "הדגשה"
    2. יש ראשי תיבות סתמיים במסמך
    3. יש " שיש אותם גם בראשי תיבות וגם בסימנים לדוגמא ר"ס זה יכול להיות גם ריש סימן וגם סי' רס.
      האם יש איה סיכוי לאיזה רצף קוד שיכול לעשות את המירב (או שזה ממש בגדר בינה מלאכותית... אולי המומחים ידעו לומר איפה זה אוחז שם .. 🙂 )

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

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


  • עזרה בחיפוש והחלפה בוורד
    אורייא אוריי

    @yossiz
    תודה רבה
    זה פשוט חסך לי לעשות חפש את הבא בכל פעם..


  • עזרה בחיפוש והחלפה בוורד
    אורייא אוריי

    @yossiz כוונתך לכך?
    d415e453-cf95-4292-9e50-b8cc0561dc13-image.png
    כי זה לא עובד


  • עזרה בחיפוש והחלפה בוורד
    אורייא אוריי

    מצאתי איך אני יכול למצוא
    אבל א"א להחליף את זה
    אני רוצה שבהחלפה הוא יתעלם מהאותיות..

    ^p^$].
    

  • עזרה בחיפוש והחלפה בוורד
    אורייא אוריי

    אני רוצה לעשות מחיקה של כל הסוגר ] שיש לי בתחילת פיסקאות אחרי מספור של אותיות
    לדוגמא
    א]. ב]. ג]. וכו'
    875b37ac-358f-43e9-a4de-7cf6f9384269-image.png
    מה שאני צריך לעשות זה חיפוש של סימון פיסקה ואז תו\ים כל שהם ואז ]. , ולעשות ע"ז החלפה הבעיה היא שאני לא יודע איך לחפש תו כל שהוא..
    כך זה אמור להיראות חוץ מהסימן שאלה שצריך להחליף אותו
    ^p ? ].


  • איחוד קבצי שיטס
    אורייא אוריי

    @יהודי-טוב גוגל פורומס הדרך הפשוטה והקלה עי' במדריך הבא


  • מאיפה אני יכול לשלוט על רשימות מספור של וורד
    אורייא אוריי

    @dovid כוונתך למה ש@yossiz כתב לגבי vba?


  • מאיפה אני יכול לשלוט על רשימות מספור של וורד
    אורייא אוריי

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


  • הפיכת אותיות למספרים באקסל
    אורייא אוריי

    יש בעיה קטנה בקוד ש @פייתוניסט עשה, שהוא לא מטפל באותיות "טו" וב "טז"
    אני עשיתי לעצמי תיקון לקוד
    אז הנה השיתוף של הקוד לטבת המשתתפים

    Function GIMATRIA(x)
    
        G = ""
        TV = Int(x / 400)
        For i = 1 To TV
            G = G & "ת"
        Next i
        x = x - (TV * 400)
        TV = Int(x / 300)
        For i = 1 To TV
            G = G & "ש"
        Next i
        x = x - (TV * 300)
        TV = Int(x / 200)
        For i = 1 To TV
            G = G & "ר"
        Next i
        x = x - (TV * 200)
        TV = Int(x / 100)
        For i = 1 To TV
            G = G & "ק"
        Next i
        x = x - (TV * 100)
        TV = Int(x / 90)
        For i = 1 To TV
            G = G & "צ"
        Next i
        x = x - (TV * 90)
        TV = Int(x / 80)
        For i = 1 To TV
            G = G & "פ"
        Next i
        x = x - (TV * 80)
        TV = Int(x / 70)
        For i = 1 To TV
            G = G & "ע"
        Next i
        x = x - (TV * 70)
        TV = Int(x / 60)
        For i = 1 To TV
            G = G & "ס"
        Next i
        x = x - (TV * 60)
        TV = Int(x / 50)
        For i = 1 To TV
            G = G & "נ"
        Next i
        x = x - (TV * 50)
        TV = Int(x / 40)
        For i = 1 To TV
            G = G & "מ"
        Next i
        x = x - (TV * 40)
        TV = Int(x / 30)
        For i = 1 To TV
            G = G & "ל"
        Next i
        x = x - (TV * 30)
        TV = Int(x / 20)
        For i = 1 To TV
            G = G & "כ"
        Next i
        If x = 15 Then
            G = G & "טו"
        Else
            If x = 16 Then
                G = G & "טז"
            Else
                
                x = x - (TV * 20)
                TV = Int(x / 10)
                For i = 1 To TV
                    G = G & "י"
                Next i
                x = x - (TV * 10)
                TV = Int(x / 9)
                For i = 1 To TV
                    G = G & "ט"
                Next i
                x = x - (TV * 9)
                TV = Int(x / 8)
                For i = 1 To TV
                    G = G & "ח"
                Next i
                x = x - (TV * 8)
                TV = Int(x / 7)
                For i = 1 To TV
                    G = G & "ז"
                Next i
                x = x - (TV * 7)
                TV = Int(x / 6)
                For i = 1 To TV
                    G = G & "ו"
                Next i
                x = x - (TV * 6)
                TV = Int(x / 5)
                For i = 1 To TV
                    G = G & "ה"
                Next i
                x = x - (TV * 5)
                TV = Int(x / 4)
                For i = 1 To TV
                    G = G & "ד"
                Next i
                x = x - (TV * 4)
                TV = Int(x / 3)
                For i = 1 To TV
                    G = G & "ג"
                Next i
                x = x - (TV * 3)
                TV = Int(x / 2)
                For i = 1 To TV
                    G = G & "ב"
                Next i
                x = x - (TV * 2)
                TV = Int(x / 1)
                For i = 1 To TV
                    G = G & "א"
                Next i
                x = x - (TV * 1)
            End If
        End If
        GIMATRIA = G
        
    End Function
    

  • הפיכת אותיות למספרים באקסל
    אורייא אוריי

    @yossiz אני עקבתי אחר ההוראות..
    אבל עדיין זה לא עובד לי
    כוונתי שזה לא עובד בתור פונקציה מקומית באקסל אבל בקוד כשלעצמו עובד לכל דבר
    אני אישית הסתדרתי כי צירפתי את הפונקציה לקוד vba אחר וזה עבד לי...


  • הפיכת אותיות למספרים באקסל
    אורייא אוריי

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


  • הפיכת אותיות למספרים באקסל
    אורייא אוריי

    @פייתוניסט
    הפונקציה מחזירה שגיאה
    caaa4f78-6d3a-4a75-a8d6-1c83b020f5b9-image.png


  • מיזוג כמה קבצי וורד לקובץ אחד בקוד vba
    אורייא אוריי

    @מאקרו תודה רבה כעת הוא מכניס לי את הקבצים לפי הסדר
    רק מה שנותר לי זה שמירה של הקובץ בשם


  • מיזוג כמה קבצי וורד לקובץ אחד בקוד vba
    אורייא אוריי

    בניסיון להעביר את הסמן לסוף המסמך מצאתי את הקוד הזה

    Selection.EndKey Unit:=wdStory
    

    מהמדריך הבא

    אמנם לאחר שהכנסתי את זה לקוד באופן הבא

        Set objDoc = objWord.Documents.Add
        myPath = "C:\Users\User\Desktop\experience\"
        myFile = Dir(myPath & "*.docx", vbNormal + vbReadOnly + vbHidden)
        While myFile <> ""
            With objDoc.Bookmarks("\StartOfDoc").range
                .InsertFile FileName:=myPath & myFile, _
                    ConfirmConversions:=False, Link:=False, Attachment:=False
        Selection.EndKey Unit:=wdStory
            .InsertBreak Type:=2
            End With
            myFile = Dir()
        Wend
        objDoc.Characters(1).Delete
    End Sub
     
    

    הסמן אינו עובר לסוף המסמך כלל.... 😞

    מבדיקה בstackoverflow נראה שזה באג של וורד שאין לו תקנה (מקווה שלא)...


  • מיזוג כמה קבצי וורד לקובץ אחד בקוד vba
    אורייא אוריי

    אני רוצה למזג כמה קבצי וורד שמעוצבים באותו הסגנון לקובץ 1.
    מצאתי את הקוד הזה

    Sub MergeALL()
        Dim objWord As Object
        Dim objDoc As Object
        Dim myPath As String, myFile As String
    
        Set objWord = CreateObject("Word.Application")
        objWord.Visible = True
    
        Set objDoc = objWord.Documents.Add
        myPath = "C:\Users\User\Desktop\experience\"
        myFile = Dir(myPath & "*.docx", vbNormal + vbReadOnly + vbHidden)
        While myFile <> ""
            With objDoc.Bookmarks("\StartOfDoc").range
                .InsertFile FileName:=myPath & myFile, _
                    ConfirmConversions:=False, Link:=False, Attachment:=False
                .InsertBreak Type:=2
            End With
            myFile = Dir()
        Wend
        objDoc.Characters(1).Delete
    End Sub
    
    

    אמנם הקוד הזה עושה את העבודה אבל שני חלקים חסרים לי שלא הצלחתי לשנות.

    1. הקוד הזה מכניס את הקבצים הפוך (מבדיקה שלי הוא מכניס את הקובץ הראשון ומעליו הוא מכניס את הקובץ השני וכו') כך מה שצריך זה שלאחר העתקה הסמן יעבור לאחר הטקסט יוסיף מעבר מקטע ויעתיק את הקובץ הבא.
    2. סגירה ושמירה של הקובץ בנתיב הנ"ל בשם אחר.
  • 1 / 1
  • התחברות

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

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