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

[האדם החושב]

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

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

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

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

[ששמעון]

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

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

אז בעצם אני כן צודק בהשערה שלי?
בעבר קיבלתי איזה קובץ באט בשביל הרצת התקנה של הרבה מסמכי 'אנקי' בזה אחר זה, ושם היה אפשר להגדיר שיחכה כמה שניות.
קיבלתי את זה מ @NH-LOCAL אולי הוא ימצא את זה.

[האדם החושב]

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

אז בעצם אני כן צודק בהשערה שלי?

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

[ששמעון]

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

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

אז בעצם אני כן צודק בהשערה שלי?

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

לא מתמצא בפרטים,
אבל גם באופליין זה לוקח זמן.

[NH.LOCAL]

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

קיבלתי את זה מ @NH-LOCAL אולי הוא ימצא את זה.

תגובה 1
תגובה אחרונה לפני 3 שעות

הגדרה של המתנה של מספר שניות בשורת הפקודה היא מאוד פשוטה, הנה דוגמה:

timeout 3

קוד זה מגדיר השהייה של הפקודות למשך 3 שניות. וכן הלאה

[האדם החושב]

@NH-LOCAL

איך בדיוק אני אמור להגדיר את זה?

[NH.LOCAL]

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

עריכה: לכאורה זה אמור לעבור:
WScript.Sleep 3000

שים לב שהמספר הוא באלפיות השנייה, כך ש-3000 זה למעשה 3 שניות

[סוד כמוס]

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

[האדם החושב]

בס"ד מרובה:
גיר' 12 [בפוסט המקור]
בגיר' זו המאקרואים חולקו גם בין הלשוניות הקיימות בוורד, כל מאקרו לפי עניינו
שימו לב שבכפתור החלפה המקורי של וורד הוכנסו הרבה מאקרואים בתפריט הנפתח
נוספו בגיר' זו:
א' מספור הערות שוליים של @ASDF1345
ב' כל המאקרואים החדשים של @pcinfogmach [נכון לגיר' 6.0]
ג' תוסף גופנים [בלשונית בית]
ד' בתיקון שגיאות נוסף כפתור שמריץ את כל תיקוני השגיאות [על פניו לא ראיתי שגיאות כלשהן ,אבל ייתכנו סתירות בין המאקרואים השונים]
ה' מספור עמודים בלי בעיית באג תשצ"ג וכן מספור עמודים סגנון תלמוד בבלי עמוד א' ועמוד ב' [נמצא בגלריית מספרי עמודים,מיקום נוכחי] ,מעניין האם ניתן להשתמש בזה גם למספור הערות
לגבי חיפוש באוצר החכמה ובבר אילן ,נמצא עדיין בפיתוח ,יעוי' כאן ,כאן וכן בכמה פוסטים בשרשור זה ,מי שיכול לסייע לעניין תבא עליו ברכה ושכרו כפול מן השמים

[הרב יעקב ישראל]

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

מעניין האם ניתן להשתמש בזה גם למספור הערות

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

[משהו חדש]

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

[pcinfogmach]

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

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

עריכה:
עיין כאן (הקוד מוכן)
https://mitmachim.top/post/648526
מי שרוצה בתבנית יש כאן
https://mitmachim.top/post/648511

[pcinfogmach]

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

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

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

[דאנציג]

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

הוצרכתי לעשות מספרים ולא אותיות.

אם אתה יכול לעבוד עם שדות SEQ יש שדה מעל שצב.

[שמחת ישראל]

הסתבכתי כבר בכל התכתובת הנ"ל, מישהו יכול להעלות את הגירסא העדכנית של ה"וורד תורני" הנ"ל?

[משהו חדש]

@שמחת-ישראל הגירסא האחרונה מובאת בהתחלת הפוסט - גירסא 12. לא ראית?

[שמחת ישראל]

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

הסתבכתי כבר בכל התכתובת הנ"ל, מישהו יכול להעלות את הגירסא העדכנית של ה"וורד תורני" הנ"ל?

אה, תודה, לא ידעתי שזה מתעדכן מתחילתו.
אבל הקובץ של ההתקנה לא יורד לי, אלא רושם לי:
מה עושים?

[משהו חדש]

@שמחת-ישראל אני לא רואה תמונה ששלחת, כי יש לי נטפרי

[משהו חדש]

@pcinfogmach הסתדרתי תודה, אני פשוט נכנסתי למרכז יחסי אמון ואז הרשאתי את כל התוספים. ואז זה עבד לי.

[הרב יעקב ישראל]

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

אם אתה יכול לעבוד עם שדות SEQ יש שדה מעל שצב.

מה הכוונה?