بارك الله فيك استاذنا الخالدي انا امس حاولت ان اقدم المساعدة ولكن دون جدوى وهذا شي جديد نتعلمة من منتدانا الغالي
جربت الطريقة ولم يظهر لي الخلل الذي في رد الاستاذ كيماس (للعلم)
ابواحمد
الاستاذ العزيز عادل اقدم اعتذاري فقد كان يجب اولاً تقديم الشكر على المساعدة والمجهود الذي بذلته وتستحق الشكر عليه ومن ثم ابداء الملاحظات على الملف لذا اكرر اسفي مرة اخرى على تسرعي وشكراً (فانا لا انسى فضلك بعد الله في مساعدتي في طلباتي الكثيرة)
ابواحمد
الخلل في الملف ان التاريخ في الخلية صيغته عام ولابد من ضبط فورمات الخلية بصيغة تاريخ وقد قمت بعمل اللازم زاتمنى ان يكون هذا هو الحل المطلوب
ابو احمد
تاريخ معكوس.rar
الاستاذ العزيز عادل
تم تجربة الملف كما طلبت ولكن الحماية ليست بالمستوى المطلوب فيمكن فك الحماية من تبويب الادوات حماية فك الحماية دون الحاجة الى الازرار كما ان رسالة التنبيه ليس لها اي داعي وانما المطلوب انه لا يمكن الوقف على الخلية او التعديل فيها عند الضغط على زر الحماية حتى من تبويب الادوات وانما يتم فك الحماية بواسطة الزر الاخر الخاص بفك الحمايةمع عدم ظهور رسالة التنبيه.
ابواحمد
بصراحة ويشهد الله اني احب هذا المنتدى باعضاءه الذين تفصل بيني وبينهم المسافات الطويلة وكل واحد من بلد مختلف ولكني اكن في قلبي كل محبة ومودة لجميع الاعضاء والاخوة الاكارم اما المنتدى فيكفي دليل واحد على معزته في قلبي وهو اني منذ ان اشتركت فيه وهو الموقع الوحيد(يشهد الله بذلك الا في الحالات النادرة) الذي اقوم بتصفحه ومتابعة مشاركات الاعضاء متى ما سنحت لي الفرصةبالجلوس على النت.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("e8:g32,b8:b32")) Is Nothing Then Cells(Target.Row, 1).Select
End Sub;
هذا الكود يوضع في حدث الصفحة التي فيها المعادلات مع تحديد المدي والمبين بالون الاخضر
الاستاذ العزيز يحيى حسين
عند قيامي بعمل نسخ للمعادلات ولصقها في ورقة العمل فان المعادلات لا تعمل وانما يتم لصقها كما هي كاحرف ورموز
فما هي المشكلة في اعتقادك
ابواحمد
الاستاذ الفاضل كيماس
كيف يمكن ان اجعل الكود يعمل ويقوم بطباعة الترويسةاو التذييل التي انا قمت بتسجيلها في الميكرو حتى ولو قام اي شخص اخر بادخال ترويسه جديده من خلال ضبط الصفحة او معاينة الطباعة ((اي انه لو حاول اي شخص عمل ترويسهاو تذييل وبمجرد الضغط غلى زر الطباعة يعمل الميكرو ويتم طباعة الترويسة او التذييل التي انا قمت بتسجيلها على هيئة ميكرو)) اتمنى ان اكون وفقت في الشرح