//Excel.Workbook Wb
foreach (Excel.Name na in Wb.Names)
{
try
{
string tar = Convert.ToString(na.Name);
if (tar.Contains("Mark_") || tar.Contains("Print_Area"))
{
continue;
}
na.Delete();
}
catch(Exception ex)
{
continue;
}
}
Sub DisplayNames()
Dim Na As Name
For Each Na In ThisWorkbook.Names
Na.Visible = True
Next
End Sub