Hiroshi Kuno hkuno9000

hkuno9000 / excel-clear-junk-style.vbs

Last active August 7, 2018 04:26 — forked from YoshihitoAso/gist:311b0a1d40174e1bfdae

[Excel]excelシートの書式をすべて削除するマクロ

	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