طلب كود لتشغيل ملف داخل نفس مجلد ملف الاكسل

[ايهاب سعيد]

هل يوجد كود لتشغيل ملف تنفيذي داخل نفس مجلد ملف الاكسل

[الـعيدروس]

السلام عليكم

Public Sub Ali_Op()

Dim A$, Fl_ex_A$

A = "C:\As.exe" ' مسار ملف exe

Fl_ex_A = A: Shell Fl_ex_A

End Sub

[ايهاب سعيد]

مع الشكر اخي عباد ولكن في كودك السابق يشترط مسار محدد وانا ارغب في تشغيل البرنامج طالما هو في نفس فولدر ملف الاكسل

[الـعيدروس]

تفضل

Public Sub Ali_Op()

Dim A$, Fl_ex_A$

A = ThisWorkbook.Path & "\" & "As.exe" ' مسار ملف exe

Fl_ex_A = A: Shell Fl_ex_A

End Sub

[ايهاب سعيد]

جزاك الله خيرا هو المطلوب ولكن لو سمحت لي فان البرنامج يعمل في الخلفية فهل هناك امكانية لتشغيله في المقدمة مع الشكر

[الـعيدروس]

على أي لغة برمجه صمم البرنامج ؟

[ايهاب سعيد]

صممم البرنامج ب v.b

[ايهاب سعيد]

هل يمكن تكبير البرنامج الاخر ليشمل الشاشة بالكامل خصوصا انه مصمم ب v.b وذلك بتعديل الكود السابق مع الشكر

[الـعيدروس]

بخصوص تغير الحجم وتغير التثبيت في المقدمه

لابد أن تدخل على أكواد البرنامج

هل البرنامج مفتوح المصدر أم لا

إذا كان مفتوح المصدر أرجو إرفاقه هنا

وإذا البرنامج خاص تقدر ترسله على إيميلي

وأحاول اعدل عليه

وإن شاء الله خير

[ايهاب سعيد]

استاذي الفاضل البرنامج برنامج الموريث ارفقه لسيادتكم وكنت اريد تشغيله من خلال الاكسل

ملاحظة عند الربط التشعبي بالبرنامج يقوم بفنتح البرنامج بالكامل ولكني افضل وجود زر للربط لاني اريد ان يظهر الزر ويختفي عند شرط معين

m.rar