vb如何向已打开的excel文件里插入新的sheet工作表？

objworkbook.Sheets.Add After:=objExcel.Worksheets(1) '插入新sheet失败，

这里的 objworkbook 不对吧。

该成 objExcel 试试吧。

Excel中的VB语言叫做VBA，在VBE中使用代码新建即可。

Excel版本参考：2010

演示：新建一个表名为test的工作表。

1、ALT+F11，进入VBE窗口。

2、右击工作表标签-插入-模块。

3、输入代码：

Sub test()

Worksheets.Add(after:=Sheets(Sheets.Count)).Name = "test"

End Sub

4、按下F5执行，查看工作表，新建的test表 已新建好。

Sub 新建()

Sheets.Add After:=Sheets(Sheets.Count)

End Sub

Sub 替换()

Cells.Replace Chr(10), ""

End Sub

---