如何在excel工作表最前面插入一行数据?

[annkie]

对已经存在数据的Excel表,想在其最前面增加一行 信息,如何实现?
Sub Macro1()
'
' Macro1 Macro
' annkie 记录的宏 2003-10-24
'
' Rows("1:1").Select
Selection.Insert Shift:=xlDown
Range("A1").Select
ActiveCell.FormulaR1C1 = "hello,world"
ActiveWorkbook.Save
End Sub

Sheet.OleProcedure("Insert");
或
Sheet.OleFunction("Insert");
都不行呀.

[annkie]

up
怎么看不到自己的帖子了?

[ccrun.com]

Sheet1.OlePropertyGet("Rows",1).OleProcedure("insert");

在我这里试成功了。

[annkie]

谢了,可以了.