اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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


samiali2013
إذهب إلى أفضل إجابة Solved by ياسر خليل أبو البراء,

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

مرفق ملف حساب عميل وقمت بعمل صفحة فهرس باسماء ورقات العملاء واريد اضافة قيمة خلية محددة بالورقة  بجوار اسمها

 

ارجو الافادة

حساب عميل2015 - Copy.rar

تم تعديل بواسطه samiali2013
رابط هذا التعليق
شارك

هلا سامي

 

يمكنك عمل مرجع لشيت معين مع خليتها عن طريق الدالة Indirect

 

جرب المعادلة التالية:

INDIRECT("'"&$A2&"'!$H$1")
  • Like 1
رابط هذا التعليق
شارك

 

هلا سامي

 

يمكنك عمل مرجع لشيت معين مع خليتها عن طريق الدالة Indirect

 

جرب المعادلة التالية:

INDIRECT("'"&$A2&"'!$H$1")

شكرا ابو تراب على سرعة الرد

ولي طلب اخر

اريد عند فتح الملف ان يقف الماوس عند اول خلية A1  فى الشيت المسمى القائمة كيف افعل ذلك 

تم تعديل بواسطه samiali2013
رابط هذا التعليق
شارك

  • أفضل إجابة

أخي الفاضل

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

بعد الدخول على محرر الأكواد عن طريق Alt +F11 قم بنسخ الكود التالي في حدث المصنف عن طريق النقر المزدوج على ThisWorkbook من نافذة المشروع في الجهة اليسرى

(ركز بقول في اليسرى وانت بتبص في الجهة اليمنى ..!!) :rol: ، دبل كليك على المصنف والصق الكود التالي فيه ، احفظ الملف واقفل المصنف وافتحه ..

Private Sub Workbook_Open()
    Sheets("القائمة").Activate: Range("A1").Select
End Sub
رابط هذا التعليق
شارك

 

أخي الفاضل

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

بعد الدخول على محرر الأكواد عن طريق Alt +F11 قم بنسخ الكود التالي في حدث المصنف عن طريق النقر المزدوج على ThisWorkbook من نافذة المشروع في الجهة اليسرى

(ركز بقول في اليسرى وانت بتبص في الجهة اليمنى ..!!) :rol: ، دبل كليك على المصنف والصق الكود التالي فيه ، احفظ الملف واقفل المصنف وافتحه ..

Private Sub Workbook_Open()
    Sheets("القائمة").Activate: Range("A1").Select
End Sub

 

تسلم يا خبير

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information