בירור | ניקוי קובץ טקסט מתווים מיותרים

[מישהו12]

@משחזר-מידע כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

@מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

כי חלק מה " אני רוצה לשמור

במקרה כזה הייתי מחליף קודם את ה" עם משהו יחודי כמו 123אבג
ולאחר מכן מוריד את כל האנטרים
ולאחר מכן...

לא הבנתי. (זה קובץ ארוך, ויש מעט מאוד " בתוכו שאני רוצה לשמור) איך זה יעזור

[מישהו12]

@צדיק-תמים זה אכן json (אם כי שיניתי בו כמה דברים אז יתכן ששברתי את הקוד
אעלה בהמשך דוגמא, אני פשוט ממחשב אחר כרגע.
תודה לכולם!

[menajemmendel]

@דאנציג לא הסברתי איך עושים את זה, כי סמכתי ש @מישהו12 מבין הרבה מאד במחשבים [כך מוכח מהרבה פוסטים שלו, נראה לי שהוא מתכנת]
כדי לחפש מ{ עד המילה text
בחפש והחלף (CTRL+H) חפש:
{*text
ותסמן תווים כללים,

אם אתה רוצה שיתפוס גם את המרכאות והנקודותיים והרוווח שהחרי TEXT אז תכתוב בחיפוש
{*text":
ועל זה הדרך

הסבר: תאויים כללים עושה שיוכל לחפש קודים
הכוכבית * אומר תחפש מX לY
לפי זה בעיקרון הייתה צריך לכתוב רק {*text אבל מכיון שה{ הוא קוד, צריך לעשות לפניו בקסלש \ כדי שהמחשב יבין שזה לא קוד (כמו בפייטון כשרוצים ש" יהיו סטרינג)

[משחזר מידע]

@מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

ויש מעט מאוד " בתוכו שאני רוצה לשמור

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

[menajemmendel]

@menajemmendel באופן כללי, אתה יכול לעבוד באופן הופך,
[ככה אני עושה]
לחפש איזה מזהה בתוך מה שאתה רוצה במקרה שלנו יהיה מ TEXT": עד המרכאות הבאות
והחלף להגיד שיהיו בולד (לעמוד שם ולעשות CTRL+B
ואחרי זה למחוק את כל הלא בולד
ועל זה הדרך

[מישהו12]

@משחזר-מידע כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

@מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

ויש מעט מאוד " בתוכו שאני רוצה לשמור

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

@מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

אבל זה כאלו שאין אחריהם\לפניהם אנטר. אז האנטר בעצם מהווה סימן זיהוי

[מקצועי_]

@מישהו12

ממש פשוט

פה תדביק את תוכן הקובץ ותקבל פלט נקי מתווים אחרים אבל עם הרבה רווחים.

לאחר מכן, קח את כל הפלט, תדביק אותו פה ותקבל נקי בלי רווחים כפולים

[דאנציג]

@מקצועי_ כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

פה תדביק את תוכן הקובץ ותקבל פלט נקי מתווים אחרים אבל עם הרבה רווחים.

זה לא יעזור לר"ת...
או לאותיו' עם גרש וכדו'...

[מקצועי_]

@דאנציג כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

@מקצועי_ כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

פה תדביק את תוכן הקובץ ותקבל פלט נקי מתווים אחרים אבל עם הרבה רווחים.

זה לא יעזור לר"ת...
או לאותיו' עם גרש וכדו'...

מלכתחילה @מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

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

כל הסימנים פירושו הכל כולל הכל.

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

[מישהו12]

@מקצועי_ כאמור בהמשך

@מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

כי חלק מה " אני רוצה לשמור, אבל זה כאלו שאין אחריהם\לפניהם אנטר. אז האנטר בעצם מהווה סימן זיהוי

בכל מקרה, בהמשך אעלה דוגמא מהקובץ ונראה לי שזה יהיה יותר יעיל, תודה לכל המסייעים

[מקצועי_]

@מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

@מקצועי_ כאמור בהמשך

@מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

כי חלק מה " אני רוצה לשמור, אבל זה כאלו שאין אחריהם\לפניהם אנטר. אז האנטר בעצם מהווה סימן זיהוי

בכל מקרה, בהמשך אעלה דוגמא מהקובץ ונראה לי שזה יהיה יותר יעיל, תודה לכל המסייעים

לא צריך שום דוגמה, רק תרשום בדיוק איזה תווים אתה רוצה להשאיר ואתקן את הרגקס בהתאם.

[מישהו12]

מצורפת דוגמא
דוגמא.txt
@מקצועי_ מה שאני רוצה שימחק מסומן כאן

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

[menajemmendel]

@מישהו12 >
תעתיק הכל לוורד
ותריץ את הפקודת מאקרו הזו (אני מאמין שמתכנת דגול כמוך יסתדר עם פקודת מאקרו פשוטה)
כדי לפתוח VBA תלחץ בוורד על ALT F11

Sub Macro9()

    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    Selection.Find.Replacement.font.Bold = True
    With Selection.Find
        .Text = """text"": ""*""^13"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchKashida = False
        .MatchDiacritics = False
        .MatchAlefHamza = False
        .MatchControl = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    Selection.Find.ClearFormatting
    Selection.Find.font.Bold = False
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = ""
        .Replacement.Text = "^p"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchKashida = False
        .MatchDiacritics = False
        .MatchAlefHamza = False
        .MatchControl = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = """text"": """
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchKashida = False
        .MatchDiacritics = False
        .MatchAlefHamza = False
        .MatchControl = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = """^p"
        .Replacement.Text = "^p"
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchKashida = False
        .MatchDiacritics = False
        .MatchAlefHamza = False
        .MatchControl = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

יצא לך תוצאה כזו

ומכאן תוכחה מגולה לכל הרועים בשדות זרים, תוכנות זרות ומוזרות שלא שיערום אבותינו REGEX וכו' , ועוזבים את המסרות המסורה לנו מדור דור, להשתמש בוורד לדברים פשוטים

[מישהו12]

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

[menajemmendel]

@מישהו12
תיקנתי תנסה עכשיו

[מישהו12]

@menajemmendel כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

@מישהו12
תיקנתי תנסה עכשיו

עכשיו זה שומר את כל הגרשיים

[MGM IVR]

@מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

@menajemmendel כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

@מישהו12
תיקנתי תנסה עכשיו

עכשיו זה שומר את כל הגרשיים

זה עדיין עובד, יש לך עניין דווקא בדרך החלפה. או בתוצאה?
https://mitmachim.top/post/757976

[צדיק תמים]

@מישהו12 אני עדיין לא מבין את הרעיון המוזר לפרסר JSON באמצעות חיפוש והחלפה לסוגיו כאילו שזה טקסט רגיל

[מישהו12]

@צדיק-תמים יש לי עניין בתוצאה, לא מעניין אותי הדרך...

[ישראל 142]

@מישהו12 כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

@menajemmendel כתב בבירור | ניקוי קובץ טקסט מתווים מיותרים:

@מישהו12
תיקנתי תנסה עכשיו

עכשיו זה שומר את כל הגרשיים

אז עכשיו אתה יכול לעשות החלפה של כל הרגשיים שיש לפניהם או אחריהם רווח -ברווח לבד, ואז כל הרגשיים שבתוך מילה ישארו