1、点击开发工具下的VB编辑器进入vba代码编辑窗口。

2、在编辑器中插入新的模块。

3、在代码编辑窗口输入以下代码,运行即可插入文本框。
Sub Macro1()
ActiveSheet.Shapes.AddTextbox Orientation:=msoTextOrientationHorizontal, Left:=539.249512, Top:=637.499512, Width:=269.999512, Height:=36.7495
End Sub

1、点击开发工具下的VB编辑器进入vba代码编辑窗口。

2、在编辑器中插入新的模块。

3、在代码编辑窗口输入以下代码,运行即可插入文本框。
Sub Macro1()
ActiveSheet.Shapes.AddTextbox Orientation:=msoTextOrientationHorizontal, Left:=539.249512, Top:=637.499512, Width:=269.999512, Height:=36.7495
End Sub
