أيسم إبراهيم قام بنشر أغسطس 10, 2009 قام بنشر أغسطس 10, 2009 السلام عليكم الأخ الكريم لحماية خلية بها معادلات اتبع الآتي حدد الصفحة كلها ثم كليك يمين ==> تنسيق خلايا ==> حماية ثم زيل العلامة من مربع مؤمنة ثم حدد العمود الذي به المعادلات كليك يمين عليه ==> تنسيق خلايا ==> حماية ==> ثم ضع علامة على مربع مؤمنة ثم من شريط الأدوات الرئيسي للصفحة أدوات ==> حماية ==> حماية ورقة ( ويمكنك وضع كلمة سر ) دمت بخير أيسم إبراهيم
محمد يحياوي قام بنشر أغسطس 10, 2009 قام بنشر أغسطس 10, 2009 استدراكا لكلام الاخ ايسم واضافة على ذلك نحدد الخلايا التي نريد اخفاء المعادلات فيها ثم كليك يمين ثم تنسيق خلية ثم تبويب حماية ونؤشر على مربعي محميمة(اذاكنا نريد الحماية)و مخفية اذا كنا نريد اخفاء المعادلة
ابو اسامة العينبوسي قام بنشر أغسطس 12, 2009 قام بنشر أغسطس 12, 2009 السلام عليكم مشاركة بسيط (لاخفاء المعادله و حمايتها) If Target.HasFormula Then Application.DisplayFormulaBar = False ActiveSheet.Protect Else Application.DisplayFormulaBar = True ActiveSheet.Unprotect End If hide_formulabar.rar 1
أ / محمد صالح قام بنشر أغسطس 12, 2009 قام بنشر أغسطس 12, 2009 السلام عليكم مشاركة بسيط (لاخفاء المعادله و حمايتها) If Target.HasFormula Then Application.DisplayFormulaBar = False ActiveSheet.Protect Else Application.DisplayFormulaBar = True ActiveSheet.Unprotect End If إضافة بسيطة على كلام أخي ابو اسامة يتم وضع الكود السابق في حدث عند تغير التحديد في ورقة العمل فيصبح الكود Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.HasFormula Then Application.DisplayFormulaBar = False ActiveSheet.Protect Else Application.DisplayFormulaBar = True ActiveSheet.Unprotect End If End Sub وكل عام أنتم بخير بمناسبة شهر رمضان الكريم أخوكم محمد صالح 2
م. البوريني قام بنشر أغسطس 14, 2009 قام بنشر أغسطس 14, 2009 بارك الله بك ابو اسمامة و يا ريت لو شرح بسيط عن كيفية الاستفادة من هذا الكود حيث لم استطلع معرفة مبدء عمل الكود رغم وضعي له في فجول بيسك
بن علية حاجي قام بنشر أغسطس 14, 2009 قام بنشر أغسطس 14, 2009 السلام عليكم ورحمة الله الكود جميل وهو يقوم بإخفاء شريط الصيغة Barre de Formule عندما نختار خلية بها صيغة، غير أنه إذا قمنا باختيار الأمر "عرض" أو Affichage ثم خاصية إظهار "شريط الصيغة" على الخلية التي تحوي صيغة يعود شريط الصيغة وتظهر بالمقابل الصيغة في هذه الخلية... والله أعلم
أ / محمد صالح قام بنشر أغسطس 14, 2009 قام بنشر أغسطس 14, 2009 السلام عليكم ورحمة الله الكود جميل وهو يقوم بإخفاء شريط الصيغة Barre de Formule عندما نختار خلية بها صيغة، غير أنه إذا قمنا باختيار الأمر "عرض" أو Affichage ثم خاصية إظهار "شريط الصيغة" على الخلية التي تحوي صيغة يعود شريط الصيغة وتظهر بالمقابل الصيغة في هذه الخلية... والله أعلم بالفعل أخي الكريم يمكن إظهار وإخفاء شريط الصيغة والأفضل من وجهة نظري هو اخفاء المعادلة و ما تفرقش إظهار أو إخفاء شريط الصيغة فيكون الكود بعد التعديل وبعد إضافة كلمة مرور لحماية الشيت هكذا Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.HasFormula Then Selection.Locked = True Selection.FormulaHidden = True ActiveSheet.Protect Password:="mas123" Else ActiveSheet.Unprotect Password:="mas123" End If End Sub ويعني الكود السابق إذا كانت النطاق يحتوي على معادلة يتم حماية وإخفاء المعادلة في الخلية ثم حماية ورقة العمل بكلمة مرور هي mas123 وإلا فيلغي الحماية التي تم تنفيذها في جواب الشرط الأول أخوكم محمد صالح 1
محمد يحياوي قام بنشر أغسطس 15, 2009 قام بنشر أغسطس 15, 2009 اخي العزيز اليك هذا الشرح الفلاشي ربما يفيدك (افتحه بالمستعرض IE) اخفاء معادلات.rar
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.