用vba導出excel工作簿中的sheet1工作表並另存為。xls。

tt()

工作表(1)。保存方式

(“d:\test.xls”)

結束

潛水艇

至於存儲的名稱是動態的

考慮在未使用的單元格中保存壹個數字。

從0開始

每次運行時，將其值增加1。

代碼更改為已下載。

I =工作表(1)。單元格(1，100)。價值

工作表(1)。保存方式

(“d:\test”

& amp

我

& amp

".xls”)

工作表(1)。單元格(1，100)。價值

=

我

+

1