المساعده فى كود حفظ ملف بعد تاريخ

[۩◊۩ أبو حنين ۩◊۩]

السلام عليكم

الاخوة الافاضل... كل عام وانتم بكل خير

ارجو المساعده فى الملف المرفق 

به كود حفظ الملف فى \:D  بعد تاريخ معين

الا انه يظهر خطاء 

المطلوب ان يتم حفظ الملف بعد ذلك التاريخ كل مره بتم فتح الملف وغلفة دون اشعار المستخدم 

tist.rar

[۩◊۩ أبو حنين ۩◊۩]

السلام عليكم

وجت الحل للمبدع الاخ الحبيب بن علية حاجى

جزاه  الله كل الخير واياكم

الخطاء كان فى امتداد الملف والفرمات التى يتم الحفظ بها داخل الكود

tist1.rar

[۩◊۩ أبو حنين ۩◊۩]

من باب الافاده 

مرفق الفروق بين FileFormat وامتداد الملف  لاخ الكبير بن علية خاجى

 

تلاحظ أن في كل نسخة من أكسيل كل امتداد في "الحفظ باسم" له خصوصيته في خاصية FileFormat...

 

* في إكسيل 2003 : للحفظ باسم Ahmed.xls في المسار D:\

 

ActiveWorkbook.SaveAs Filename:="D:\Ahmed.xls", FileFormat:=xlNormal

* في إكسيل 2010 :

 

- للحفظ باسم Ahmed.xls في المسار D:\

ActiveWorkbook.SaveAs Filename:="D:\Ahmed.xls", FileFormat:=xlExcel8

- للحفظ باسم Ahmed.xlsx  في المسار D:\

ActiveWorkbook.SaveAs Filename:="D:\Ahmed.xlsx", FileFormat:=xlOpenXMLWorkbook

- للحفظ باسم Ahmed.xlsm  في المسار D:\

ActiveWorkbook.SaveAs Filename:="D:\Ahmed.xlsm", FileFormat:=xlOpenXMLWorkbookMacroEnabled

- للحفظ باسم Ahmed.xlsb في المسار D:\

ActiveWorkbook.SaveAs Filename:="D:\Ahmed.xlsb", FileFormat:=xlExcel12

تلاحظ أن في كل نسخة من أكسيل كل امتداد في "الحفظ باسم" له خصوصيته في خاصية FileFormat...