تفضل أخي عبدالله    تستعمل النموذج ، وتذهب الى السجل الذي تريد ، ثم تنقر على زر تصدير السجل الى الاكسل ، وسيتم حفظ ملف البيانات بصيغة xls وبرقم الشخص ، في نفس مجلد البرنامج ، الكود التالي يقوم بالعمل: Private Sub cmd_to_xls_Click() 'Created by Helen Feddema 8-18-2000 'Last modified 8-18-2000 'File_Name = "c:\" & me.emp_no & ".xls" File_Name = Application.CurrentProject.Path & "\" & Me.emp_no & ".xls" Template_Name = Application.CurrentProject.Path & "\2