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

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

قام بنشر (معدل)

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

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

الكود يوضع فى حدث المصنف :

Option Explicit

Private Sub Workbook_Open()
  ThisWorkbook.Sheets("ورقة1").ScrollArea = "A1:R25"  ' غير منطقة الكتابة بتغيير المدى
 End Sub
                                                                                                    

وهذا الرابط له علاقة مباشرة للموضوع  وزيادة : http://www.officena.net/ib/index.php?showtopic=61137

 

وهذا مرفق لتجميد أو تثبيت الصفحة  على مدى محدد .   تحياتى لكم

تثبيت منطقة الكتابة.rar

تم تعديل بواسطه مختار حسين محمود
  • Like 1
قام بنشر

مشكور اخي على المجهودات و بارك الله فيك و في عملك

قام بنشر (معدل)

وفيكم أخى الكريم محمد  مشكور لمرورك

 

 

 

 

أطلب من الادارة  تعديل  فى عنوان الموضوع

تصحيح    كلمة   نجميد    الى   تجميد
عذرا على السهو والنسيان

تحياتى

تم تعديل بواسطه مختار حسين محمود
قام بنشر

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

شكرا اخي مختار علي الهدية

كود رائع ومميز

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information