الفله قام بنشر نوفمبر 12, 2009 مشاركة قام بنشر نوفمبر 12, 2009 ممكن المساعده عندي ملف اكسل فيه 15 صفحه واحتاج عند بدء التشغير يذهب الى صفحه معينه وهي الرئيسيه عشان كل الروابط للصفحات فيها .... والف شكر لكم رابط هذا التعليق شارك More sharing options...
عادل حنفي قام بنشر نوفمبر 12, 2009 مشاركة قام بنشر نوفمبر 12, 2009 (معدل) السلام عليكم من محرر الاكواد وفي محرر اكواد ThisWorkbook يتم وضع الكود التالي Private Sub Workbook_Open() sheets("اسم الشيت المراد ان يفتح الملف عليه").activate End Sub تحياتي تم تعديل نوفمبر 13, 2009 بواسطه aah_aah2008 رابط هذا التعليق شارك More sharing options...
النوع الساكت قام بنشر نوفمبر 12, 2009 مشاركة قام بنشر نوفمبر 12, 2009 السلام عليكم من محرر الاكواد وفي محرر اكواد ThisWorkbook يتم وضع الكود التالي Private Sub Workbook_Open() shets("اسم الشيت المراد ان يفتح الملف عليه").activate End Sub تحياتي وعليكم السلام ورحمة الله وبركاته وانا بعد اخوي ابي اعرف هالطريقة بس من محرر الاكواد وفي محرر اكواد ThisWorkbook ما فهمتها ياليت تبسطها . منكم نستفيد وبكون شاكر لك رابط هذا التعليق شارك More sharing options...
الفله قام بنشر نوفمبر 13, 2009 الكاتب مشاركة قام بنشر نوفمبر 13, 2009 بارك الله فيك اخوي و احسن الله لك رابط هذا التعليق شارك More sharing options...
naderwatfa قام بنشر نوفمبر 13, 2009 مشاركة قام بنشر نوفمبر 13, 2009 (معدل) السلام عليكم من محرر الاكواد وفي محرر اكواد ThisWorkbook يتم وضع الكود التالي Private Sub Workbook_Open() shets("اسم الشيت المراد ان يفتح الملف عليه").activate End Sub تحياتي وعليكم السلام ورحمة الله وبركاته وانا بعد اخوي ابي اعرف هالطريقة بس من محرر الاكواد وفي محرر اكواد ThisWorkbook ما فهمتها ياليت تبسطها . منكم نستفيد وبكون شاكر لك أخي الكريم .. الطريقة سهلة إن شاء الله .. من اسم التاب اللي في أسفل الصفحة اضغط على الماوس باليمين و اختر View Code و سيفتح لك بذك محرر الأكواد و على اليسار فوق ستجد نافذة منها اختر This Workbook و فيها ضع الكود و اكتب اسم الشيت المطلوب أن يبدأ مع فتح الملف مكان الكتابة العربية الملونة في الكود و احفظ التغيير تم تعديل نوفمبر 13, 2009 بواسطه naderwatfa رابط هذا التعليق شارك More sharing options...
عادل حنفي قام بنشر نوفمبر 13, 2009 مشاركة قام بنشر نوفمبر 13, 2009 السلام عليكم اخي نادر لك الشكر و اخي النوع الساكت ان لم تستوعب كلام الاخ نادر اخبرنا بذلك و سيتم الشرح بتوضيح اكبر علي فكره الكود كان به خطأ بسيط تم تعديله بالاعلي و عموما ها هو مرة اخري Private Sub Workbook_Open() sheets("اسم الشيت المراد ان يفتح الملف عليه").activate End Sub تحياتي رابط هذا التعليق شارك More sharing options...
النوع الساكت قام بنشر نوفمبر 13, 2009 مشاركة قام بنشر نوفمبر 13, 2009 naderwatfa تسلم أخوي على التوضيح بس نفس الشئ يالغالي ما تفتح عندي الصفحة الرئيسية دائما ً :') انا عندي برنامج وفيه 48 صفحة او شيت اذا بطلع من البرنامج يطلب مني حفظ التغيرات اذا قلت له ( لا ) اوكي اذا بشغل البرنامج وتفتح عندي الصفحة الرئيسية واذا قلت له ( نعم) وبرجع اشغل البرنامج تفتح عندي اخر صفحه كنت فاتحها * اذا فيه طريقة نقدر نكنسل مسج الحفظ عند اغلاق البرنامج يكون افضل والشكر موصول للأخ aah_aah2008 واذا عندك الحل بعد انا في انتظاره رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر نوفمبر 14, 2009 مشاركة قام بنشر نوفمبر 14, 2009 السلام عليكم اذا فيه طريقة نقدر نكنسل مسج الحفظ عند اغلاق البرنامج يكون افضل والشكر موصول للأخ aah_aah2008 واذا عندك الحل بعد انا في انتظاره تفضل الكود التالي: Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.DisplayAlerts = False ThisWorkbook.Close Application.DisplayAlerts = True End Sub رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.