Inserting HPagebreaks in excel thru. VB

Iam creating an excel sheet from VB.
I tried to create horizontal pagebreak using
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
I get error message : Object doesn't support this property or method.
can anyone help me with this.
thanks.