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

2、在编辑器中点击“插入”->“模块”,创建新的vba代码模块。

3、在代码编辑窗口输入以下代码,运行即可插入图文框形状。
Sub Macro1()
ActiveSheet.Shapes.AddShape Type:=msoShapeFrame, Left:=93.75, Top:=42, Width:=194.25, Height:=147.75
End Sub

时间:2026-02-12 21:57:27
1、点击开发工具下的VB编辑器进入vba代码编辑窗口。

2、在编辑器中点击“插入”->“模块”,创建新的vba代码模块。

3、在代码编辑窗口输入以下代码,运行即可插入图文框形状。
Sub Macro1()
ActiveSheet.Shapes.AddShape Type:=msoShapeFrame, Left:=93.75, Top:=42, Width:=194.25, Height:=147.75
End Sub
