sub macro2() dim tmpfilename as string for i=440102 to 440120 tmpfilename=i '循环输出 next end sub以上就是你要的循环结构 你在上面循环内部写你你上面的代码。然后将 440102 替换成 tmpfilename& 就可以了,如果还有什么问题,请留言。
engl**h(英语)-i love you afrikaans(南非洲的荷兰语)-ek het jou lief albanian(阿尔巴尼亚)-te dua arabic(**伯(对男性)-ana behibak(to male) arabic(**伯(对女性)-ana behibek(to female) armenian(亚美尼亚)-yes kez sirumen bambara(班拉族语...