ListNames creates a list of names in the entire workbook. I need to list the names used in sheet1 only. I need this list of names used on sheet1 to be created on sheet2.

Currently I am doing a ListNames on sheet1, then deleting all that end in "!REF!" because they are from other sheets then trying to copy the range of names to sheet2.

I am also having trouble copying the range.

Worksheets(Sheet1).Range("b4:e" & v).Select 'Copy old list
Selection.Cut
Worksheets(sheet2).Range("f4:i" & v).Select
ActiveSheet.Paste

That doesn't work!

I would be greatful to find out how to do both, create sheet1 names on sheet2, and copy a range from sheet1 to sheet2.