שיתוף | מאקרו לשמירה אוטומטית בוורד
-
https://wordribbon.tips.net/T010361_A_Real_AutoSave.html
שלושה מאקרוים שאמורים לפעולSub AutoOpen() WordSaver End SubSub WordSaver() Application.OnTime When:=Now + _ TimeValue("00:10:00"), _ Name:="Saver" End SubSub Saver() ActiveDocument.Save WordSaver End Sub -
@זאב-לבן לכאורה כן, אבל אני עדיין מנסה להבין אם זה פועל, בינתיים אני עוד לא מצליח
עדכון
זה עובד, ותוכל להחליף את ה10 דקות ל01 אם תרצה כל דקה -
@זאב-לבן אתה צריך את שלושתם יחד, פשוט תדביק לאותו חלון בvisual basic ושמור, ויווצרו שלושה מאקרו, וכשאתה יוצר תדאג שזה יהיה לכל המסמכים:
:::
הפיכת מאקרו לזמין בכל המסמכים
כדי להפוך מאקרו ממסמך אחד לזמין בכל המסמכים החדשים, הוסף אותו לתבנית Normal.dotm.פתח את המסמך המכיל את המאקרו.
לחץ על תצוגה > פקודות מאקרו > הצג פקודות מאקרו.
הפקודה 'הצג פקודות מאקרו'
לחץ על סדרן.
לחצן 'סדרן' בתיבה 'הצג פקודות מאקרו'
לחץ על המאקרו שברצונך להוסיף לתבנית Normal.dotm ולחץ על העתק.
:::
בדקתי בכך ששיניתי את זה לדקה אחת ונשמר לי כל דקה -
@זאב-לבן אתה צריך את שלושתם יחד, פשוט תדביק לאותו חלון בvisual basic ושמור, ויווצרו שלושה מאקרו, וכשאתה יוצר תדאג שזה יהיה לכל המסמכים:
:::
הפיכת מאקרו לזמין בכל המסמכים
כדי להפוך מאקרו ממסמך אחד לזמין בכל המסמכים החדשים, הוסף אותו לתבנית Normal.dotm.פתח את המסמך המכיל את המאקרו.
לחץ על תצוגה > פקודות מאקרו > הצג פקודות מאקרו.
הפקודה 'הצג פקודות מאקרו'
לחץ על סדרן.
לחצן 'סדרן' בתיבה 'הצג פקודות מאקרו'
לחץ על המאקרו שברצונך להוסיף לתבנית Normal.dotm ולחץ על העתק.
:::
בדקתי בכך ששיניתי את זה לדקה אחת ונשמר לי כל דקה -
https://wordribbon.tips.net/T010361_A_Real_AutoSave.html
שלושה מאקרוים שאמורים לפעולSub AutoOpen() WordSaver End SubSub WordSaver() Application.OnTime When:=Now + _ TimeValue("00:10:00"), _ Name:="Saver" End SubSub Saver() ActiveDocument.Save WordSaver End Sub@menis הלכתם רחוק...
קובץ > אפשרויות > שמירה > שמירה אוטומטית. -
@menis הלכתם רחוק...
קובץ > אפשרויות > שמירה > שמירה אוטומטית. -
https://wordribbon.tips.net/T010361_A_Real_AutoSave.html
שלושה מאקרוים שאמורים לפעולSub AutoOpen() WordSaver End SubSub WordSaver() Application.OnTime When:=Now + _ TimeValue("00:10:00"), _ Name:="Saver" End SubSub Saver() ActiveDocument.Save WordSaver End Sub -
@חיים-חי לא יודע לעשות סקריפט, אבל זה פשוט. אסביר שוב, בצורה ברורה יותר:
-
הורד את הקובץ המצורף de685e66-bbbd-4eee-95d3-eaeea2d98b67-Office תבניות.zip ולחץ על קיצור הדרך שמופיע בו
-
בחר במסמך Normal שמופיע לפניך, ועם תפריט ההקשר בחר ב'פתח'.
-
לחץ על אלט + F11
-
העתק את הקוד הבא
(אתה יכול לשנות את זמן השמירה האוטומטית, בערך הזמן. בדוגמא הזו זה כל 3 דקות)
הקוד עודכן בי"ז אייר תשפ"ב - לכל מי שצפה בפוסט לפני תאריך זה
-תיקון הודעת שגיאה בעת סגירת מסמך חדש, והוספת פירוט לקוד ע"פ מה שהבנתי למי שמעוניין קצת להבין…'בפתיחת וורד WordSaver פתיחה אוטומטית של Sub AutoOpen() WordSaver End Sub 'שמירה אוטומטית כל 3 דקות Sub WordSaver() Application.OnTime When:=Now + _ TimeValue("00:03:00"), _ Name:="Saver" End Sub 'עבור השמירה האוטומטית ,? Sub Saver() ActiveDocument.Save WordSaver End Sub 'שמירה אוטומטית בעת סגירת המסמך (מלבד במסמך חדש) Private Sub Document_Close() On Error Resume Next ActiveDocument.Save End Sub-
פשוט הדבק אותו בעורך הויזואל הפתוח
-
שמור וסגור.
כעת פתח מסמך שכבר שמרת בעבר (ששמור בתבנית נורמל - אם אין לך מושג מה כתבתי כעת, אתה יכול להתעלם), ונסה לשנות אותו ולסגור.
אם הוא יסגור אותו בלי לשאול אותך אודות השמירה, וישמור לך - הצלחת!!!
-
-
@menis הלכתם רחוק...
קובץ > אפשרויות > שמירה > שמירה אוטומטית.@תורה-צוה-לנו-משה כדאי לדעת שזה לא אמין בכלל, וכמעט תמיד כשצריך את זה - הוא לא שם בשבילך...
בדיוק כמו ביטוח לאומי...
כותב מניסיון אישי. אם מישהו חושב אחרת, אשמח לשמוע מדוע.
-
הכנתי בשבילך סירטון הסברה
איך עושים שמירה אוטומטית.mp4
בהצלחה. -
הכנתי בשבילך סירטון הסברה
איך עושים שמירה אוטומטית.mp4
בהצלחה.פוסט זה נמחק! -
פוסט זה נמחק!
-
@תורה-צוה-לנו-משה מדובר על שמירה אמיתית לא שמירה אוטומטית, עי' בתחילת הנושא
@dmp אמר בשיתוף | מאקרו לשמירה אוטומטית בוורד:
שמירה אמיתית
ושמירה אוטומית זה שקר? לא הבנתי...
@שלל אמר בשיתוף | מאקרו לשמירה אוטומטית בוורד:
כדאי לדעת שזה לא אמין בכלל
ב"ה שאני לא נצרך לזה. במקרים שאני הייתי מעורב, 100% הצלחה.
-
@חיים-חי לא יודע לעשות סקריפט, אבל זה פשוט. אסביר שוב, בצורה ברורה יותר:
-
הורד את הקובץ המצורף de685e66-bbbd-4eee-95d3-eaeea2d98b67-Office תבניות.zip ולחץ על קיצור הדרך שמופיע בו
-
בחר במסמך Normal שמופיע לפניך, ועם תפריט ההקשר בחר ב'פתח'.
-
לחץ על אלט + F11
-
העתק את הקוד הבא
(אתה יכול לשנות את זמן השמירה האוטומטית, בערך הזמן. בדוגמא הזו זה כל 3 דקות)
הקוד עודכן בי"ז אייר תשפ"ב - לכל מי שצפה בפוסט לפני תאריך זה
-תיקון הודעת שגיאה בעת סגירת מסמך חדש, והוספת פירוט לקוד ע"פ מה שהבנתי למי שמעוניין קצת להבין…'בפתיחת וורד WordSaver פתיחה אוטומטית של Sub AutoOpen() WordSaver End Sub 'שמירה אוטומטית כל 3 דקות Sub WordSaver() Application.OnTime When:=Now + _ TimeValue("00:03:00"), _ Name:="Saver" End Sub 'עבור השמירה האוטומטית ,? Sub Saver() ActiveDocument.Save WordSaver End Sub 'שמירה אוטומטית בעת סגירת המסמך (מלבד במסמך חדש) Private Sub Document_Close() On Error Resume Next ActiveDocument.Save End Sub-
פשוט הדבק אותו בעורך הויזואל הפתוח
-
שמור וסגור.
כעת פתח מסמך שכבר שמרת בעבר (ששמור בתבנית נורמל - אם אין לך מושג מה כתבתי כעת, אתה יכול להתעלם), ונסה לשנות אותו ולסגור.
אם הוא יסגור אותו בלי לשאול אותך אודות השמירה, וישמור לך - הצלחת!!!
-
-
- פשוט הדבק אותו בעורך הויזואל הפתוח
קודם כל תודה רבה, אבל היכן ואיך אני מדביק את זה?
זה מה שנפתח לי:
@חיים-חי תלחץ על הפלוס של Normal שבחלונית הקטנה, אח"כ על הפלוס של Mivrosoft Word Objects, ואח"כ על ThisDocument. וכאן תדביק את הקוד
הנה תמונה להמחשה:
נ.ב. ממליץ אח"כ לנעול את המאקרו בשביל הנוחות - זה יהיה יותר נוח, כאשר תרצה לבטל שמירה של מסמך חדש שלא נשמר אף פעם.
בשביל זה לחץ על Tools, אח"כ על normal Properties..., לאחמ"כ בחר בכרטיסיית 'Protection', שם סמן את אופציית הנעילה (lock וכו'), הגדר סיסמה (הזן פעמיים לאימות), שמור וסגור.
ממליץ כמובן על סיסמה כמו 123, שהרי זה לא לשם הגנה. -
@חיים-חי תלחץ על הפלוס של Normal שבחלונית הקטנה, אח"כ על הפלוס של Mivrosoft Word Objects, ואח"כ על ThisDocument. וכאן תדביק את הקוד
הנה תמונה להמחשה:
נ.ב. ממליץ אח"כ לנעול את המאקרו בשביל הנוחות - זה יהיה יותר נוח, כאשר תרצה לבטל שמירה של מסמך חדש שלא נשמר אף פעם.
בשביל זה לחץ על Tools, אח"כ על normal Properties..., לאחמ"כ בחר בכרטיסיית 'Protection', שם סמן את אופציית הנעילה (lock וכו'), הגדר סיסמה (הזן פעמיים לאימות), שמור וסגור.
ממליץ כמובן על סיסמה כמו 123, שהרי זה לא לשם הגנה.@חיים-חי
אם תרצה, העתקתי עבורך קובץ שעימו תוכל להפעיל את השמירה האוטומטית בקלות (במקום סקריפט).
הקובץ מוגדר לשמירה אוטומטית כל 6 דקות, אך יש בו עוד הגדרות מותאמות אישית לתבנית (כגון, גופן מותאם אישית, מרווחים וכדו'. לדעתי מוצלח מאוד).
זה מאוד קל: פשוט ללחוץ על קיצור הדרך שנמצא בקובץ זיפ, ולהעתיק למיקום שנפתח את הקובץ השני שנמצא בארכיון.
אם תרצה, תוכל לגבות שם את הקובץ שכבר נמצא - כי ווינדוס ישאל אותך אם אתה מעוניין להחליף את הקובץ הנוכחי, עם זה החדש.
אם תרצה לערוך את הפקודה, הקוד של הפרויקט שלו הוא: 1234.הנה הקובץ:
76d26a0c-97d4-4b44-ac24-f68f73a9f485-שמירה אוטומטית כל 6 דקות - קובץ תבנית, מוכן.rar -
@חיים-חי
אם תרצה, העתקתי עבורך קובץ שעימו תוכל להפעיל את השמירה האוטומטית בקלות (במקום סקריפט).
הקובץ מוגדר לשמירה אוטומטית כל 6 דקות, אך יש בו עוד הגדרות מותאמות אישית לתבנית (כגון, גופן מותאם אישית, מרווחים וכדו'. לדעתי מוצלח מאוד).
זה מאוד קל: פשוט ללחוץ על קיצור הדרך שנמצא בקובץ זיפ, ולהעתיק למיקום שנפתח את הקובץ השני שנמצא בארכיון.
אם תרצה, תוכל לגבות שם את הקובץ שכבר נמצא - כי ווינדוס ישאל אותך אם אתה מעוניין להחליף את הקובץ הנוכחי, עם זה החדש.
אם תרצה לערוך את הפקודה, הקוד של הפרויקט שלו הוא: 1234.הנה הקובץ:
76d26a0c-97d4-4b44-ac24-f68f73a9f485-שמירה אוטומטית כל 6 דקות - קובץ תבנית, מוכן.rar -
מ מגדלים העביר נושא זה מ-עזרה הדדית - מחשבים וטכנולוגיה ב-
 { 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}