איך מתעסקים עם MsgBox?
-
אני רוצה להריץ מאקרו, שישאל אותי האם ... ובלחיצה על כן הוא ימשיך את המאקרו ובלחיצה על לא הוא יפסיק. אז הוספתי MsgBox מתאים, אבל מה הלאה? מה הגדירים לו כדי שימשיך או שלא ימשיך?
אולי קשור לזה:
(מחכה לנטפרי...)
אשמח לתגובת היודעים!!! -
אני רוצה להריץ מאקרו, שישאל אותי האם ... ובלחיצה על כן הוא ימשיך את המאקרו ובלחיצה על לא הוא יפסיק. אז הוספתי MsgBox מתאים, אבל מה הלאה? מה הגדירים לו כדי שימשיך או שלא ימשיך?
אולי קשור לזה:
(מחכה לנטפרי...)
אשמח לתגובת היודעים!!!@ישעיהו-כץ כתב באיך מתעסקים עם MsgBox?:
אבל מה הלאה? מה הגדירים לו כדי שימשיך או שלא ימשיך?
כמו כל פקודת IF:
דוגמה:If proc = vbYes Then Range("A1").Select Selection.ClearContents Else Exit Sub End If 'כאן אתה כותב את המשך הקודהתנאי הוא: אם המשתמש לוחץ על "כן" הוא מוחק את תא A1. אם המשתמש לחץ על "לא" (Else=הפוך התרחשות התנאי) יציאה מהמאקרו.
-
-
אני רוצה להריץ מאקרו, שישאל אותי האם ... ובלחיצה על כן הוא ימשיך את המאקרו ובלחיצה על לא הוא יפסיק. אז הוספתי MsgBox מתאים, אבל מה הלאה? מה הגדירים לו כדי שימשיך או שלא ימשיך?
אולי קשור לזה:
(מחכה לנטפרי...)
אשמח לתגובת היודעים!!!@ישעיהו-כץ
יש כאן 2 חלקים:
א. מה יהיה כתוב בהודעה, שזה הפרמטרים שרואים בתמונה שהעלית - (prompt- הכיתוב בגוף ההודעה, Buttons- הלחצנים, Title - כותרת ההודעה, helpfile- קישור לקובץ עזרה, Context - כיתוב מתחת להודעה.)אגב בפרמטר השני אתה יכול להוסיף 'דגלים' שהם הוראות נוספות לעיצוב ההודעה, כמו vbMsgBoxRight - יישור של הלחצנים לימין, vbMsgBoxRtlReading - יישור של הטקסט מימין לשמאל, ועוד. (בין דגל לדגל יש להשתמש בסימן +.)
ב. כדי להגדיר תנאי בהודעה אתה משתמש בפונקציה MsgBox כך:
if msgbox(Parameters...) = VbYes thenאתה יכול להשתמש גם בפרמטרים הבאים
כמובן לפי הפרמטר שהגדרת בתוך הMsgBox. -
@ישעיהו-כץ
יש כאן 2 חלקים:
א. מה יהיה כתוב בהודעה, שזה הפרמטרים שרואים בתמונה שהעלית - (prompt- הכיתוב בגוף ההודעה, Buttons- הלחצנים, Title - כותרת ההודעה, helpfile- קישור לקובץ עזרה, Context - כיתוב מתחת להודעה.)אגב בפרמטר השני אתה יכול להוסיף 'דגלים' שהם הוראות נוספות לעיצוב ההודעה, כמו vbMsgBoxRight - יישור של הלחצנים לימין, vbMsgBoxRtlReading - יישור של הטקסט מימין לשמאל, ועוד. (בין דגל לדגל יש להשתמש בסימן +.)
ב. כדי להגדיר תנאי בהודעה אתה משתמש בפונקציה MsgBox כך:
if msgbox(Parameters...) = VbYes thenאתה יכול להשתמש גם בפרמטרים הבאים
כמובן לפי הפרמטר שהגדרת בתוך הMsgBox.
שלום! נראה שהשיחה הזו מעניינת אותך, אבל עדיין אין לך חשבון.
נמאס לכם לגלול בין אותם הפוסטים בכל ביקור? כשנרשמים לחשבון, תמיד תחזרו בדיוק למקום שבו הייתם קודם, ותוכלו לבחור לקבל התראות על תגובות חדשות (בין אם במייל, ובין אם בהתראת פוש). תוכלו גם לשמור סימניות ולפרגן ב-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}