Making a copying macro from cursor position ?
"NickHK" wrote in message
...
Jesper,
Something like:
With ActiveCell
Range(Cells(.Row, 1), Cells(.Row, .Column)).Copy
End With
Sheets("Sheet2").Range("C1").PasteSpecial Paste:=xlAll, Transpose:=True
NickHK
Thank you very much NickHK....saved my day have you ;-)
Shamran
|