اخواني الخبراء
السلام عليكم ورحمة الله وبركاته
أرجو المساعدة منكم بشكل عاجل عندي ملف إكسل قمت بعمل اكواد برمجية بلغة الفيجول بيسك عليه
لمحو البيانات و تعبئة البيانات و و و
المهم يوجد كود لحفظ ورقة على من الملف أسمها Form من الاكواد لايعمل
فيجول بيسك لحفظ ورقة على هيئة pdf تسمى Form
ولكن الكود لايعمل واجهل السبب أرجو منكم التعديل على الكود إن أمكن
Sub ExportSheet()
Dim Form As Worksheet
Dim strName As String
Set Form = ActiveSheet
strName = InputBox("أدخل اسم الخطاب:")
Form.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="C:\Users\Legend\Documents\" & strName, _
Quality:=xlQualityStandard, _
OpenAfterPublish:=True
End Sub