כיצד להכניס תיבות טקסט עם קוד VBA ב - Excel

שלב 1

לחץ על "התחל", "Microsoft Visual Basic for Applications."

שלב 2

כתוב את הקוד הבא בחלון הפתוח:

Sub macro1 ()

מקרו מאקרו

ChtTemp עמום כמו תרשים

עמעם objTemp כאובייקט

הגדר chtTemp = ActiveSheet.ChartObjects (1) .Chart

הגדר objTemp = chtTemp.Shapes.AddTextbox

(msoTextOrientation אופקי, 1, 1, 150, 20)

objTemp.Select Selection.Formula = "= '" & chtTemp.Parent.Parent.Name & "' A1!"

ActiveCell.Select

סוף תת

שלב 3

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