Dim xlApp As Object '定义EXCEL类Dim xlBook As Object '定义工件簿类Dim xlsheet As Object '定义工作表类 放在函数外面,做全局定义public xlApp As Objectpublic xlBook As Objectpublic xlsheet As Object当你上面的函数执行正确以后,在其他地方调用 xlsheet 的时候,就是Worksheets("sheet1") 了