G
Guest
hiya,,, i have the following line of code ...
Sub insertrow()
Dim sheet As Worksheet
Application.ScreenUpdating = False
Row = InputBox("Please Enter The Line Number Where You Want To Enter New
line")
For Each sheet In Worksheets(Array("Jan", "Feb", "March", "april", "may",
"June", "July", "Aug", "Sep", "Oct", "Nov", "Dec", "Overview"))
sheet.Rows(Row).Insert
Next sheet
End Sub
..... i am trying to get each page to either auto insert a formula into cells
b , c . d . e of which ever row number is selected or copy and paste the
formulas from the same 4 cells in the live above (which are already in place)
any ideas how to do either
Sub insertrow()
Dim sheet As Worksheet
Application.ScreenUpdating = False
Row = InputBox("Please Enter The Line Number Where You Want To Enter New
line")
For Each sheet In Worksheets(Array("Jan", "Feb", "March", "april", "may",
"June", "July", "Aug", "Sep", "Oct", "Nov", "Dec", "Overview"))
sheet.Rows(Row).Insert
Next sheet
End Sub
..... i am trying to get each page to either auto insert a formula into cells
b , c . d . e of which ever row number is selected or copy and paste the
formulas from the same 4 cells in the live above (which are already in place)
any ideas how to do either