hkuno9000

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True

For Each strFname In WScript.Arguments
	Set objDoc = objExcel.Workbooks.Open(strFname)
	' clear all names (comment out)
	For Each N In objDoc.Names
''		N.Delete
	Next
	' clear all user style