ListNames Method Example
This example pastes a list of defined names into cell A1 on Sheet1. The example pastes both workbook-level names and sheet-level names defined on Sheet1.
Worksheets("Sheet1").Range("A1").ListNames