一时没看清,你可以先用单步调试看一下是哪步出错,还有set了那么多对象,最后都是要set 对象 = nothing的,oChart.Application.Quit是不是要放到最后