أبو قاسم قام بنشر يونيو 1, 2016 مشاركة قام بنشر يونيو 1, 2016 Sub Export_PDF_in_most() Application.ScreenUpdating = False Sheet5.Select ActiveSheet.ExportAsFixedFormat xlTypePDF, "C:\Users\DESKTOP\Dropbox" _ & "\ Escorts Date " & N & UserForm1.TextDate1 & ".PDF" Application.ScreenUpdating = True End Sub ملاحظة الترحيل بصيغة PDF حاليا من خلال فورم فقط اريد فتح PDF مباشرة بعد ترحيلة لكي اتاكد من البيانات هل هي صحيحة رابط هذا التعليق شارك More sharing options...
أفضل إجابة علي الشيخ قام بنشر يونيو 1, 2016 أفضل إجابة مشاركة قام بنشر يونيو 1, 2016 السلام عليكم. جرب الكود كالتالي Sub Export_PDF_in_most() Application.ScreenUpdating = False Sheet5.Select ActiveSheet.ExportAsFixedFormat xlTypePDF, "C:\Users\DESKTOP\Dropbox" _ & "\ Escorts Date " & N & UserForm1.TextDate1 & ".PDF", OpenAfterPublish:=True Application.ScreenUpdating = True End Sub 1 رابط هذا التعليق شارك More sharing options...
أبو قاسم قام بنشر يونيو 1, 2016 الكاتب مشاركة قام بنشر يونيو 1, 2016 تشكر ربنا يوفقك دنيا واخرة ويجعل ماتقوم بة في ميزان حسناتك اجابة ممتازة جداً رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.