שיתוף | שרשור חיפוש והחלפה בוורד - אילתורים מקצועיים בוורד
-
@poker כתב בשיתוף | שרשור חיפוש והחלפה בוורד - אילתורים מקצועיים בוורד:
@pcinfogmach
דבר ראשון תודה ענקית על היוזמה שלך.
שאלה קטנה שמטרידה אותי זמן רב במקרה שיש לי 'אנטרים' מיותרים לאורך כל המסמך, ואני רוצה מחוק אותם באמצעות 'חפש והחלף'.
כיצד עושים זאת???יש שני אפשרויות:
- חפש את ^p^p, החלף ב ^p, [וצריך לחזור על הפעולה כמה פעמים עד שהכל מסתדר].
- חפש את ^13{2,} [וצריך לסמן השתמש בתווים כלליים], החלף ב ^13, [ובאופן זה הכל מסתדר בפעם אחת].
בנוסף לזה יש לי מאקרו מיוחד שמתקן את זה באופן אוטומטי על כל המסמך, וגם מוחק כל רווח מיותר לפני או אחרי פסקא.
Sub מחיקת_פסקאות_כפולות() ' ' DeletingEmptyParagraphs Macro ' מחיקת פסקאות ריקות ' Selection.Find.ClearFormatting With Selection.Find .Text = "^$" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .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 Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = " {1,}^13" .Replacement.Text = "^13" .Forward = True .Wrap = wdFindContinue .Format = False .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.Replacement.ClearFormatting With Selection.Find .Text = "^13 {1,}" .Replacement.Text = "^13" .Forward = True .Wrap = wdFindContinue .Format = False .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.Replacement.ClearFormatting With Selection.Find .Text = "^13{2,}" .Replacement.Text = "^13" .Forward = True .Wrap = wdFindContinue .Format = False .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 End Sub@מניין @pcinfogmach
ההחלפה הזאת מוצאת אבל לא מחליפה
מדוע? -
@מניין @pcinfogmach
ההחלפה הזאת מוצאת אבל לא מחליפה
מדוע? -
@מניין @pcinfogmach
ההחלפה הזאת מוצאת אבל לא מחליפה
מדוע?@אפי-זינגר
בתיבת ההחלפה אי אפשר להזין תוווים כלליים רק את התווים המיוחדים של וורד -
יש אפשרות להוספת שתי 2 אפסים (או כל מספר אחר) לפני מספרים מסוימים במסמך וורד לפי בחירה לדוגמה: 32,33,34 יהיו 0032, 0033, 0034
@יואל-ברגר כן, מה בעיה לעושת חפש והחלף רגיל
לדוגמא אם אתה רוצה להחליף 33 ל0033 אז בחפש תכתוב 33 (עם רווח אחר כך, ונקודה וכו' כי אחרת יחליף גם ל335 וכו'). ובהחלף תכתוב 0033 רווח -
@יואל-ברגר כן, מה בעיה לעושת חפש והחלף רגיל
לדוגמא אם אתה רוצה להחליף 33 ל0033 אז בחפש תכתוב 33 (עם רווח אחר כך, ונקודה וכו' כי אחרת יחליף גם ל335 וכו'). ובהחלף תכתוב 0033 רווח@menajemmendel
תודה, אבל התכוונתי לאפשרות של הגדרת החלפה לרצף של מספרים שנבחר מראש, נגיד מ-32 עד 255 להוסיף אפסים שיהיו מספרים עם ארבע ספרות, לדוגמה: מ- 32, 125, 255, להחליף ל- 0032, 0125, 0255,
או בטבלה אפשרות של בחירה ושינוי מספרים של טור או שורה מסוימת כנ"ל
ולא החלפה של כל המספרים במסמך -
@menajemmendel
תודה, אבל התכוונתי לאפשרות של הגדרת החלפה לרצף של מספרים שנבחר מראש, נגיד מ-32 עד 255 להוסיף אפסים שיהיו מספרים עם ארבע ספרות, לדוגמה: מ- 32, 125, 255, להחליף ל- 0032, 0125, 0255,
או בטבלה אפשרות של בחירה ושינוי מספרים של טור או שורה מסוימת כנ"ל
ולא החלפה של כל המספרים במסמך@יואל-ברגר
תשתמש בחיפוש והחלפה של כלי קודש שמה יש אפשרות להתשמש עם רגקס
https://kleikodesh.github.io/
שלום! נראה שהשיחה הזו מעניינת אותך, אבל עדיין אין לך חשבון.
נמאס לכם לגלול בין אותם הפוסטים בכל ביקור? כשנרשמים לחשבון, תמיד תחזרו בדיוק למקום שבו הייתם קודם, ותוכלו לבחור לקבל התראות על תגובות חדשות (בין אם במייל, ובין אם בהתראת פוש). תוכלו גם לשמור סימניות ולפרגן ב-upvote לפוסטים כדי להביע הערכה לחברי קהילה אחרים.
בעזרת התרומה שלך, הפוסט הזה יכול להיות אפילו טוב יותר 💗
הרשמה התחברות { const baseUrl = "https://www.google.co.il/search?q=site:mitmachim.top"; const m = location.pathname.match(/^\/(topic|category)\/(\d+)/); const type = m ? m[1] : null; const id = m ? m[2] : null; let searchInput; function search(path = "") { const query = searchInput.value.trim(); if (query) { window.open(`${baseUrl}${path}%20${encodeURIComponent(query)}`, "_blank"); } } let buttons = {}; buttons.searchAll = { id: "bb-search-all", label: `חיפוש ${type ? "בכל הפורום" : ""}`, className: type ? "btn-secondary" : "btn-primary", callback: () => search(), }; if (type === "topic") { buttons.searchTopic = { label: "חיפוש בנושא זה", className: "btn-primary", callback: () => search(`/topic/${id}`), }; } else if (type === "category") { buttons.searchCategory = { label: "חיפוש בקטגוריה זו", className: "btn-primary", callback: () => search(`/category/${id}`), }; } buttons.cancel = { label: "ביטול", className: "btn-default", "data-bs-dismiss": "modal" }; const dialog = bootbox.dialog({ title: '<div style="text-align:center;"><img src="/assets/uploads/files/1625950269825-mt-google.png" width="400" alt="חיפוש בגוגל"></div>', message: '<input id="bb-inp" class="bootbox-input bootbox-input-text form-control" placeholder="הקלידו כדי לחפש בגוגל" autocomplete="off"/>', buttons, backdrop: true, show: true, onEscape: true }); dialog.on("shown.bs.modal", function () { searchInput = document.getElementById("bb-inp"); if (searchInput) { searchInput.focus(); searchInput.addEventListener("keydown", function (e) { if (e.key === "Enter") { e.preventDefault(); const query = this.value.trim(); if (query) { search(); dialog.modal("hide"); } } else if (e.key === "Escape") { e.preventDefault(); dialog.modal("hide"); } }); } const searchAllButton = document.getElementById("bb-search-all"); if (searchAllButton) { searchAllButton.title = "לחצו על אנטר כדי לחפש"; } }); })(); void 0;){kind=link}