נכתב ע"י חסידישער;1082523:לא שייך? נראה לי שקצת נסחפת... זה אולי מסובך, אבל אין כזה דבר "לא שייך".
תן לי לנסות לעבוד על זה קצת...
Sub open_bracket()
Selection.Font.Size = Selection.Font.Size - 2: Selection.Font.SizeBi = Selection.Font.SizeBi - 2: Selection.TypeText Text:="("
End Sub
Sub close_bracket()
Selection.TypeText Text:=")": Selection.Font.Size = Selection.Font.Size + 2: Selection.Font.SizeBi = Selection.Font.SizeBi + 2
End Sub
נכתב ע"י ayg;1082864:יתכן שזה היה כוונתו - אך Event לזה לא שייך כמו שכבר כתבו, ויבא בעל הפרום ויפרש בקשתו
בכל אופן כדי להכניס מסגורים צריכים להקיש shift+0 - ולפקודה אפשר להשתמש בctrl+0 ונמצאת שההקשות שוות הם [וגם בקל אפשר לבחור מתי רוצים שיקטין ומתי לא]
נכתב ע"י HUBHCBH;1084102:אכן הכל אפשרי, תודה רבה
עזרת לי מאד.
נכתב ע"י ayg;1082838:כמדומה למה שביקש פתוח הפרום אפשר להשתמש בפקודות אלו
פקודה לפתוח סוגרים - מומלץ לעשות לו קיצור דרך ctrl-0
ופקודה לסגור סוגרים - מומלץ לעשות לו קיצור דרך ctrl-9
נכתב ע"י HUBHCBH;1082477:אני מחפש פקודה בוורד שכל פעם שאני פותח סוגרים כאלה ( הגופן יקטן אוטומטי ב 2 גדלים פחות וכשאני סוגר סוגרים יגדל בחזרה.
עדיף שיהיה לי אופציה להפעיל את הפונקיצה ועוד לחצן כדי לבטל את הפונקציה, כדי שאני לא יהיה מחוייב לזה..
תודה רבה
Private מצב_עיצוב As Boolean
Private תו_אחרון As String
Public Sub הפעל_עצור_מצב_עיצוב_סוגריים()
If מצב_עיצוב = False Then
הפעל
Else
מצב_עיצוב = False
End If
End Sub
Private Sub הפעל()
מצב_עיצוב = True
Dim טווח As Range
Do While מצב_עיצוב = True And Selection.Start > 0
DoEvents
Set טווח = ActiveDocument.Range(Start:=Selection.Start - 1, _
End:=Selection.Start)
If טווח.Text = "(" Then
If תו_אחרון <> "(" Then
טווח.Font.SizeBi = טווח.Font.SizeBi - 2
תו_אחרון = "("
End If
ElseIf טווח.Text = ")" Then
If תו_אחרון <> ")" Then
Selection.Font.SizeBi = Selection.Font.SizeBi + 2
תו_אחרון = ")"
End If
Else
תו_אחרון = טווח.Text
End If
Loop
End Sub
יש דרך, ובתיכנות אפשר לעשות הכל, פנה אלי למייל להזמנת הסקריפט.יש דרך שיתחלף לי הסוגריים רק כשזה מתחיל במילים מסוימים כמו כשזה מתחיל "בראשית" למשל אז יתחלף לי גם הסוגריים שאני מתחיל בה וגם הסוף על אף שיש באמצע עוד מילים?
וכשאני רוצה שזה יתחלף לסוגריים כאלה { מה עלי לעשות?
בזמן שאתם מחפשים את החמץ, הלקוחות שלכם מחפשים אתכם בנרות!
מנוי פרימיום באתר פרוג, יקפיץ את המוניטין שלך לקהל גדול שאסור לך להחמיץ!
ועכשיו בהזדמנות, מבצע פסח 10% הנחה ברכישת מנוי שנתי!
לוח לימודים
מסלולי לימוד שאפשר לההצטרף
אליהם ממש עכשיו:
2.04
כ"ג אדר ב'
השקה חגיגית
חדש בפרוג
קורס חדשנות AI ובינה מלאכותית
14 שיעורים מפוצצים תוכן על כלי הAI השונים ליצירת תמונות וויז'ואל, עריכת וידאו ומושן, כתיבה ורעיונות, אפיון ועיצוב אתרים ועוד המון!
ההרשמה נפתחה!
20.03
י' אדר ב'
פתיחת מסלול
עיצוב ואדריכלות פנים
מלגות גבוהות!
26.03
טז' אדר ב'
פתיחת מסלול
מאסטר בשיווק דיגיטלי
מלגות גבוהות!
8.05
ל' ניסן
פתיחת מסלול
אוטומציות עסקיות, בוטים והטמעת מערכות מידע
מלגות גבוהות!
9.05
א' אייר
ירושלמי?
יש לנו מלגה מטורפת עבורך! קורס במימון כמעט מלא!!
אוטומציות עסקיות, בוטים והטמעת מערכות מידע
ההרשמה בעיצומה
28.05
כ' אייר
פתיחת מסלול מורחב:
פיתוח ובניית אתרים
מלגות גבוהות!
תהילים פרק קיט ר'
קנג רְאֵה עָנְיִי וְחַלְּצֵנִי כִּי תוֹרָתְךָ לֹא שָׁכָחְתִּי:קנד רִיבָה רִיבִי וּגְאָלֵנִי לְאִמְרָתְךָ חַיֵּנִי:קנה רָחוֹק מֵרְשָׁעִים יְשׁוּעָה כִּי חֻקֶּיךָ לֹא דָרָשׁוּ:קנו רַחֲמֶיךָ רַבִּים יְהוָה כְּמִשְׁפָּטֶיךָ חַיֵּנִי:קנז רַבִּים רֹדְפַי וְצָרָי מֵעֵדְוֹתֶיךָ לֹא נָטִיתִי:קנח רָאִיתִי בֹגְדִים וָאֶתְקוֹטָטָה אֲשֶׁר אִמְרָתְךָ לֹא שָׁמָרוּ:קנט רְאֵה כִּי פִקּוּדֶיךָ אָהָבְתִּי יְהוָה כְּחַסְדְּךָ חַיֵּנִי:קס רֹאשׁ דְּבָרְךָ אֱמֶת וּלְעוֹלָם כָּל מִשְׁפַּט צִדְקֶךָ: