عبدالله المجرب قام بنشر نوفمبر 7, 2010 قام بنشر نوفمبر 7, 2010 السلام عليكم اخواني عندي استفسارين اولاً في الملف المرفق نص متحرك ((ماخوذ من مشاركة سابقة لبعض الاخوة)) كيف يمكن جعله يظهر في ورقة ((sheet1)) فقط وليس في الثلاث ثانياً كود لفتح ملف وورد (مهما كان موقعه في الجهاز)بواسطة زر في ملف اكسل وشكراً لكم اخواني فقد تعلمت الكثير من هذا المنتدى الرائع السلام عليكم تتحرك.rar
عبدالله المجرب قام بنشر نوفمبر 8, 2010 الكاتب قام بنشر نوفمبر 8, 2010 ارجوكم اخواني انا منتظر الرد على احر من الجمر وذلك للاهمية وشكراً
ابو القبطان قام بنشر نوفمبر 9, 2010 قام بنشر نوفمبر 9, 2010 اخي الحبيب : ولد المجرب كل سنه وانت طيب .. على ماهو آت .. وقفة عرفات وعيد الاضحى من حيث طلبك الكريم اولا اذهب الى الموديول في الملف الحالي وقف عليه واضغط ماوس يمين واختر تصدير ملف ووجه الى اي مكان وليكن سطح المكتب ثم افتح ملف جديد ومن محرر الاكواد اذهب وقف على الورقة التي تريد وليكن ورقة 1 واضغط دبل كليك لتفتح صفحة كود الورقة 1 قف على الورقة في الجهة اليسرى وماوس يمين واختر استيراد ملف - المقصود جعل الكود داخل الورقة 1 وليس على مستوى الملف بالكامل وتقبل شكري
ابو القبطان قام بنشر نوفمبر 9, 2010 قام بنشر نوفمبر 9, 2010 اليك اخي ايضا اضافة عبارة اخرى بجانب الاولى لتكون " السلام عليكم ورحمة الله وبركاتة .. وكل عام وانتم بخير " مع تغيير اتجاه الحركة لتكون من اليسار لليمين لتناسب لغتنا العربية h1.rar
عبدالله المجرب قام بنشر نوفمبر 10, 2010 الكاتب قام بنشر نوفمبر 10, 2010 (معدل) اخي الحبيب : ولد المجرب كل سنه وانت طيب .. على ماهو آت .. وقفة عرفات وعيد الاضحى وانت طيب وكل عام وانت والامتين العربية والاسلامية بخير وعساك من عوادة شكراً اخي العزيز على ردك ومساعدتك وتمت تجربتها ولكن اخي عن اعادة فتح الملف فان النص لايعمل اوتماتيكياً وانما يجب تشغيل الميكرو حتى يعمل كما اتمنى اخواني ان تساعدوني في طلبي الثاني وذلك للاهمية تم تعديل نوفمبر 10, 2010 بواسطه ولد المجرب
بوحماد قام بنشر نوفمبر 12, 2010 قام بنشر نوفمبر 12, 2010 مشكوررر الاستاذ new4a ولاكن النص لايعمل اوتماتيكياً وانما يجب تشغيل الميكرو حتى يعمل
بوحماد قام بنشر نوفمبر 15, 2010 قام بنشر نوفمبر 15, 2010 كيف نجعلة يعمل اوتماتيكياً وانما يجب تشغيل الميكرو حتى يعمل
konafa4000 قام بنشر نوفمبر 15, 2010 قام بنشر نوفمبر 15, 2010 السلام عليكم ورحمة الله وبركاته اذا سمحتم لى بالمشاركة هذا هو تعديل بسيط فى الكود (بوضعه فى حدث فتح الملف ) (ووضعه فى حدث تنشيط الشيت 1) مع تحديد المسار الكامل للخلية o3 داخل شيت 1 لكى لا يتكرر هذا الكود فى باقى الشيتات ارجو ان يكون ذلك المطلوب كل عام وانتم بخير اخوكم konafa4000 h1.rar 1
بوحماد قام بنشر نوفمبر 17, 2010 قام بنشر نوفمبر 17, 2010 مشكور استاذنا konafa4000 على هذا الشرح الجميل ولاكن عنى سؤل كيف بوضعه فى حدث فتح الملف انا تسخة الكود ولكن لم يعمل وكذلك ووضعه فى حدث تنشيط الشيت 1) صحيح يعمل الملف الذى رفقته لاكن نريد كيف نعمل ذلك ممكن تشرح لى ذلك وكل عام وانت والجميع بخير
konafa4000 قام بنشر نوفمبر 17, 2010 قام بنشر نوفمبر 17, 2010 السلام عليكم اخى العزيز Private Sub Workbook_Open() t = " السلام عليكم ورحمة الله وبركاته وكل عام وانتم بخير " n = 0 Do While n < 5000 t = Right(t, Len(t) - 1) & Left(t, 1) Sheet1.Range("o3") = t w = 0.2 temp = Timer Do While Timer < temp + w DoEvents Loop n = n + 1 Loop End Sub هذا هو الذى يوضع بحدث فتح الملف Private Sub Workbook_Open() غالبا انت قمت بنسخ الكود كاملا بما فيه اسم الاجراء Sub auto_open() ضمن حدث Private Sub Workbook_Open() وهذا خطأ فيجب فقط ان تضع الجمل الخاصة بالكود اسفل حدث فتح الملف نفس الامر مع حدث تنشيط الشيت 1 اخوك konafa4000
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.