دستورات VBA که خودم دارم ولی با تغییر مقادیر شیت اصلی اکسل تغییر می کند و آپدیت میشود:
Dim d As Variant
d=sheets("name1").Range("i3").Value & ".xlsx
sheets("name A") .select
sheets("name A") .copy
Activeworkbook.saveAs Filename:=Application.thiswprkbook.path & "" & d
END sub



کامنت