كيف اتعامل فى المعادلات فى الاكسل بترتيب الورق

lord · أبريل 9, 2005

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

هل ممكن اتعامل مع الاوراق فى الاكسل على ترتيبها فى الملف

وليس اسم الورقة

عندى ملف مكون من 10 ورقات كل ورقة لها اسم عند ربطها بأوراق اخرى

اريد ان اربطها بترتيبها فى الملف يعنى الورقة الاولى مثلا تعتبر رقم واحد دون النظر الى اسمها

هل ممكن

وشكرا

**محمد حجازي** · أبريل 11, 2005

السلام عليكم ...

ليش العذاب يا أخي ؟!!!

بحثت لك في دوال الاكسل الجاهزة و لم أجد مبتغاك.

على أية حال فقد أنشئت لك الدالة SheetsCount :

أولاً قم بوضع الكود التالي في الموديل:

Function SheetsCount(Index As Integer) As String
  SheetsCount = Sheets(Index).Name
End Function

الدالة السابقة تقوم بإرجاع اسم الورقة بناءاً على ترتيبها. الآن اذهب إلى ورقة العمل واستخدم هذه الدالة مع الدالة INDIRECT في وضع هذه الصيغة:

=INDIRECT(SheetsCount(2)&"!"&"D4")

بالتوفيق :fff:

ابو الهش · أبريل 20, 2005

شكر للاستاذ محمد حجازى

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

ولسيادنكم جزي لالشكر

**محمد حجازي** · أبريل 21, 2005

السلام عليكم ...

جرب الصيغة التالية:

=INDIRECT("[mah]"&SheetsCount(2)&"!"&"D4")

التي تقوم بإرجاع قيمة الخلية D4 الموجودة في الورقة الثانية من المصنف mah.

ملاحظة :

يجب أن يكون المصنف mah مفتوحاً وإلا فإن التعليمة INDIRECT ترجع الخطأ #REF!

تحياتي :fff:

lord · أبريل 29, 2005

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

شكراً للاستاذ محمد حجازى جزيل الشكر لان الكود يعمل بكفائة عالية جدا وهو

ربط احصاء عشرة ورقات عمل بورقة داخل الملف بترتيب الورق كل الى بغيرة هو رقم الورقة وليس اسمها مهما تغيرت اسماء الورق مازالت الورقة مرتبطة بترتيبها

هذه الورقة بأقوم ووضعها فى اى ملف اخر يقوم بربط جميع اوراق ملف فى الخلايا المحددة

سوف اضع مثال لهذه الفكرة حتى تكون واضحة اكثر لكن هى مهمة فى بعض الاحيان

واشكركم جميعا

الردود الموصى بها