因为你的变量i下标超出了,这样试试: private sub commandbutton1_click() dim ie as object,i as integer,j as integer,h as integerset ie=createobject("internetexplorer.application")ie.n**igate... 20210311
sub macro2() dim tmpfilename as string for i=440102 to 440120 tmpfilename=i '循环输出 next end sub以上就是你要的循环结构 你在上面循环内部写你你上面的代码。然后将 440102 替换成 tmpfilename& 就可以了,如果还有什么问题,请留言。