קישורים לתגובות הנכונות בשרשורים ארוכים!

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

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

שאלות נא לשאול רק בפרטי.

חברים יקרים שלום רב!
פתחנו יוזמה לקבץ באופן מסודר יארצייט ואירועים, בלוח יהודי.
הצלחת היוזמה צריכה שיתוף פעולה של כל מי שרק יוכל לעזור,
וזאת ע"י עריכת הרשימות בטבלאות אקסל אשר על הדרייב.
רשימת היארצייט ואירועים ישארו פתוחים להורדה ולשימוש בו לכל צורך שתירצו ...
קישור לדרייב היארצייטן. שימו לב , יש כבר ברשימה למעלה מ2000 ערכים, היכנסו ושיתפו.
קישור לדרייב האירועים.
נבקש ממי שרק יכול, או שיש לו מידע אודות תאריכים מסוימים שיכנס ויוסיף, ויערוך, או באם יש לכם מידע על מחבר מסוים, עוד ספר שהוציא וכדו', נשמח שתוסיפו...
ובתוכנית בהמשך לערוך לזה ממשק נוח לחיפוש וכו'.. ויוכלו לראות את כל המידע באופן מסודר וקל.
וכמובן נבקש להוסיף רק דברים ראויים ונאים, לציבור משלנו..

אצטט את רשימת המספרים למיניהם לכל מאן דבעי:

קבוצת הערכים הראשונה (0-5) מתארת את מספר וסוג הלחצנים המוצגים בתיבת הדו-שיח;

0 = לחצן אישור בלבד
1 = לחצני אישור וביטול
2 = הלחצנים בטל, נסה שנית והתעלם
3 = כן, לא והלחצנים ' ביטול '
4 = כן ולא לחצנים
5 = לחצני נסה שנית וביטול

הקבוצה השנייה (16, 32, 48, 64) מתארת את סגנון הסמלים;

16 = סמל הודעה קריטית
32 = סמל שאילתת אזהרה
48 = סמל הודעת אזהרה
64 = סמל הודעת מידע

הקבוצה השלישית (0, 256, 512) קובעת איזה כפתור הוא ברירת המחדל;

0 = הלחצן הראשון הוא ברירת מחדל
256 = הלחצן השני הוא ברירת מחדל
512 = הלחצן השלישי הוא ברירת מחדל
768 = הלחצן הרביעי הוא ברירת מחדל

והקבוצה הרביעית (0, 4096) קובעת את האופן שבו תיבת ההודעות.

0 = היישום הנוכחי לא יפעל עד שהמשתמש יגיב לתיבת ההודעה
4096 = כל היישומים אינם פועלים עד שהמשתמש מגיב לתיבת ההודעה
16384 = מוסיף לחצן עזרה לתיבת ההודעות
65536 = מציין את חלון תיבת ההודעות כחלון הקדמי
524288 = הטקסט מיושר לימין
1048576 = מציין שהטקסט צריך להופיע כקריאה מימין לשמאל - עברית (וערבית)

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

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

תגובה: פיתרון למעבירים מיילים אוטומטי !

הבאתי כאן את הסקריפט המתוקן להעברת מיילים מחשבון אחד לשני כולל כותרת הנושא.
ליותר פרטים והוראות עיי' בנושא הנ"ל

קרדיט ל @שאול-נ-י ול @איש-נחמד .

לפתיחת הגוגל סקריפט: לחץ עלי.

function newmail() {
  let sendmail = 'exemple@gmail.com'
  let sendlabel = GmailApp.getUserLabelByName('לשלוח')
  let oldmessages = GmailApp.search('is: read label:לשלוח')
    for (let oldmessage of oldmessages) {
            oldmessage.removeLabel(sendlabel)}
      let newmessages = GmailApp.search('is: unread label:לשלוח')
        for (let newmessage of newmessages) {
              let message = newmessage.getMessages()[0]
              let subjec = message.getSubject()
              let senderEmail = message.getFrom()
              let subject = 'יש מייל חדש עם הכותרת: ' + subjec
              let body = 'יש לך מייל חדש מאת ' + senderEmail + 'על מנת לראות את המייל לחץ: https://accounts.google.com/AccountChooser?continue=https://mail.google.com/&Email=youremail@gmail.com'
              MailApp.sendEmail(sendmail, subject, body,)
              newmessage.removeLabel(sendlabel)
        }   
}

