اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

عمل زر يقوم بفتح ملف موجود بنفس الفولدر


megonil

الردود الموصى بها

السلام عليكم ورحمه الله وبركاته

كيفكم يا شباب المنتدى

أريد عمل زر عن طريق صورة عند الضغط عليه يقوم بفتح الملف المرفق

الملف المراد فتحه يكون فى نفس الفولدر

ومرفق الملف وشيت الإكسيل

وانا فى انتظار ردكم

وشكرآ

عمل زر.rar

رابط هذا التعليق
شارك

اخي

ضع الفولدر غي ال c او ال d

مع ملاحظة هامه غير اسم الفولدر الي اسم بلغة انجليزية و ليس بالعربية

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

و التي كان رابطها

Sub Picture123_Click()

    X = "C:\Program Files\GlobFX\Swiff Player\SWFPlayer.exe"

    y = ThisWorkbook.Path & "\flash.swf"


    Shell X & " " & y, vbNormalFocus


End Sub

و اخبرني النتيجة

تحياتي

رابط هذا التعليق
شارك

استاذ عادل

مش عارف اقولك إه

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

ومره لما داوس على زر يفتح

بس ساعات الإفتكاسات بطرقع فى الدماغ

وحلها بيكون عندك

الف شكر

رابط هذا التعليق
شارك

طيب ممكن حضرتك تعدل فى الكود

بمعنى إه انا هدوس على الزر هيشتغل وده حصل

بس انا عايز لما اجى اقف بالسهم على الصورة تظهر كلمه

تدى شرح للى هيظهر

ولتنكن مثلآ كلمه أوفيسنا

اللى اسمها "screen tip text"

تم تعديل بواسطه megonil
رابط هذا التعليق
شارك

الله ينور عليك

تسلم ايدك وتسلم افكارك

والله انا بعتزر هو مش مستعلجل ......... بس مستعجل

هههههههههههه

الف شكر مره تانيه على تعبك معايا

فى الفتره اللى انا بعت فيها الرساله

دورت عن طريق جوجل لقيت الكود ده

ActiveSheet.Hyperlinks(1).ScreenTip = "Return to the home page"

بس بصراحه معرفتش اوظفه لأنه جيت اجرب بعد الدوت

"ScreenTip = "Return to the home page

بس فشلت بصراحه

بس تسلمى مره تانيه

أخوك

محى الدين

رابط هذا التعليق
شارك

السلام عليكم

اخي megonil

انا مش عارف انت مودينا علي فين

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

هي افكار كويسه بس المهم انه سيعمل بها عمل كبير اما نشوف

المرفق يفتح الملف الفلاشي بعد 10 ثوان من تحقق الشرط و هو ان تكون قيمة الخلية E4 =1

جرب المرفق

تحياتي

flash.rar

رابط هذا التعليق
شارك

السلام عليكم ورحمه الله وبركاته

اشكرك استاذ عادل على تعبك معايا

وانا كنت عارف حضرتك اللى هترد على سؤالى

بشكرك مره تانيه بس الطلب كان مختلف

كنت طالب لما يتحقق الشرط بعديه بـ 30 ثانيه يتكتب فى خليه معينه رقم معين

على العموم بشكرك مره تانيه

بس انا فكرت شويه وحلتها بطريقه تانيه

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

فاكنت عايز يتحقق على فترات والحمد لله وصلتلها بتقسيم الوقت

بشكر حضرتك على مجهودك وتعبك معايا

بس برده لو حضرتك توصلت لحله ياريت حضرتك تبعته لأنى أكيد هستفيد بالنتيجه اللى حضرتك هتوصلها

واكيد هتنفع فى افكار مختلفه

وانا مش بعمل اخترع ولا حاجه

كل الفكره انا من 6 سنين وكل سنه بعمل إمساكية رمضان الذكية

وكل سنه بطور فيها بالمعلومات اللى بكتسبها من خلال مجال العمل ومن خلال المنتدى

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

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

وبعتزر على الإطاله وتعبك معايا

أخوك محى الدين عنتر

تم تعديل بواسطه megonil
رابط هذا التعليق
شارك

  • 1 month later...

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information