فجأة توقف الزر الأيمن للماوس عن العمل فى اكسيل فقط

[محمد طاهر عرفه]

امس تعرضت لموقف لم اعرض له سابقاو هو انه و فى الاكسيل فقط توقف الزر الايمن للماوس عن العملو افتراضيا تصورت ان الماوس به مشكلة و لكن لم يكن كذلك و كان يعمل فى جمبع التطبيقاتهناك ثلاثة طرق لحل تلك المشكلة- استبدال احد ملفات بدء التشغيل باسم جديد - اعادة تحميل الاوفيس- تشغيل كود بسيط يقوم بحل المشكلة ، و هو الحل الافضل و هذا هو الكود

Sub Enable_All_Right_Click_Menus()
'This will enable all BuiltIn Command bars
Dim Cbar As CommandBar
For Each Cbar In Application.CommandBars
Cbar.Enabled = True
Next
End Sub

المصدر

و قد عادت المشكلة للظهور مرة أخري

و هذ الكود عمل بطريقة افضل

 

 

 

Sub reset_cellcommand()
Application.CommandBars("Cell").reset
End Sub 
 

و احتياطا قمت بفتح ملف 

PERSONAL.XLSB

الموجود فى مجلد

XLSTART

مثلا

 

C:\Users\<username>\AppData\Roaming\Microsoft\Excel\XLSTART\

و قمت بتنفيذ الكود عليه و حفظته

 

[الـعيدروس]

السلام عليكم

استاذي الحبيب محمد طاهر

صادفتني هذه المشكله سابقاً

ومثل ماتفضلت ضنيت انه من الماوس

وتوصلت الى حل المشكله ولا اتذكر الحل

الذي توصلت اليه في حل المشكله

وحضرتك نورتنا بالحل الجميل

بارك الله فيك وجزاك كل خير

تقبل مروري

[حمادة عمر]

السلام عليكم

الاستاذ الكبير / محمد طاهر

حدثت فعلا هذه المشكلة معي قبل ذلك

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

فهنيئاً لنا الكود الرائع

واجمل ما فيه انه من اكواد السهل الممتنع

جزاك الله خيرا

وجعل هذا الصرح وكل اعماله في ميزان حسناتكم يوم القيامة

[ابن بنها]

جزاكم الله خيرا

..

هذا اذا لم يعمل الزر الايمن للماوس

وماذا يكون الحل اذا عمل الزر الايمن للماوس

عند الضغط على اسماء الصفحات وظهرت بعض مافي القائمه باللون الباهت ومجمده لاتعمل

[أحمد السيد]

جزاك الله كل خير استاذ محمد طاهر

ابدعت حقا

[محمد طاهر عرفه]

أضفت كود آخر للموضوع الاول

[أبو محمد أشرف]

رائع استاذ محمد

[عبدالله المجرب]

اخي ابن بنها السبب اعتقد انه وجود حماية على الملف

[احمد غانم]

اخي الكريم 

عبدالله المجرب (ابو احمد)

بداية اكرر تهاني لك و للإخوه الكرام عللى الترقية التى تستحقها حقا بجدارة..الف مبروك

عندي مشكلة مشابهه وهي اختفاء Language Bar الـ. task bar

ويتوقف ايضاً عمل مفتاح shift +alt و اضطر الى الدخول الى ال control panel 

لإعادة الوضع الى طبيعتة في كل مره ابدا فيها ملف اكسل؟

[محمد طاهر عرفه]

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

مثلا اوفيس 2010 مع ذاكرة اقل من واحد جيجا

 

او عطب فى ملفات الاوفيس  او الويندوز و هناك حاجة لاعادة التحميل

[محمد طاهر عرفه]

اذا كنت غيرت شيئا فى خيارات بدء التشغيل ، اعده للوضع الافتراضي

 

Run

msconfig

ريما اوقفت احد خيارات بدء التشغيل ، او احدى الخدمات

 

ايضا جرب

Run

ctfmon.exe

[احمد غانم]

اشكرك استاذنا الكبير محمد طاهر

سوف احاول وارى ماذا يحصل

لك جزيل التقدير

[ابو تميم]

جزاكم الله خيرا أستاذنا القدير محمد طاهر

أنا حدثت معي مشكلة أخرى ولكنها لا تحدث دائما وإنما في بعض مرات تشغيل البرنامج الخاص بي على الاكسل

وهي أنه عندي برنامج على الاكسل يعمل عن طريق الفورم والتنقل في الملف أيضا عبر فورم وعندما أدخل إلى الملف في بعض الاحيان أجد أن مفتاح Enter وأيضا مفتاح Tab لا يعملان معي وعندما أغلق الملف وأعد تشغيله مرة أخرى يعمل معي بشكل جيد

