اعلن هنا
أكاديمية الصقر للتدريب
أعلن هنا
أعلن هنا
أعلن هنا
أعلن هنا



أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





كود تصدير الصفحات الى pdf من اليوزر فورم

السلام عليكم ورحمة الله وبركاته ،،، معي ملف واريد طباعته pdf من خلال اليوزر فورم ولكن عند الطباعه تظهر لي رسالة خطآ ؟؟ ..



15-04-2018 03:31 مساء
نصر الإيمان
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 74
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 241
الاعجاب : 55
 offline 





السلام عليكم ورحمة الله وبركاته ،،،
معي ملف واريد طباعته pdf  من خلال اليوزر فورم
ولكن عند الطباعه  تظهر لي رسالة خطآ ؟؟؟؟؟
هل من اصلاح لها؟؟؟
 
 
  طباعهpdf.rar   تحميل rar مرات التحميل :(14)
الحجم :(63.571) KB



تم تحرير الموضوع بواسطة :نصر الإيمان
بتاريخ:15-04-2018 03:33 مساء

سبب التعديل : ارفاق الملف







15-04-2018 04:14 مساء
مشاهدة مشاركة منفردة [1]
ظفر الله عسكر
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-12-2017
رقم العضوية : 2747
المشاركات : 79
الجنس : ذكر
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 301
الاعجاب : 75
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
SBDSpwSk72r1Netلست فقيها  حاولت ترجم لم استطع المشكله في الصوره
والاساتذه ان شاء الله ما يقصرون بالحل
 
 
 


أثارت هذه المشاركة إعجاب: نصر الإيمان،




15-04-2018 05:03 مساء
مشاهدة مشاركة منفردة [2]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
وعليكم السلام
جرب الكود التالي عله يفي بالغرض .. يمكنك تعديل بقية الأكواد بنفس الطريقة
Private Sub Comm_الشيت1رئيسي_Click()
    Dim ws          As Worksheet
    Dim folder      As String
    Dim file        As String

    Set ws = ThisWorkbook.Worksheets("الشيت الرئيسي1")

    With CreateObject("Shell.Application")
        folder = .Namespace(0).Self.Path
        file = folder & "\" & ws.Range("Z5").Value & ".pdf"
        ws.ExportAsFixedFormat Type:=xlTypePDF, Filename:=file
    End With
End Sub

أثارت هذه المشاركة إعجاب: نصر الإيمان، الصقر،




15-04-2018 05:11 مساء
مشاهدة مشاركة منفردة [3]
نصر الإيمان
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 74
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 241
الاعجاب : 55
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
سلمت يداك استاذ ياسر81
استاذ ورئيس قسم
ممكن اعرف سبب المشكله كانت ايه؟؟؟
حتى تعم الفائده!!!

أثارت هذه المشاركة إعجاب: YasserKhalil،




15-04-2018 05:26 مساء
مشاهدة مشاركة منفردة [4]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
الإشارة لورقة العمل ..أنت استخدمت رقم الفهرس 8 وعدد أوراق العمل الموجودة 3 فقط 
رقم الفهرس مرتبط بترتيب ورقة العمل في التبويبات الموجودة لديك لذا حسب مثالك يوجد 3 ورقات عمل : الأولى لها رقم الفهرس 1 والثانية لها رقم الفهرس 2 والثالثة رقم الفهرس 3

أمر آخر أنت تقوم بنسخ الورقة لمصنف جديد ثم التصدير .. فهل هناك ما يستدعي القيام بذلك؟!!!
يمكنك التصدير بشكل مباشر لورقة العمل ..كما هو مدرج بالكود

أثارت هذه المشاركة إعجاب: نصر الإيمان، ظفر الله عسكر، الصقر،




15-04-2018 05:44 مساء
مشاهدة مشاركة منفردة [5]
نصر الإيمان
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 74
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 241
الاعجاب : 55
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
طب لو عاوزين نصدر الطباعه بإسم معين في الكود بدون استخدام خليه وادراج اسم فيها -  -ويكون ذلك في فولدر على سطح المكتب
انا قرآت قبل ذلك استخدام الآتي لحضرتك:
 
TestFolder 
مثلاً يصبح السطر بالشكل التالي
sPath = ThisWorkbook.Path & "TestFolderExported.pdf"

إذا كان المجلد 
TestFolder 
يحتوي مجلد آخر تود الإشارة إليه وليكن اسمه 
SubFolder 
فإن السطر يصبح بهذا الشكل
sPath = ThisWorkbook.Path & "TestFolderSubFolderExported.pdf"


