Rows(10000).Copy
Selection.Insert Shift:=xlDown
--
Charles Chickering

"A good example is twice the value of good advice."


"BEEJAY" wrote:

Looking to copy a "fixed row" say row 10,000.
Place cursor on row where I want the entry.
Activate Macro, which copies row 10,000, and places it at the current cursor
location.


Sub Set_Up_Line()
' Set_Up_Line Macro
' Keyboard Shortcut: Ctrl+Shift+Z
'
Rows("10000:10000").Select
Application.CutCopyMode = False
Selection.Copy



End Sub