vba if copy and paste

[jdmetcalfe]

Hi any help would be really appreciated on the following

I am trying to add a copy and paste macro into a protected spreadsheet to allow users to copy rows of data. The macro should only run however if the user selects an entire row and in cell A of that column there is the value 1.

The macro needs to run as follows

If Selection.Copy = entire row AND

If A Current Row number = 1 Then

Selection.Insert Shift:=xlDown

Else Do nothing.

Thanks

James