أخي الباحث
هذا هو الكود
Private Sub Workbook_Open()
Sheets("sheet3").Activate
Range("a1").Select
End Sub
و لاحظ انه تم وضعه في الحدث
Private Sub Workbook_Open()
و شرحه بسيط جدا
Sheets("sheet3").Activate
كلمة Sheets كلمة محجوزة في الاكسيل و تستخدم عند الاشارة لصفحة معينة
و كل ما عليك هو تغيير اسم الصفحة بين القوسين و بين علامتي التخصيص
و هي هنا ("sheet3")
و ضع مكانها اسم الصفحة التي ترغب في ان تكون صفحة البداية الخاصة بك
مثلاً صفحتك اسمها البداية ("البداية ")
و هكذا يصبح شكل الكود
Sheets("البداية").Activate
و نهاية الامر
Activate
و هو الامر الذي يقوم الاكسيل بناءاً عليه بتفعيل هذه الصفحة عند كل بداية للملف
أتمنى ان تكون قد وضحت الصورة لك
و دمت في حفظ الله و رعايته
Sheet3.rar