להורדה | תוסף וורד תורני

[מבקש אמונה]

איך מסירים את התוסף?

[pcinfogmach]

@מבקש-אמונה
יש למחקו מתוך תיקייה זו

%AppData%\Microsoft\Word\STARTUP

[יהודי צעיר]

@האדם-החושב כתב בלהורדה | תוסף וורד תורני:

הורדה
גירסא 13.2.exe

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

[האדם החושב]

@יהודי-צעיר הושמט.

[shishko]

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

[אלכסון]

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

1. קורה הרבה שבמקום שלוש נקודות כותבים בטעות ארבע, אפשר לחפש ".{4,}" ולהחליף ב "..."
2. ",." - מצוי לאחר תיקונים וכו' (שיחליף לנקודה או ימחק את שניהם וישאיר סימן אחר כדי לתקן)

[אלכסון]

@אלכסון כתב בלהורדה | תוסף וורד תורני:

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

1. קורה הרבה שבמקום שלוש נקודות כותבים בטעות ארבע, אפשר לחפש ".{4,}" ולהחליף ב "..."
2. ",." - מצוי לאחר תיקונים וכו' (שיחליף לנקודה או ימחק את שניהם וישאיר סימן אחר כדי לתקן)

דבר נוסף שראיתי בקובץ שעבדתי עליו כעת ומצוי יחסית - רווח לפני סוגר סוגר כזה: "^32)"

[pcinfogmach]

@אלכסון כתב בלהורדה | תוסף וורד תורני:

דבר נוסף שראיתי בקובץ שעבדתי עליו כעת ומצוי יחסית - רווח לפני סוגר סוגר כזה: "^32)"

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

[shishko]

@אלכסון כתב בלהורדה | תוסף וורד תורני:

קורה הרבה שבמקום שלוש נקודות כותבים בטעות ארבע, אפשר לחפש ".{4,}" ולהחליף ב "..."

ניתן לעשות שהמחשב יחליף זאת בתיקון אוטומטי כמו כאן https://support.microsoft.com/he-il/office/הוספה-או-הסרה-של-ערכי-תיקון-שגיאות-אוטומטי-ב-word-e7433b94-f3de-4532-9dc8-b29063a96e1f
כמו כן אתה יכול בעצמך לעשות הפעל הקלטת מאקרו לעשות החלפה של .... ל ... ולעצור הקלטה

[ישי ב]

@האדם-החושב כתב בלהורדה | תוסף וורד תורני:

הכנתי תבנית שכוללת הרבה מהמאקרואים שהתפרסמו כאן בפורום ,עיקרם לקוחים מהפוסט [הזה]
גירסא 13.2.exe

הוראות התקנה:

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

כנסו למאפייני הקובץ ובטלו חסימה

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

@דאנציג הכין מדריך ,מוזמנים להוסיף

• קישור לגוגל דוקס [פתוח במצב הצעה]
• מדריך וורד תורני.docx

התקנתי את הגירסה האחרונה, וזה שיבש לי את הוורד, הוא נותן לי בכל פתיחה את זה: ואני לא יודע איך לאפשר את זה, ובמאפייני הקובץ חסר לי השאלה של האבטחה כך שאני לא יכול לבטל את האבטחה
תודה
@מאקרו

[דאנציג]

@ישי-ב
ברוך הבא לפורום!!!
א' מומלץ לקרוא את חוקי הפורום!

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

[ששמעון]

@האדם-החושב כתב בלהורדה | תוסף וורד תורני:

@ששמעון כשלחצתי על הודעה מפורטת קיבלתי את זה:

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

Option Explicit

Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As LongPtr, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongPtr

Sub חיפוש_ספרים()
    Selection.Copy 'העתק בחירה
    Dim url As String
    url = "https://tablet.otzar.org/#/" 'Replace with the URL of the webpage you want to open
    ShellExecute 0, "open", url, vbNullString, vbNullString, vbNormalFocus 'פתח את אוצר החכמה
    SendKeys "{F2}", True 'פתח חיפוש
    SendKeys "^a", True 'בחר טקסט קיים
    SendKeys "^v", True ' הדבק
    SendKeys "{ENTER}", True 'בצע חיפוש
End Sub

Option Explicit

Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As LongPtr, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongPtr

Sub חיפוש_בספרים()
    Selection.Copy 'העתק בחירה
    Dim url As String
    url = "https://tablet.otzar.org/#/" 'Replace with the URL of the webpage you want to open
    ShellExecute 0, "open", url, vbNullString, vbNullString, vbNormalFocus 'פתח את אוצר החכמה
    SendKeys "{F3}", True 'פתח חיפוש
    SendKeys "^a", True 'בחר טקסט קיים
    SendKeys "^v", True ' הדבק 
    SendKeys "{ENTER}", True 'בצע חיפוש
End Sub

השאלה היא איך ניתן לפתוח דף פתוח בדפדפן בלי לפתוח דף חדש או איך לעשות שהוא יחכה מספר שניות עד הפעולה הבאה

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

[האדם החושב]

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

[דאנציג]

@האדם-החושב
https://mitmachim.top/post/854370

[בס"ד]

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