Cell Alignment

[Eid Mostafa]

الأخوة الأعزاء

 

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

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

 

المشكلة التى تواجهنى هى البطء الشديد فى تنفيذ الكود وذلك يرجع إلى كبر حجم النطاقات التى يتم تنفيذ الكود بها جميعاً.

 

مثال: فلنفترض أننا سنقوم بإدخال أحد الأرقام بالخلية B426 فسنجد أن الكود يعمل على كافة النطاقات بدءاً من (A3 : F1060).

 

فهل بالإمكان فك (تقسيم) الكود إلى عدة أكود ليصبح لكل نطاق كود مستقل فى حد ذاتة ويكون التأثير فقط على النطاق الذى يتم إدخال البيانات بة فقط.

 

 

خالص شكرى وتقديرى

أخوكم

عيد مصطفى

Bank Accounts.rar

[احمدزمان]

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

 

اخي الكريم

 

تم تعديل الكود ليعمل على 18 صف فقط

 

مثال:

فلنفترض أننا سنقوم بإدخال أحد الأرقام بالخلية B426 فسنجد أن الكود يعمل على  النطاق بدءاً من A417 الى F435

 

Bank Accounts.rar

[Eid Mostafa]

أخى العزيز

 

تحية طيبة ،،،

بداية أشكرك على إهتمامك بالرد على تساؤلى

 

لكن أخى العزيز أنا لم أقصد مطلقاً أن يقتصر عمل الكود على الأسطر التى أوضحتها فى ملفك (A417 : F435).

 

ولكن ما قصدتة هو إن كانت هنالك إمكانية لفك (تقسيم) الكود إلى عدة أكود ليصبح لكل نطاق كود مستقل فى حد ذاتة ويكون التأثير فقط على النطاق الذى يتم إدخال البيانات بة فقط.

وذلك كالتالى:-

- [A3:C240] & [F3:F240]

- [A243:C555] & [F243:F555]

- [A558:C690] & [F558:F690]

- [A693:C950] & [F693:F950]

- [A953:C1020] & [F953:F1020]

- [A1023:C1035] & [F1023:F1035]

- [A1038:C1060] & [F1038:F1060]

وهو ما يعنى فك (تقسيم) الكود الموجود بالملف إلى (7) أكواد مستقلة عن بعضها.

 

أرجو أن أكون قد وفقت فى شرح ما أقصدة.

 

خالص شكرى وتقديرى

أخوك

عيد مصطفى

تم تعديل ديسمبر 6, 2014 بواسطه Eid Mostafa

[Abdullah Gha]

السلام عليكم،

إحدى مشاكل العمل على النطاقات Ranges من خلال أكواد في بي هي البطء الملحوظ في الأداء، خاصة في حدث Worksheet_Change ، حيث يُجبر إكسيل على مراقبة أي تعديل يجريه المستخدم على النطاق المطلوب، وهذا يكلفه الكثير من الطاقة ويُصبح مصدر إزعاج للمستخدم. قابلت هذه المشكلة قديماً حين عملت على نموذج إكسيل يحاكي بطاقة الأداء المتوازن والمعروفة بـ Balanced Scorecards . ومصدر المشكلة آنذاك أنني احتجت إلى تنفيذ عشرات التنسيقات الشرطية، بينما Excel 2003 ينفذ ثلاثة تنسيقات شرطية كحد أقصى. لكن المشكلة حُلّت تماماً في النسخ التالية لإكسيل.

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

وجهة نظر، والله أعلى وأعلم،

عبدالله،،،
 

[احمدزمان]

 

أخى العزيز

 

تحية طيبة ،،،

بداية أشكرك على إهتمامك بالرد على تساؤلى

 

لكن أخى العزيز أنا لم أقصد مطلقاً أن يقتصر عمل الكود على الأسطر التى أوضحتها فى ملفك (A417 : F435).

 

ولكن ما قصدتة هو إن كانت هنالك إمكانية لفك (تقسيم) الكود إلى عدة أكود ليصبح لكل نطاق كود مستقل فى حد ذاتة ويكون التأثير فقط على النطاق الذى يتم إدخال البيانات بة فقط.

وذلك كالتالى:-

- [A3:C240] & [F3:F240]

- [A243:C555] & [F243:F555]

- [A558:C690] & [F558:F690]

- [A693:C950] & [F693:F950]

- [A953:C1020] & [F953:F1020]

- [A1023:C1035] & [F1023:F1035]

- [A1038:C1060] & [F1038:F1060]

وهو ما يعنى فك (تقسيم) الكود الموجود بالملف إلى (7) أكواد مستقلة عن بعضها.

 

أرجو أن أكون قد وفقت فى شرح ما أقصدة.

 

خالص شكرى وتقديرى

أخوك

عيد مصطفى

 

 

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

1- انا اأيد وجهة نظر الأخ عبدالله

 

2- واضح من ردك انك لم تفهم الشرح السابق لي

 

تم تعديل الكود ليعمل على 18 صف 

9 منها قبل الصف الذي تكتب فيه حاليا ايا كان رقمه

و الصف الذي تكتب فيه حاليا ايا كان رقمه

و 8 منها اسفل الصف الذي تكتب فيه حاليا ايا كان رقمه

  

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

 

آمل ان تكون وصلت الفكرة

 

تحياتي

[Eid Mostafa]

أخى العزيز / Abdullah Gha

 

أشكرك على تفاعلك هذا وإهتمامك بالرد على تساؤلى

 

كما أخص بالشكر أخى / أحمد زمان

 

2- واضح من ردك انك لم "" تفهم "" الشرح السابق لي

 

 

وسأعاود الإطلاع على الملف مرة أخرى حتى (أفهم).

 

خالص شكرى وتقديرى

أخوكم

عيد مصطفى

تم تعديل ديسمبر 6, 2014 بواسطه Eid Mostafa