ممكن حضرتك توضح كيف يمكن استخدامه في المثال السابق





15-04-2018 07:01 مساء
مشاهدة مشاركة منفردة [6]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
جرب السطر بهذا الشكل
file = folder & "\TestFolder\SubFolder\" & ws.Range("Z5").Value & ".pdf"

أثارت هذه المشاركة إعجاب: نصر الإيمان، ظفر الله عسكر،




15-04-2018 08:06 مساء
مشاهدة مشاركة منفردة [7]
نصر الإيمان
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 74
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 241
الاعجاب : 55
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
جزاك الله خيرا  استاذ ياسر
صراحة عاجز عن شكرك
جعله الله في ميزان حسناتك
الحمد لله رب العالمين

أثارت هذه المشاركة إعجاب: YasserKhalil، ظفر الله عسكر،




15-04-2018 08:55 مساء
مشاهدة مشاركة منفردة [8]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
وجزيت خيراً بمثل ما دعوت لي وزيادة
الحمد لله أن تم المطلوب على خير والحمد لله الذي بنعمته تتم الصالحات
تقبل تحياتي

أثارت هذه المشاركة إعجاب: نصر الإيمان، الصقر،




16-04-2018 08:28 صباحا
مشاهدة مشاركة منفردة [9]
الصقر
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1117
الجنس : ذكر
الدعوات : 8
يتابعهم : 0
يتابعونه : 286
قوة السمعة : 7997
الاعجاب : 1954
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
جزاكم الله خيرا يا ابوبراء
الاخ الكريم نصر الايمان نحن لا ننتظر شكرك ولكن ننتظر تفاعلك فى الموضوعات داخل الموقع 
يمكنك الدخول الى صفحة الشخصيه فى الاحصائيات هتلاقى مواضيع العضو وردود العضو
هتلاقى معظمه اسئله من حضرتك ولا يوجد تفاعل مع الموضوعات الاخرى للاسف 
نحن نريد مجتمع تفاعلى وليس اهداف شخصيه
شارك اخوانك بما تملك من معلومات ربما تكون بسيطه من وجهة نظرك وعند غيرك اول مره يعرفها ويسمع عنها

أثارت هذه المشاركة إعجاب: YasserKhalil، نصر الإيمان، ظفر الله عسكر،




16-04-2018 08:49 صباحا
مشاهدة مشاركة منفردة [10]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3106
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 257
قوة السمعة : 8724
الاعجاب : 2920
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
وجزيت خيراً أخي الحبيب حسام خطاب ومشكور على مرورك العطر وعلى نصائحك الغالية
تقبل وافر تقديري واحترامي

أثارت هذه المشاركة إعجاب: الصقر، نصر الإيمان،




16-04-2018 09:23 مساء
مشاهدة مشاركة منفردة [11]
نصر الإيمان
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 74
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 241
الاعجاب : 55
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
طب معلشي منين اعرف الموضوعات المطروحه الجديده






16-04-2018 09:38 مساء
مشاهدة مشاركة منفردة [12]
ظفر الله عسكر
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-12-2017
رقم العضوية : 2747
المشاركات : 79
الجنس : ذكر
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 301
الاعجاب : 75
 offline 
look/images/icons/i1.gif كود تصدير الصفحات الى pdf من اليوزر فورم
الله يسامحك يا دكتور 
اقتبـاس ،،

طب معلشي منين اعرف الموضوعات المطروحه الجديده

انت تدخل المنتدى اول خمس موضوعات تقريبا هي دوما جديده
والموضوع مبين من عنوانه
تحياتي لك 

أثارت هذه المشاركة إعجاب: نصر الإيمان،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
كود استيراد بيانات من ملف اكسيل مغلق حتى وان كان محمى الصقر
25 2101 Salamco
كيفية إدراج الكود والصور في المشاركات في المنتدى YasserKhalil
14 796 YasserKhalil
كود لجلب البيانات من ملفين للثالث بشرطين أو ثلاثة samycalls2020
18 215 YasserKhalil
اصلاح كود الترحيل من عدة صفحات الى صفحة واحدة هانى على
9 151 YasserKhalil
اسرع كود للبحث والفلترة من خلال التكست بوكس TEXTBOXواظهار النتائج فى الليست بوكسLISTBOX emad ghazi
7 249 ناصر سعيد1

الكلمات الدلالية
تصدير ، الصفحات ، اليوزر ، فورم ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 09:47 مساء

أعلن هنا
أعلن هنا
أعلن هنا