نمایش نتایج: از شماره 1 تا 4 , از مجموع 4

موضوع: خطای ران کردن کد pdf

  1. #1


    آخرین بازدید
    2021/05/20
    تاریخ عضویت
    August 2014
    محل سکونت
    تهران
    نوشته ها
    247
    امتیاز
    55
    سپاس
    0
    سپاس شده
    45 در 35 پست
    سطح اکسل
    83.00 %

    خطای ران کردن کد pdf

    با سلام
    دوستان، کدی را برای تبدیل کردن به pdf نوشتم که بعد از اجرا شدن خطا داره
    تو اکسل 2010 که ران میکنم error میده
    خطا رو پیوست کردم
    لطفا راهنمایی کنید
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
    تصاویر کوچک فایل پیوست تصاویر کوچک فایل پیوست error.png  
    پاسخ مورد نظر براي اين تاپيك ارسال شده است.

  2.  

  3. #2


    آخرین بازدید
    2018/06/21
    تاریخ عضویت
    February 2010
    محل سکونت
    اصفهان-بندرعباس
    نوشته ها
    146
    امتیاز
    79
    سپاس
    23
    سپاس شده
    86 در 63 پست
    سطح اکسل
    53.33 %

    سلام
    آیا برای کدی که نوشتید فایل پی دی افش موجود هست ؟
    آیا توی خط اول کدتون چیزی نوشتید که اگه فایل پی دی اف رو پیدا نکرد چیکار کنه ؟
    مثلا On error Resume next یا On error Go to Error Handler و یا ...
    من احساس می کنم این فایلی که دارین جستجو میکنید پی دی افش موجود نیست و چون پیدا نمیکنه این مشکل رو دارین ...
    [align=center]با تشکر
    امیر محسن پور[/align]

  4. #3


    آخرین بازدید
    2021/05/20
    تاریخ عضویت
    August 2014
    محل سکونت
    تهران
    نوشته ها
    247
    امتیاز
    55
    سپاس
    0
    سپاس شده
    45 در 35 پست
    سطح اکسل
    83.00 %

    نقل قول نوشته اصلی توسط Amir Mohsenpour نمایش پست ها
    سلام
    آیا برای کدی که نوشتید فایل پی دی افش موجود هست ؟
    آیا توی خط اول کدتون چیزی نوشتید که اگه فایل پی دی اف رو پیدا نکرد چیکار کنه ؟
    مثلا On error Resume next یا On error Go to Error Handler و یا ...
    من احساس می کنم این فایلی که دارین جستجو میکنید پی دی افش موجود نیست و چون پیدا نمیکنه این مشکل رو دارین ...

    ضمن تشکر از جنابعالی
    این کد تو اکسل نوشته شده و خودش تبدیل به pdf میکنه و ذخیره میکنه
    کد فایل این هست

    Private Sub CommandButton1_Click()
    Dim i, j As Integer

    For i = 2 To 20

    ActiveSheet.Range("M3").Value = Sheets("code markaz unique").Range("E" + CStr(i)).Value
    Sheets("karnameh prog").Calculate
    ActiveSheet.Cells(3, 13).Value = Sheets("code markaz unique").Cells(i, 5).Value
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    "D:" + CStr(Cells(3, 13)) + "." + Cells(7, 8) + "." + Cells(9, 3) + ".pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True
    ActiveSheet.Cells(73 + i, 13).Value = ActiveSheet.Cells(9, 3).Value
    ActiveSheet.Cells(73 + i, 12).Value = ActiveSheet.Cells(69, 1).Value
    Next i
    End Sub
    نکته جالب این که در اکسل 2016 کامل انجام میشه و error نداره

  5. سپاس ها (1)


  6. #4


    آخرین بازدید
    2018/06/21
    تاریخ عضویت
    February 2010
    محل سکونت
    اصفهان-بندرعباس
    نوشته ها
    146
    امتیاز
    79
    سپاس
    23
    سپاس شده
    86 در 63 پست
    سطح اکسل
    53.33 %

    به خط اول کدها اینو اضافه کنید
    On error resume next
    [align=center]با تشکر
    امیر محسن پور[/align]

  7. سپاس ها (1)



اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

انجمن اكسل ايران , اكسل , اكسس , سوال و جواب اكسل , سوال اكسس , انجمن اكسل ايران , توابع اكسل, آموزش اكسل, آموزش اكسس, VBA, ويژوال بيسيك

علاقه مندی ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است
با ما در تماس باشيد