אתה יכול לראות במבט אחד אילו גופנים זמינים ב- Excel
אתה יכול לבחור בקלות את הגופן לתא. אבל רשימת הגופנים המותקנים ארוכה. אם אתם מחפשים את הגופן הנכון לתצוגה או אם אתם רוצים להתנסות קצת בגופנים, מאקרו יעזור לכם.
השתמש במאקרו הבא אם ברצונך לרשום את כל הגופנים הזמינים בעמודה A של חוברת עבודה חדשה:
גופני משנה הזן ()
רשימת גופנים עמומה כ- CommandBarControl, מונה כמספר שלם
Application.ScreenUpdating = שקר
חוברות עבודה
הגדר רשימת גופנים = Application.CommandBars.FindControl (מזהה: = 1728)
עבור מונה = 1 לרשימת גופנים. ListCount
עם תאים (מונה, 1)
.Value = רשימת גופנים. רשימת (מונה)
.Font.Name = רשימת גופנים. רשימת (מונה)
סיים עם
הדלפק הבא
עמודות (1). AutoFit
Application.ScreenUpdating = נכון
סיום תת
Excel מזין את שם כל גופן בתאים ומיד מעצב את התא בגופן המתאים. האיור הבא מראה כיצד זה יכול להיראות:
