keep getting runtime error....

want to copy active row and repaste values only.


Sub Macro3()

ActiveCell.Offset(Rowcount).EntireRow.Copy

Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks:= _
False, Transpose:=False

End Sub

Sub Macro3()

ActiveCell.EntireRow.Copy

Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks:= _
False, Transpose:=False

End Sub



"J.W. Aldridge" <(E-Mail Removed)> wrote in message
news:db5fedf6-d7b6-45c1-b663-(E-Mail Removed)...
> keep getting runtime error....
>
> want to copy active row and repaste values only.
>
>
> Sub Macro3()
>
> ActiveCell.Offset(Rowcount).EntireRow.Copy
>
> Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
> SkipBlanks:= _
> False, Transpose:=False
>
> End Sub

THANX ALL!