؛ أحمد ؛

جزاك الله خيرا على المعلومة المفيد فعلا وفرت علي كثير من العمل

قم بعمل مربع نص واكتب فيه ما تريد

ثم اضغط عليه كليك يمين واختر حركة مخصصة Custom Animation

قم باختيار الحركة المناسبة واجعل الخاصية start على القيمة on click

بالنسبة للإكسيل 2003

من قائمة تنسيق format اختر صفحة عمل sheet

ثم اختر اخفاء Hide سيتم إخفاء صفحة العمل المحددة

ولإظهارها مرة اخرى اتبع نفس الخطوات ولكن اختر إظهار Unhise ثم اختر ورقة العمل التي ترغب في إظهارها

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

اضغط على زر الاوفيس Office button

او قائمة File (أعتقد أنها كذلك في 2010)

ومنها اختر Info أو Prepare

على حسب الموجود عندك

ثم Encrypt Document

أو Encrypt With Password

سيظهر لك مربع حواري لإدخال كلمة المرور الجديدة

ولإلغاء كلمة المرور اتبع نفس الخطوات السابقة

ولكن اجعل مكان كلمة المرور فارغا

يمكنك استخدام هذا الموقع ونسخ الآيات منه

اتبع جميع الخطوات الأولى

Format >> Columns

وحدد عدد الاعمدة

وعندما تريد الانتقال من عمود إلى آخر

اتبع التالي

Insert >> Break

واختر الأمر

Column Break

واضغط Ok

للأسف أخي الكريم السؤال غير واضح لي

جرب هذا التعديل

Classeur1.rar

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

شكرا لك أخي الكريم

هذا بالضبط ما كنت أريده

وكنت أريده بالكود لأنني أريد تنفيذه في بداية تشغيل ورقة العمل

جزاك الله خيرا

السلام عليكم

كيف الحال

أريد عمل ماكرو في الإكسيل بحيث إذا كان التاريخ في الخلية الأولى أكبر من تاريخ اليوم تظهر رسالة محددة في خلية أخرى وإذا كان التاريخ أقل من تاريخ اليوم تظهر رسالة أخرى

قمت بعمل هذا الكود

Range("A1").select

    If ActiveCell.FormulaR1C1 > Date Then


    Range("A2").select

    ActiveCell.FormulaR1C1 = ""

    ActiveCell.FormulaR1C1 = "hi"

    ElseIf ActiveCell.FormulaR1C1 < Date Then

    Range("A2").select

    ActiveCell.FormulaR1C1 = ""

    ActiveCell.FormulaR1C1 = "hello"

    End If

ولكن دائما يعطيني نتيجة واحدة وهي الكلمة الأولى حتى لو غيرت التاريخ إلى قيمة أقل من تاريخ اليوم يعطيني نفس النتيجة