الفارس محمد رجب قام بنشر مايو 5, 2022 مشاركة قام بنشر مايو 5, 2022 مرفق ملف اكسيل به زرار -- هل يوجد كود لفتح ملف بى دى اف من خلال الزرار الموجود فى ملف الاكسيل المرفق تــم بتعديل رفع الملف بإمتداد Xlsm وذلك تجنباً لإهدار وقت الأساتذة .. طالما تريد حل طلبك بالأكواد اوراق الشركة.xlsm رابط هذا التعليق شارك More sharing options...
أفضل إجابة Ali Mohamed Ali قام بنشر مايو 5, 2022 أفضل إجابة مشاركة قام بنشر مايو 5, 2022 تفضل هناك العديد من الأكواد لتنفيذ طلبك منها : Sub PDF_Show() ActiveWorkbook.FollowHyperlink "C:\Users\Ali\Downloads\ÚÞÏ ÇáÊÃÓíÓ-ãÍæá.pdf" 'يجب عليك تغيير وتعديل عنوان ومكان ملف البى دى اف بما يتوافق عندك بين علامتين التنصيص End Sub وهذا كود ثانى Sub OpenPDF() Dim pdf As String On Error Resume Next pdf = "C:\Users\Ali\Downloads\عقد التأسيس-محول.pdf" 'يجب عليك تغيير وتعديل عنوان ومكان ملف البى دى اف بما يتوافق عندك بين علامتين التنصيص ActiveWorkbook.FollowHyperlink pdf End Sub واليك الملف اوراق الشركة.xlsm 7 2 رابط هذا التعليق شارك More sharing options...
الفارس محمد رجب قام بنشر مايو 5, 2022 الكاتب مشاركة قام بنشر مايو 5, 2022 لا اجد رد يعبر عن مدى احترامى وشكرى لكل من اعضاء هذا المنتدى المحترم الذى تعلمت منه الكتير والكثير شكرا لك ا/ على محمد على 1 1 رابط هذا التعليق شارك More sharing options...
حسين مامون قام بنشر مايو 5, 2022 مشاركة قام بنشر مايو 5, 2022 بعد ادن استادي Ali Mohamed Ali واتراء للموضوع هذه طريق اخرئ 1- حمل الملف وفك الضغط 2 بعد فتح ملف اكسيل حدد اسم ملف بدف واضغط الزر ملاحظة: يجب ان تخزن الملفات ب د ف في نفس الفولدر"oqoud" مع ملف اكسيل و اسمارها ايضا في الصفحة كما في المرفق oqoud.rar 3 1 رابط هذا التعليق شارك More sharing options...
أبو إيمان قام بنشر مايو 9, 2022 مشاركة قام بنشر مايو 9, 2022 بعد إذن الأساتذة الأفضل إثرائا للموضوع يمكن ذلك من خلال التالي =IF(J4>0;HYPERLINK(CONCATENATE("PDF/";J4;".pdf");"الاطلاع على العقد");"") 1 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان