Macro tự động chuyển

[Damkhat09]

Mình cần làm 100 file excel,Các file đó có thứ tự từ 1-100.

Khi mình record marcro file 1,sau khi hoàn thành mình save nó với thứ tự là 1.

Vậy mình muốn play marcro file 2 thì nó phải save lại là 2.Các bạn hướng dẫn mình với.Cám ơn!

 

[yeudoi]

Mình cần làm 100 file excel,Các file đó có thứ tự từ 1-100.

Khi mình record marcro file 1,sau khi hoàn thành mình save nó với thứ tự là 1.

Vậy mình muốn play marcro file 2 thì nó phải save lại là 2.Các bạn hướng dẫn mình với.Cám ơn!

Bạn chạy code này thử nha

Sub Addworkbook()
Dim WB As Workbook
Set WB = Workbooks.Add
For i = 1 To 100
WB.SaveAs i
Next i

WB.Close SaveChanges:=False
End Sub

 

[Damkhat09]

Cám ơn bạn.Việc chạy code như thế nào hả bạn?Mình là beginer nên không biết!!!

 

[SA_DQ]

Mà sao fải 100 file vậy bạn; Có thể có fương án nào hay hơn không? Biết đâu đó!