בשורות 2 ו- 13 כמובן שצריך להחליף את המייל - למייל האישי שלכם... ( ב2 למייל הראשי אליו תרצו לקבל את העידכון, וב13 למייל שממנה נשלח המייל.)

כמובן לא לשכוח לפתוח תגית עבור כל הדואר הנכנס בשם "לשלוח" (להוראות ברורות יותר עי' בהמשך וכן בנושא הנ"ל, וכן אם תרצו לשנות את התגית, יש לשנות גם בתוך הסקריפט, כל מקום שכתוב "לשלוח", לשם הרצוי...)
בהצלחה!
-רק שימו לב שזה שולח רק עד 100 מיילים ביום!

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

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

שלום חברים, אשמח לשתף את הציבור עם קוד שנצרכתי לזה בעבר.
מיועד לטקסטים מלאים בוורד מחולק לפי פרקים ממוספרים מ-1 עד למעלה מ-100 , ורוצים להפוך את הכל לאותיות למשל 1-א 11-י"א וכו'
הקוד רלוונטי לכל סוגי ההחלפות של מספרים לאותיות, וע"כ יש להיזהר באם קיימים בטקסט עוד מספרים שלא יהפכו לאותיות.. וד"ל.
שימו לב! אם המספור בוצע באמצעות המספור האוטומטי של וורד ניתן להחליף הכל בבת אחת בהגדרות המספור.

Sub המרת_מספרים_לאותיות()
start:
With Selection.Find
    .ClearFormatting
    .Execute findText:="[0-9]{1,}", MatchWildcards:=True, Format:=False, Wrap:=wdFindContinue
    If .Found = True Then
S = ""

MyArray = Array(400, 300, 200, 100, 90, 80, 70, 60, 50, 40, 30, 20, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1)
MyaArray = Array("ת", "ש", "ר", "ק", "צ", "פ", "ע", "ס", "נ", "מ", "ל", "כ", _
"י", "ט", "ח", "ז", "ו", "ה", "ד", "ג", "ב", "א")
V = Val(Selection)
Do While V > 0
If V = 15 Or V = 16 Then
S = S & "ט"
V = V - 9
End If
  For i = 0 To UBound(MyArray)
    If V >= MyArray(i) Then
      S = S & MyaArray(i)
      V = V - MyArray(i)
      Exit For
    End If
  Next i
Loop

Selection = S

GoTo start
    End If
End With
End Sub

מקור.
אין בזה מרכאות בין האותיות. וכן אינה מסודרת ללשון נקיה אבל התוכן קיים!
אבל כן מחליף ב15 לטו וכו'.
נ.ב. לא יתאים למספור עמודים.
בהצלחה.

סתם קצת להבהיר ולסכם את הדברים שנאמרו ב"קיצור דרך בחיוג לקל קו",
אז ככה-
א' אפשר לעשות זאת בכל קו, ובכל מקום שצריך להוסיף מספרים לאחר החיוג, (גם בטלפונים כשרים) אגב יש טלפונים שלא סובלים אפשרות של הוספת אותיות למיניהם לבר ממספרים,
ב' במקום שאני רוצה שיוקש אוטומטי (לערך של זמן מה.) לאחר שהמערכת התחילה לעבוד אפשרי גם ע"י הקשת - ", " (פסיק פשוטה). -וזאת במקום המקש - "p" בטלפונים אחרים! וזה אפשרי גם כמה מספרים אחד אחרי השניה. [בחלק עובד ע"י "," ובחלק ע"י "p" וכזכור בחלק לא קיימת בכלל...],
בשיאומי הדרך שנוכל להקיש על מקשים כאלו היא כשאנו עורכים באנשי הקשר את מספר הטלפון היעודי נקיש על ה"*" הקשה ממושכת ואז נפתח לנו שלל האופציות [ואין אפשרות לעשות זאת סתם בעת הקשת מספר רק באמצעות עריכת האיש קשר - משא"כ בשאר טלפונים...]
ג' עדיפות כמובן אחרי כל רשימת מספרים / קודים וכדו' לפני העברה לקוד נוסף להקיש # וזאת בכל מקום (לא דווקא כאן זה מזרז תמיד את ההליכים כשנצרכת הקשות...)
ד' כששומעים כל קו למינו, ואני רוצה אפשרות החלטה עצמית, בעת שמיעת ההודעות, אפשרי ע"י הקשה על " ; ", כגון בקוים שע"י הקשה על 2 נוכל לעבור להודעה הבאה וכדו' (בפרט במקומות שקשה לזכור איזה מספרים זה להודעה קודמת וכו' וכו') נוכל להקיש הרבה פעמים 2;2;2;2;2;2;2;2; וכו' [כפי הכמות שיורשה ע"י הטלפון]. -אפשרי גם להקשת קודים בנוסח זה והטלפון ישאול אותך "לשלוח את הצלילים הבאים?"
אפשר גם לערבב בין הנ"ל כמובן דהיינו לאחר הקשה על בחירה באם אענה חיובי זה יקיש לי אוטומטי עוד קוד ועוד קוד לפי הנ"ל ע"י הקשה על "פסיק" וכו', וכן כשצריך יותר פסק זמן נוכל להקיש פעמים ",," וכו' וכו' -יש להבהיר כי אופציה זאת לא קימת בכל סוגי הטלפונים (בשיאומי ויאנג ועוד- קיים!)
נ.ב. בהטלפונים "שיאומי" ואולי עוד, יש אפשרות בהבחירה האחרונה ע"י הקשה על " ; " [אות ד' הנ"ל] גם לבטל את זה במשך השיחה כשארצה לעבור לשלוחה אחרת במקביל וכדו' .
בהצלחה.

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

Sub החלפת_כמה_מילים_בו_זמנית()
' פורסם ע"י מגדלים, ב"מתמחים טופ"
'Update by ExtendOffice 2018/10/25
    Dim xFind As String
    Dim xReplace As String
    Dim xFindArr, xReplaceArr
    Dim I As Long
    Application.ScreenUpdating = False
    xFind = InputBox(":הזן פריטים שיימצאו כאן, מופרדים באמצעות פסיק ", "!חפש כמה מילים בו זמנית")
    xReplace = InputBox("הזן המילים שאתה רוצה לקבל בתמורתן, (מופרדים (.באמצעות פסיק ", "-החלף ב")
    xFindArr = Split(xFind, ",")
    xReplaceArr = Split(xReplace, ",")
    If UBound(xFindArr) <> UBound(xReplaceArr) Then
        MsgBox "Find and replace characters must be equal.", vbInformation, "Kutools for Word"
        Exit Sub
    End If
    For I = 0 To UBound(xFindArr)
        Selection.HomeKey Unit:=wdStory
        With Selection.Find
            .ClearFormatting
            .Replacement.ClearFormatting
            .Text = xFindArr(I)
            .Replacement.Text = xReplaceArr(I)
            .Format = False
            .MatchWholeWord = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
    Next
    Application.ScreenUpdating = True
End Sub

מקור , ונערך קצת ע"י , .

ההתראות כרגע משוכות מדי, יש מדי הרבה רווח בין התראה למשנהו, ממה שהיה בעבר..

כמו"כ, אין את קיצורי האימוג'ים...
וכו'...
ועוד.

לתשומת ה- @administrators

והנה להוספה ללשון נקיה, וכן להוסיף מרכאות בין האותיות...

Sub המרה()
start:
With Selection.Find
    .ClearFormatting
    .Execute findText:="[0-9]{1,}", MatchWildcards:=True, Format:=False, Wrap:=wdFindContinue
    If .Found = True Then
S = ""

MyArray = Array(400, 300, 200, 100, 90, 80, 70, 60, 50, 40, 30, 20, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1)
MyaArray = Array("ת", "ש", "ר", "ק", "צ", "פ", "ע", "ס", "נ", "מ", "ל", "כ", _
"י", "ט", "ח", "ז", "ו", "ה", "ד", "ג", "ב", "א")
V = Val(Selection)
Do While V > 0
If V = 15 Or V = 16 Then
S = S & "ט"
V = V - 9
End If
  For i = 0 To UBound(MyArray)
    If V >= MyArray(i) Then
      S = S & MyaArray(i)
      V = V - MyArray(i)
      Exit For
    End If
  Next i
Loop

If S = "רצח" Then S = "רחצ"
If S = "רע" Then S = "ער"
If S = "רעב" Then S = "ערב"
If S = "שד" Then S = "דש"
If S = "שמד" Then S = "שדמ"
If S = "תשמד" Then S = "תדשם"
If S = "רעה" Then S = "ערה"
If S = "רעד" Then S = "עדר"

If Len(S) = 1 Then
    S = S & "'"
Else
    S = Left(S, (Len(S) - 1)) & Chr(34) & Right(S, 1)
End If

Selection = S

GoTo start
    End If
End With
End Sub

@גילהרינה
תעמוד בתוך שורת הכתובת > לחץ על קונטרול ואז + שיפט (שחק בין ימין ושמאל יש כמה אפשרויות לתצוגה)[שים לב, זה צריך להיות קונטרול ואז שיפט, אם לא זה לא עובד.]
זה אמור לסדר את העניין...
ימניים עושה ימין לשמאל, שמאליים עושה שמאל לימין.
מקור. קרדיט ל @אלישי (שלנו!!) "המלך" ...
תעדכן אם עובד!

@שאול-נ-י יופי שלב ראשון הצליח ב"ה!
ועכשיו הציבור חפץ שלב שני של שליחת תגובות במייל דרך הטלפון.

@aaaa ובינתיים אפשר פשוט לכתוב בהורדות ולבקש בדיווחים או בפרטי (לא בפוסט עצמו!), שיעבירו לקטוגוריה של ירון...

הועלה גירסה מעודכנת.
שימוש מהנה.

אמש אמר לי סוכן שיצאה גירסא חדשה לQ7.

@elish אמר בבקשת תוכנה להדפסת מדבקות:

@נגן אמר בבקשת תוכנה להדפסת מדבקות:
@elish יש בוורד 'מיזוג דואר'

לא כל כך הסתדרתי עם זה

אז ככה נכנסים דברי דואר >התחל מיזוג דואר >תוויות -נפתח לך אתה בוחר סוג וגודל המדבקות הסוג באמצעות מספר מוצר [-בדרך כלל מספיק עם זה] /תווית חדשה, לשינוי גודל אתה לוחץ עם העכבר על הקוביה "מידע אודות התווית" וכו' ומאשר.> אישור >בחר נמענים - אתה בוחר תיבת אקסל אם קיים עם רשימת הנמענים-בוחר בשימוש ברשימה קיימת, או הקלדת רשימה חדשה (אגב, יש שם אפשרות שלהתאמה אישית של עמודות + הוספה או שינוי שם לעמודה קיימת כמו תיבת אקסל ...).אישור >מוסיף שורת ברכה כרצונך >הוסף שדה מיזוג - בוחר איזה עמודה לכתוב ומה קודם וכו' יש להקפיד על ריווח בין כל שדה מיזוג (>ערוך רשימת נמענים ...)וכו' >עדכן תוויות> סיים ומזג,
ובהצלחה.

@elish אמר בבקשת תוכנה להדפסת מדבקות:

אני מחפש תוכנה שמחלקת דף לפי דף מדבקות
כמה שידוע לי יש תוכנה כזאת בשם Fanta stick אבל לא הצלחתי למצוא את זה

עי' כאן אולי יעזור לך , (פורום נתיב מובא שם תוכנה להנ"ל)
כאן קישור ישירה להורדת התוכנה, (הובא שם בפורום נתיב בסוף).
מקווה שתסתדר!
בהצלחה.

@אבי_770 אמר בבקשת מידע | ציטוט בגי'מייל:

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

פתח על זה נושא חדש, בהצלחה.

@aaaa אמר בהצעת ייעול | מיון קטגורית תוכנות להורדה:

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

התחלנו למיין לבינתיים, ועכ"פ מי שרואה נושא חדש / ישן שלא קשור לשם, שידווח עליו.