تثبيت منطقة الكتابة أو تجميد ورقة العمل

[مختار حسين محمود]

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

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

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

Option Explicit

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

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

 

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

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

تم تعديل مايو 2, 2015 بواسطه مختار حسين محمود

[خزاني]

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

[مختار حسين محمود]

أخى  العزيز خزانى  بارك الله فيك

 مشكور لمرورك الكريم  

 

تحياتى 

[طلعت محمد حسن]

بارك الله فيك اخي مختار .

[مختار حسين محمود]

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

 

 

 

 

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

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

تحياتى

تم تعديل مايو 2, 2015 بواسطه مختار حسين محمود

[Yasser Fathi Albanna]

سلمت يمينك أخى الفاضل / مختار

جعله الله فى ميذان حسناتك

[مختار حسين محمود]

اللهم آمين أخى ياسر

أحاول أن أقدم العلم الذى أتعلمه  قدر استطاعتى 

[ابو جودى]

كود مميز

بارك الله فيك

[KHMB]

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

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

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

[مختار حسين محمود]

أشكر الادارة على التصحيح

 

أخى الأستاذ عمرو

 

أخى أبا الحسن والحسين بارك الله فيكما و سعدتُ بمروركما