كيفية دمج خلايا ورقة عمل محمية

[أبو أحمد]

السلام عليكم ورحمة الله / ألاساتذة أعضاء المنتدى 

لي طلب ممكن المساعدة 

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

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

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

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

أثناء حل المسألة قد نحتاج الى دمج خليتين أو أكثر معا بشكل عمودي (مثلا الاخ والاخت) نقوم بدمجهما ليعلم أن للذكر مثل حظ الانثيين فيجب أن يقوم المستخدم بدمج الخليتين عموديا معا وهذا وارد في كثير من المسائل ولا يمكن تحديده قبل اجراء المسألة ولا تحديد كم مرة سنحتاج إليه ولا تحديد خلاي معينة 

وايضا اريد عمل حماية للمعادلات التي قمت بتصميمها حتى لا يدخل عليها تغيير بالخطأ من المستخدم (حماية) 

فهل يمكنني عمل للحماية لورقة الاكسيل مع اتاحة الدمج في خلايا أعمدة معينة (قد تختلف من مسألة لأخرى) 

أرجو أن أكون وضحت الفكرة لكم

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

مثال للتوضيح.xlsx

[أ / محمد صالح]

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

وأن يبدأ الكود بسطر لفك الحماية

ثم أي كود تريده كدمج نطاق معين أو دمج الخلايا المحددة

ثم آخر سطر لإعادة حماية الشيت مرة أخرى

ActiveSheet.Unprotect "password"
Range("C3:E3").Merge 'Selection.Merge
ActiveSheet.Protect "password"

وأنصح ألا يحتاج المستخدم لدمج خلايا جديدة بعد حماية ورقة العمل

فالأولى دمج الخلايا قبل الحماية

بالتوفيق

[حسونة حسين]

اخي @أبو أحمد

الاجابه التي قدمها لك @أ / محمد صالح لو ركزت فيها ستجد انها تفي بطلبك تماما

الاستاذ محمد كاتب لك

ActiveSheet.Unprotect "password"
Range("C3:E3").Merge 'Selection.Merge
ActiveSheet.Protect "password"

كل ما عليك ان تجعله كالتالي

ActiveSheet.Unprotect "password"
Selection.Merge
ActiveSheet.Protect "password"

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

[أبو أحمد]

أستاذي الكريم / جزاكم الله خيرا على الرد 

ولكن المطلوب هو دمج للخلايا وهي غير محددة الا أثناء حل المسألة 

ثانيا : هذا الدمج يختلف من مسألة لأخرى فلا يمكن تحديد الخلايا في الكود لانها غير ثابتة وتختلف من مسألة لأخرى 

أرجو أن تكون الفكرة وضحت 

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

[حسونة حسين]

تفضل اخي

 

مثال للتوضيح.xlsb

[احمد عبدالحليم]

بعد اذن الاخوة الافاضل 

اخى أبو أحمد هل من طريقة للتواصل معك