Copy formats from row 2 down to nRows
Rows("2:2").copy
Rows("3:"&nRows).Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:= False
--
kassie
never stop learning
"Meltad" wrote in message
...
Hi
I'm trying to copy row 2 and copy the formats down the sheet to the last
row
(I have already defined nRows). I'm having trouble selecting the nRows to
paste into...
Rows("2:2").Select
Selection.Copy
Rows("3:3 & nRows").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
|