Insert Row & copy all formulas - shared workbook
 

Hi,
I have a workbook that is being shared. How can I have the user
insert a new row and keep all of the formulas that are being used. Th
INSERT command will put in a row, but no formulas. I would also lik
this row insert in row 3 (which is the actual first row where the dat
begins).

Help.
Jef

--
Message posted from http://www.ExcelForum.com

Insert Row & copy all formulas - shared workbook
 

it's basic.. but it works for me.
(not tested in shared)



Sub InsertPrep()
Selection.Rows(1).EntireRow.Insert
With Selection.EntireRow
.FillDown
On Error Resume Next
If Not IsError(.SpecialCells(xlConstants)) Then
.SpecialCells(xlConstants).Clear
End If
On Error GoTo 0
End With
End Sub



keepITcool

< email : keepitcool chello nl (with @ and .)
< homepage: http://members.chello.nl/keepitcool


Eager2Learn wrote:

Hi,
I have a workbook that is being shared. How can I have the users
insert a new row and keep all of the formulas that are being used.
The INSERT command will put in a row, but no formulas. I would also
like this row insert in row 3 (which is the actual first row where the
data begins).

Help.
Jeff


---
Message posted from http://www.ExcelForum.com/