مختار البركاني قام بنشر ديسمبر 20, 2015 مشاركة قام بنشر ديسمبر 20, 2015 (معدل) السلام عليكم ورحمة الله وبركاته لدي الملف المرفق استخدمه لترحيل اشعارات وحفظ نسخة من الاشعار بملف pdf تعطل عليا الملف وتظهر الرسالة invalid procedure call or argument امل من الاخوة التعاون بحل المشكلة وتقبلوا تحياتي Desktop.rar تم تعديل ديسمبر 20, 2015 بواسطه مختار البركاني خطاء مطبعي رابط هذا التعليق شارك More sharing options...
مختار البركاني قام بنشر ديسمبر 20, 2015 الكاتب مشاركة قام بنشر ديسمبر 20, 2015 اخواني هل من حل للمشكلة اذا تكرمتم. رابط هذا التعليق شارك More sharing options...
عبدالله الصاري قام بنشر ديسمبر 23, 2015 مشاركة قام بنشر ديسمبر 23, 2015 اخي الفاضل السلام عليكم الكود ليست به اي مشكلة في الكود المطلوب تحويل الاشعار الى ملف اسمه mokhter يجب ان يكون لديك ملف في القرص D بإسم ,mokhter وستحل المشكلة بإذن الله وقد جربت ذلك وتم نحويل الاشعار اشعارات.rar رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر ديسمبر 23, 2015 مشاركة قام بنشر ديسمبر 23, 2015 أخي الكريم مختار تأكد من وجود المجلد المسمى Mokhtar في البارتشن D ثم جرب التعديل البسيط الذي يسرع من عمل الكود Sub Tarheel() Dim myFile As String, iRow As Integer myFile = "D:\Mokhtar\" & Sheets(1).Range("C8") & "-" & Sheets(1).Range("I7") & ".pdf" iRow = Sheets(2).Range("A" & Rows.Count).End(xlUp).Row + 1 Application.ScreenUpdating = False Application.DisplayAlerts = False Application.Calculation = xlCalculationManual Sheets(2).Range("A" & iRow).Value = Sheets(1).Range("H6").Value Sheets(2).Range("B" & iRow).Value = Sheets(1).Range("I7").Value Sheets(2).Range("C" & iRow).Value = Sheets(1).Range("C8").Value Sheets(2).Range("D" & iRow).Value = Sheets(1).Range("I28").Value Sheets(2).Hyperlinks.Add anchor:=Sheets(2).Range("F" & iRow), Address:=myFile, TextToDisplay:=myFile Sheets(1).ExportAsFixedFormat Type:=xlTypePDF, Filename:=myFile MsgBox "Done", 64 Application.ScreenUpdating = True Application.DisplayAlerts = True Application.Calculation = xlCalculationAutomatic End Sub أرجو أن يفي بالغرض ويحل المشكلة ..إذا استمرت المشكلة يرجى تحديد السطر باللون الأصفر لمعرفة مكمن الخطأ .. من خلال النقر على زر Debug 1 رابط هذا التعليق شارك More sharing options...
مختار البركاني قام بنشر ديسمبر 24, 2015 الكاتب مشاركة قام بنشر ديسمبر 24, 2015 اخواني الاعزاء هذه الملف اعمل عليه منذ اشهر ولم تواجهني اي مشكلة وبالنسبة للمجلد باسم Mokhtar فهو موجود بال D ايضا تم استبدال الكود بمود الاخ ابو البراء ولم يعمل حسب المرفقات فهل المشكلة بالاكسل لدى او ان هناك اعدادات تم تغيرها لدى شاكرا لتفاعلكم رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر ديسمبر 24, 2015 مشاركة قام بنشر ديسمبر 24, 2015 ما هي نسخة الأوفيس التي تعمل عليها؟ إذا كانت أوفيس 2007 فأعتقد أنك ستحتاج لإضافة يتم تنصيبها فيما يخص تصدير ملفات PDF أما الإصدارات الأحدث فلا يوجد بها مشكلة والكود مجرب ويعمل جيداً 1 رابط هذا التعليق شارك More sharing options...
KHMB قام بنشر ديسمبر 24, 2015 مشاركة قام بنشر ديسمبر 24, 2015 السلام عليكم ورحمة الله شكرا للجميع عمل معي الملف 100% من اول خطوه جزاكم الله خير 1 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر ديسمبر 24, 2015 مشاركة قام بنشر ديسمبر 24, 2015 وعليكم السلام أبا الحسن والحسين جزيت خيراً على تجربة الكود والملف .. بارك الله فيك ونفع بك إخوانك يرجى من الأخ مختار ذكر النسخة التي تعمل عليها .. وإذا كانت النسخة أوفيس 2007 فلتخبرنا ، فقد تكون المشكلة في النسخة لديك تقبلوا تحياتي 2 رابط هذا التعليق شارك More sharing options...
مختار البركاني قام بنشر ديسمبر 24, 2015 الكاتب مشاركة قام بنشر ديسمبر 24, 2015 نعم استاذ ياسر اعمل على النسخة 2007 ما الذي يحتاج تنصيب رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر ديسمبر 24, 2015 مشاركة قام بنشر ديسمبر 24, 2015 جرب الملف التالي SaveAsPDFandXPS.rar 1 رابط هذا التعليق شارك More sharing options...
مختار البركاني قام بنشر ديسمبر 24, 2015 الكاتب مشاركة قام بنشر ديسمبر 24, 2015 (معدل) بارك الله فيك استاذ ياسر خليل أبو البراء نعم اشتغل الف الف شكر تم تعديل ديسمبر 24, 2015 بواسطه مختار البركاني 1 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر ديسمبر 24, 2015 مشاركة قام بنشر ديسمبر 24, 2015 الحمد لله الذي بنعمته تتم الصالحات الحمد لله أخي الحبيب مختار أن من الله علينا بحل المشكلة لا تنسانا بدعوة بظهر الغيب تقبل تحياتي 1 رابط هذا التعليق شارك More sharing options...
KHMB قام بنشر ديسمبر 24, 2015 مشاركة قام بنشر ديسمبر 24, 2015 السلام عليكم ورحمة الله الاخ الحبيب والعزيز استاذنا ومشرفنا الفاضل / ياسر خليل ابو البراء والله العظيم يعجز اللسان عن شكرك وبأدي طريقة او تعبير فلك دعوة طيبة من القلب في ظهر الغيب. في الفترة التي انت فيها الغائب الحاضر هناك عند كل دخول نرى كثير من المواضيع الردود صفر والان لايوجد . فبارك الله فيك وجزاك الله خير الجزاء 1 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر ديسمبر 24, 2015 مشاركة قام بنشر ديسمبر 24, 2015 أخي الغالي أبا الحسن والحسين بارك الله فيك وجزاك الله خيراً على كلماتك الرقيقة وشعورك الطيب نحوي البركة في الأخوة المتواجدين ..إن غاب نجم فهناك شموس تضيء بالمنتدى ليل نهار وأنت أحد هؤلاء النجوم تقبل وافر تقديري واحترامي 1 رابط هذا التعليق شارك 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.