ترى ماذا يمكن أن يكون السبب

جزاكم الله خيرا

[ناصراا]

استاذي الكريم

 

لم أعرف كيف اعمل على الكود 

 

والمجلد XLSTART عندي فارغ لا يوجد به ملفات

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

To fix, close Excel and open regedit. Go to HKCU\Software\Microsoft\12.0\Excel and rename the Options key to Options.old. Open Excel

 

بلا فائدة

 

هل اعيد تحميل الأفيس ؟؟

 

أو هل توجد طريقة لإستعادة افتراضيات اوفيس ؟؟

لأن المشكلة أتعبتني 

 

شكرا لك

[محمد طاهر عرفه]

جرب الاتي

 

ابحث عن الملف

 

   

book.xlt

او

book.xltm

 

و قم بتغيير اسمه الي اي اسم اخر

ثم قم بتشغيل الاكسيل

[ناصراا]

جرب الاتي

 

ابحث عن الملف

 

   

book.xlt

او

book.xltm

 

و قم بتغيير اسمه الي اي اسم اخر

ثم قم بتشغيل الاكسيل

للأسف كلا الملفين غير موجودين في القرص c

 

ولا حتى أي ملف بنفس امتداداتها 

 

هي فرصة لأشكر فضلك في ادارة الموقع بما يحوي من كنوز معرفية مهمة 

تم تعديل مارس 19, 2013 بواسطه ناصراا

[محمد طاهر عرفه]

يبدو انك لا تستخدم الاصدار الاخير جرب البحث عن

 

 

 

book.x*
 

 

[ناصراا]

يبدو انك لا تستخدم الاصدار الاخير جرب البحث عن

 

 

 

book.x*
 

جزاك الله خيرا 

 

لا يوجد أي book وبأي امتداد 

وملفات الإكسل عندي امتدادها xlsx

 

بعد أن أعدت تشغيل الجهاز وفتحت الملف الذي فيه الكود 

Sub reset_cellcommand()

Application.CommandBars("Cell").reset

End Sub 

 

بدأ اعدادات تكوين ثم توقف عند الخطوط ولم يقبل أن يستمر 

[عمر أبو صهيب]

جزاك الله خيرا و بارك فيك

إبداع و لا أروع

[ناصراا]

اعتذر عن ازعاجكم استاذي الكريم 

 

لكني حذفت الأوفيس كاملا وأعدت تحميله ولا زالت المشكلة قائمة 

 

يعمل الزر الأيمن في بعض الأماكن فلو ضغطت على تعليق موجود في الورقة يعمل مباشرة 

أما على الخلايا فلا يعمل الإ اذا ضغطت على الخلية دبل كليك وبدأ داخلها المؤشر فيعمل الزر الأيمن حينها 

 

 

ألم يبق لي إلا أن أفرمت الجهاز ؟

[ناصراا]

الحمد لله بعد بحث طويل وجدت الحل 

 

Sub reset()
Application.CommandBars("Cell").Enabled = True
End Sub

 

شكرا لك استاذي الكريم  وجزاك عنا خير الجزاء

[فضل الله123]

في 1/20/2013 at 13:21, محمد طاهر said:

 

امس تعرضت لموقف لم اعرض له سابقاو هو انه و فى الاكسيل فقط توقف الزر الايمن للماوس عن العملو افتراضيا تصورت ان الماوس به مشكلة و لكن لم يكن كذلك و كان يعمل فى جمبع التطبيقاتهناك ثلاثة طرق لحل تلك المشكلة- استبدال احد ملفات بدء التشغيل باسم جديد - اعادة تحميل الاوفيس- تشغيل كود بسيط يقوم بحل المشكلة ، و هو الحل الافضل و هذا هو الكود

Sub Enable_All_Right_Click_Menus()
'This will enable all BuiltIn Command bars
Dim Cbar As CommandBar
For Each Cbar In Application.CommandBars
Cbar.Enabled = True
Next
End Sub

المصدر

 

و قد عادت المشكلة للظهور مرة أخري

و هذ الكود عمل بطريقة افضل

 

 

 

Sub reset_cellcommand()
Application.CommandBars("Cell").reset
End Sub 
 

و احتياطا قمت بفتح ملف 

PERSONAL.XLSB

الموجود فى مجلد

XLSTART

مثلا

 

C:\Users\<username>\AppData\Roaming\Microsoft\Excel\XLSTART\

و قمت بتنفيذ الكود عليه و حفظته

 

السلام عليكم

اين يوضع هذا الكود