作成者	カテゴリ	返答の対象		公開
1122 05/02/2003 10:04 AM		Excelのテキストボックス

こんにちわ。1122です。

まず、Excelで「新しいマクロの記録」からテキストボックスを作成してマクロを記憶させ、
そのソースを見ればヒントになると思います。
以下はシンプルなテキストボックスを挿入する例です。

■　Excelマクロ

ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal, 34.5, 87.75, _
192.75, 78.75).Select
Selection.Characters.Text = "aiueo" & Chr(10) & "kakikukeko"
With Selection.Characters(Start:=1, Length:=16).Font
　　.Name = "ＭＳ ゴシック"
　　.FontStyle = "標準"
　　.Size = 10
　　.Strikethrough = False
　　.Superscript = False
　　.Subscript = False
　　.OutlineFont = False
　　.Shadow = False
　　.Underline = xlUnderlineStyleNone
　　.ColorIndex = xlAutomatic
End With

■　ノーツスクリプト

ExcelObject.WorkSheets(1).Shapes.AddTextbox(1, 34.5, 87.75, _
192.75, 78.75).Select
.Selection.Characters.Text = "aiueo" & Chr(10) & "kakikukeko"
With .Selection.Characters(1, 16).Font
　　.Name = "ＭＳ ゴシック"
　　.FontStyle = "標準"
　　.Size = 10
　　.Strikethrough = False
　　.Superscript = False
　　.Subscript = False
　　.OutlineFont = False
　　.Shadow = False
　　.Underline = -4142
　　.ColorIndex = -4105
End With

テキストボックスの位置はセル指定などでは出来ないのかもしれません。
AddTextboxのパラメータはSingleになっていますので。
詳しくは知らないのではっきりと言えませんが・・・。