هل الارتباط قيمة خلية بخلية أخرى بعدد كبير جدا يضر الملف

[أبو يوسف النجار]

هل ارتباط قيمة الخلية بخلية أخري في صفحة أخرى  ( خلية = اسم الخلية ) بعدد كبير في الملف يصل ‘لى 70 ألف خليه يزد من حجم الملف ويكون استجابة الملف للحفظ أقل ويكون ثقيل في العمل أرجو الافادة 

[ياسر خليل أبو البراء]

العمل بالمعادلات بشكل عام مع كثرة المعادلات في الملف تثقل الملف وتجعله بطيئاً مع الوقت لكثرة الحسابات Calculations .. ولذا إذا كان هناك حلول بالبرمجة فهي أفضل وأيسر وأسرع في التعامل ، وتجعل البرامج والملفات الضخمة حجمها أقل بكثير .. هذا والله أعلم

[أبو يوسف النجار]

59 دقائق مضت, ياسر خليل أبو البراء said:

العمل بالمعادلات بشكل عام مع كثرة المعادلات في الملف تثقل الملف وتجعله بطيئاً مع الوقت لكثرة الحسابات Calculations .. ولذا إذا كان هناك حلول بالبرمجة فهي أفضل وأيسر وأسرع في التعامل ، وتجعل البرامج والملفات الضخمة حجمها أقل بكثير .. هذا والله أعلم

تسلم يا مبدع / معلش هتقل عليك قول ما أنت متقل 

يعنى ممكن أستخدم  كود الترحيل من أعمدة مختلفة إلى أعمدة مختلفة للمبدع  ( ياسر خليل أبو البراء )

 أفضل من الارتباطات ولو أخذ بعض الوقت لأن ملفى كبير جدا كقاعدة بيانات  ( ربنا يخليك لينا يا غالي ) 

[ياسر خليل أبو البراء]

نعم يمكن أخي الكريم أبو يوسف

كل شيء ممكن .. شاهد الفيديو جيداً وحاول تعمل الكود بنفسك ، ولو تعثرت فيه ضع الكود ووضح النقطة التي تعثرت بها

تقبل تحياتي

[أبو يوسف النجار]

2 ساعات مضت, ياسر خليل أبو البراء said:

نعم يمكن أخي الكريم أبو يوسف

كل شيء ممكن .. شاهد الفيديو جيداً وحاول تعمل الكود بنفسك ، ولو تعثرت فيه ضع الكود ووضح النقطة التي تعثرت بها

تقبل تحياتي

الله يبارك في حضرتك يامستر (  ياسر خليل ) 

شاهدة الفيديو  كتييير يا استاذنا ولكن المشكلة قلة فهمى ـ ممكن لو تكرمت تعلمنى 

النقطة الأولى في الفيديو  current region.value   

أنا لا أعلم ما هى ولكنها = Range  ما أتقد ولذلك بدلتها بالكود  بــ Range("A8:BE" & lr).Value   وهذا أوضح لي وتمام 

Range عندى فيها أعمدة فارغة أحيانا تكون ممتلئة نص ـــ  فـهل هناك فرق بين  current region و Range 

ونفذت الكود ولكنه لا يرحل من بداية A8 ولكنه يرحل من A1  إلى بصراحة مش عارف  

ثانيا المرحل إليها تبدأ من A9  وليس مثل المرحل منها A8  

فما الحل أرجو أن أكون قد وصلت مشكالتى  بشكل صحيح

وشكرا  لك على صبرك  على  والسلام عليكم  

[ياسر خليل أبو البراء]

أخي العزيز أبو يوسف

النقطة الأولى التي تخص CurrentRegion هي طريقة مختصرة .. تعادل طريقة الضغط على Ctrl + A إذا حددت أي خلية داخل النطاق وضغطت على Ctrl + A سيقوم بتحديد النطاق المطلوب بالكامل .. 

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

arr=Range("A8:BE" & lr).Value

 

النقطة الثانية ترحيل من A8 لأن النطاق الذي قمت بتخزينه يبدأ من A8 إذا أردت الترحيل من A1 قم بتغيير النطاق في سطر المصفوفة ..

 

بالنسبة للورقة المرحل إليها .. ستجد أن آخر سطر في الكود هو المسئول عن ذلك وبالتالي يمكنك تغيير نقطة البداية لورقة النتائج من آخر سطر

 

ضع الكود وملفك للإطلاع عليه (ضع نموذج مصغر) .. وضع ملاحظاتك لكي تتعلم ونستطيع أن نفيدك في الوقت ذاته