sanderl705pu@outlook.com

中翻簡軟體: Excel 版本: 2016 想用VBA來新增文字方塊到儲存格中間，今朝寫到下面這樣： Dim textbox As String textbox = "A" Dim rng As Range: Set rng = Application.Selection Dim cel As Range For Each cel In rng With ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal翻譯社 cel.Left + (cel.Width / 2) - 3, cel.Top - cel.Height, 50, 50) .TextFrame.Characters.Text = textbox .TextFrame.AutoSize = True End With Next cel 在預設列高的狀態下是沒什麼問題， 可是若是該列比力高的話，用Height來節制位置的話，新增的文字方塊就會跑掉位置 想請問有什麼解法呢？ 感激！

本篇文章引用自此: https://www.ptt.cc/bbs/Office/M.1518924945.A.D06.html有關各國語文翻譯公證的問題歡迎諮詢天成翻譯公司02-77260931