Hi R,

Try:

wsSRC.Rows(SrcRow).Copy
ActiveSheet.Paste Destination:=wsDST.Rows(DstRow)
wsDST.Rows(DstRow).PasteSpecial Paste:=8, _
Operation:=xlNone, _
SkipBlanks:=False, _
Transpose:=False
Application.CutCopyMode = False


---
Regards,
Norman



"RjS, CISSP" wrote in message
...
Hi - I hope this question isnt too newbie. I am trying to copy all of a
row,
including all of its attributes like formatting, column widths, etc. The
code
snippet that I am currently using to perform the copy is:

wsDST.Rows(DstRow).Value = wsSRC.Rows(SrcRow).Value

This, of course, works for just the cell values. But trying to modify the
above to include the other desired attributes has eluded me.

Thanks Much