نجوم المشاركات

السلام عليكم ورحمة الله وبركاته اخي العزيز الغي من صيغ تفعيل اظهار الصيغ كما في الصورة تقبل فائق احترامي وتقديري

أخى الفاضل تفضل الملف المرفق .. تم اضافة الدالة الرائعة SumColor للأستاذ القدير ابو القبطان تحياتي 5465465435.rar

الله يجزاك الجنة ويرحم والدي ووالديك عن النار ويوفقك في الدنيا والآخرة

السلام عليكم ورحمة الله وبركاته اخي العزيز ابو الحسن جزاكم الله خيرا الحمد لله والشكر وبفضله تتم النعم بارك الله فيك واعطاك الصحة والعافية

كل الشكر وكل وخالص العرفان بالجميل استاذنا لك احترامى وتقديرى ودعواتى

استاذنا بفضل الله وفضلك توصلت للحل من tolls ثمoptionsثمviewثمرازيل علامة صح من امام formuls الله يبارك فى حضرتك وكل وخالص التقدير من اخيك احترام

اخي العزيز من tools ثم options ثم ترفع علامة الصح كما في الصورة وفقكم الله

كل احترامى وشكرى استاذى استخدم اوفيس2003 ممكن الطريقة وبارك الله فيك

اخي ياسر ربما يعجبك هذا الحل الكود مرفق Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("a1:b10")) Is Nothing Then Dim myrange As Range Set myrange = Range("a1:b10") i = 1 Do Until i >= 10 If Cells(i, 1) = "" Then Cells(i, 1) = "blank" If Cells(i, 2) = "" Then Cells(i, 2) = "blank" i = i + 1 Loop End If End Sub blank.rar

تفضل أخي الحبيب الملف المرفق Hide Rows.rar

السلام عليكم تفضل أخي الحبيب الملف المرفق فيه طريقتين لدمج التعليقات الأولى باستخدام دالة معرفة وناتج دمج التعليق في A1 و B1 يكون في الخلية C1 الطريقة الثانية باستخدام زر الأمر ..فيه تعليق في A3 ألا وهو Yasser .. ويوجد تعليق في B3 ألا وهو Khalil عند الضغط على زر الأمر يتم دمج التعليق في الخليتين معا في B3 Get Comments.rar

السلام عليكم 1> تعتمد هذه الفكرة على كلمة المرور المتغيرة عند فتح الملف سيظهر لك مربع حوار في أعلاه عدد مكون من خمسة أرقام (وهذا العدد متغير وليس ثابت) مثلا 10547 قم بضرب أول رقمين في آخر رقمين والناتج هي كلمة المرور الصحيحة في مثالنا ستكون كلمة المرور هي 10×47=470 كلمة المرور هي 470 انتيه ! لم نستعمل الرقم 5 في الحساب ولكن وضع للتمويه على المستخدم فقط 2> قمت بإخفاء كل الشيتات التي فيها الحسابات حتى لو تم تعطيل الماكرو ستكون شيتات الحساب كلها مخفية ويظهر شيت آخر فارغ 3> عند تغيير اسم الملف أو تغيير مكانه في الكمبيوتر فلن يعمل البرنامج وسيطلب كلمة المرور من المستخدم 4> لنفترض أنني عملت على هذا البرنامج وأغلفته ثم قام صديق لي في العمل بنسخ هذا البرنامج في فلاشه فلن يستطيع تشغيله على جهازه إلا إذا أعطيته أنا كلمة المرور يجب على صديقي أن يفتح البرنامج من على جهازه وفي نفس اللحظة يتصل بي لأعطيه كلمة المرور لأنه لو أقفل مربع الحوار (الذي سيظهر لإدخال كلمة المرور) بدون إدخال الكلمة أو أدخلها بالخطأ فستتغير كلمة المرور في المرة القادمة عندما يفتح البرنامج مع كل ما تقدم من الشرح إلا أن العمل قد لا يخلو من الخطأ أو الخلل فأرجو المعذرة جرب الملف تفضل أبوعيد.rar

1 – عمل ملف اكسل (كتابة كود الماكرو) 2- انشاء ملف VBScript لتشغيل الماكرو 3 – كتابة ملف دفعي او باتش batch لفحص الوقت 4 – انشاء ملف تنصيب خدمة الويندوز Windows Service ___________________________________________ بسم الله الرحمن الرحيم على الله نتوكل وبه نستعين ملاحظة ===== اذا لم تفرأ الخطوات السابقة بعد فأني اشد على يدك ان تقرأها اولا قبل الاستمرار. سنفترض التالي: 1 - جميع الملفات في المسار التالي (بالطبع يمكنك وضعهم في اي مجلد من اختيارك) C:\work\2015 2 - الخدمة ستعمل تحت حساب النظام المحلي Local System Account 3 - الخدمة ستحتاج الى وسيط وهو اسم ملف الباتش RunSummaryMacro.cmd لتشغيله 4 - الخدمة ستعمل اوتوماتيكيا كل مرة يشتغل فيها الجهاز. 5 - اسم الخدمة هو AbuTorab (يمكنك تسميتها ما تشاء) انشاء خدمة ويندوز هى من اكثر الخطوات تشويقا و اثارة..و لهذا سنبدأ على عكس ما بدأناه في الخطوات السابقة....سنبدأ من النهايــــــــــــة. 1 - انقر بالزر الايمن و اختر Run as Administrator 2 - اخل حرف Y للموافقة على تنصيب الخدمة 3 - تم تنصيب الخدمة بنجاح...لاحظ ان رقم العملية PID للخدمة على جهازي هى 5144 4 - هنا قد انتهينا من تنصب الخدمة الا انه استكمالا للشرح لنرى الخدمة وهى تعمل في الخلفية. اضغط شعار ويندوز + R واكتب Services.msc من هنا يمكنك ايقاف و تشغيل الخدمة 5 - لنرى الخدمة من شريط المهام اضغط Ctrl + Shift + Esc .. اختر التبويب Services ومن ثم التبويب Details ماذا ترى!!! 6 - الاسم في التبويب Services هو كما توقعناه AbuTorab ولكن الاسم في التبويب Details مختلف!!! السبب هو ملف الباتش لا يستطيع من تلقاء نفسه التخاطب مع مركز خدمات الويندوز و لهذا نحتاج الى تغليفه wrap باداة صغير لديها القدرة على التخاطب مع النظام و في نفس الوقت القدرة على تشغيل ملف الباتش و الاداة هى Srvany.exe. توجد ادوات اخرى ولكن استخدمت هذه و يمكنك استخدام ما تريد يمكنك تحميل مجموعة الادوات من موقع شركة ميكروسوفت او يمكنك تحميلها من المرفق ستطلب هذه الاداة ان تعمل لها ثلاث قيم في سجل النظام ... وهذه القيم هى: AppDirectory : مسار المجلد الذي يحتوي على ملف الباتش Application : ملف الباتش مع المسار AppParameters: وسائط ملف الباتش..في مثالنا سيكن ملف الاسكربت ملاحظة: ===== عند انشاء الخدمة سيتم اضافتها الى سجل النظام في المسار التالي: HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\AbuTorab اذا اردت ان ترها بنفسك فأضغط شعار ويندوز + R و اكتب RegEdit للتوضيح راجع الصورة التالية: لنتحدث قليل على اوامر انشاء الخدمة Windows Service ================================ 1- لانشاء الخدمة يمكننا عن طريق الامر sc في محرر الاوامر (هذا الامر يحتاج الى صلاحيات مدير النظام لينفذ) SC create AbuTorab binpath="C:\work\2015\srvany.exe" 2- لجعل الخدمة تعمل اوتوماتيكيا عن تشغيل/إعادة تشغيل النظام ننفذ الامر التالي: SC config AbuTorab start=auto 3- لتشغيل الخدمة sc start AbuTorab 4- لحذف الخدمة SC delete AbuTorab 5 - لتحديث قيم سجل النظام ننفذ الاوامر التالية reg add "HKLM\SYSTEM\CurrentControlSet\Services\AbuTorab\Parameters" /v AppDirectory /t REG_SZ /d "C:\Work\2015" reg add "HKLM\SYSTEM\CurrentControlSet\Services\AbuTorab\Parameters" /v Application /t REG_SZ /d "C:\Work\2015\RunSummaryMacro.cmd" reg add "HKLM\SYSTEM\CurrentControlSet\Services\AbuTorab\Parameters" /v AppParameters /t REG_SZ /d "C:\Work\2015\RunSummaryMacro.vbs" ملاحظة مهمة و اخيرة اذا نفذت الاوامر السابقة فان الخدمة ستعمل و ملف الباتش سيعمل و ملف الاسكربت سينفذ و لكن لن ينفذ الماكرو برامج الاوفس هى برامج تفاعلية interactive تتفاعل مع حساب المستخدم الذي سجل الدخول وهو ليس حساب تشغيل الخدمة الا وهو System و لهذا فان الماكرو لن ينفذا...لتحقيق هذا التفاعل نحتاج لوجود مجلد باسم Desktop على المسار التالي: في نسخة الويندوز 64 بت: c:\windows\SysWOW64\config\systemprofile\Desktop في نسخة الويندوز 32 بت: c:\windows\System32\config\systemprofile\Desktop كود ملف تنصيب الخدمة @ECHO OFF SET ServiceName=AbuTorab ECHO A new Windows service called "%ServiceName%" will be installed ECHO. CHOICE /C YNC /M "Press Y for Yes, N for No or C for Cancel." IF %ERRORLEVEL% neq 1 (EXIT) mkdir %windir%\SysWOW64\config\systemprofile\Desktop mkdir %windir%\System32\config\systemprofile\Desktop CLS SET CurrentDir=%~dp0 sc create %ServiceName% binpath="%CurrentDir%srvany.exe" reg add "HKLM\SYSTEM\CurrentControlSet\Services\%ServiceName%\Parameters" /v AppDirectory /t REG_SZ /d %CurrentDir% reg add "HKLM\SYSTEM\CurrentControlSet\Services\%ServiceName%\Parameters" /v Application /t REG_SZ /d "%CurrentDir%RunSummaryMacro.cmd" reg add "HKLM\SYSTEM\CurrentControlSet\Services\%ServiceName%\Parameters" /v AppParameters /t REG_SZ /d "%CurrentDir%RunSummaryMacro.vbs" sc config %ServiceName% start=auto sc start %ServiceName% ECHO. ECHO ========================================================= ECHO The %ServiceName% has been installed and run successfully ECHO ========================================================= SET CurrentDir= SET ServiceName= pause @ECHO ON مخرجات الخطوة الاخيرة ================= اسم ملف التنصيب : Installِ_AbuTorab_Service.bat اسم ملف الاداة : srvany.exe جميع الملفات تجدها على المرفق و يمكنك البدء تم بحمد الله الذي بنعمه تتم الصالحات 2015.zip

احي الكريم اعمل موضوع منفصلا لكي تستفيد اكثر من الاخوة الموجودين وانصحك بالبحث حيث يوجد اكود كثيرة لهذا الموضوع تقبل تحياتي

السالب مرتين عشان لومرة هيكون الناتج بالسالب ، فبيكون مرتين عشان السالب في السالب بموجب (- * - = +)

فى خاصية فى الاكسل اسمها التصحيح .. يعنى مثلا لو عملت ="2" * 3 هيكون الناتج 6 برغم أنك حاطط ال 2 بين علامتى تنصيص .. بس الاكسل بيصححها و يتعامل معاها كرقم فأنت لما بتستخدم الدالة sumptoduct فى الحالة الشرطية .. لو الشرط اتحقق بيدى قيمة True أما لو لم يتحقق فإن الناتج False الاكسل بيحول قيمة True إلى 1 و False إلى 0 ... لذلك لما بيكون المعادلة فيها كذا شرط .. بنستخدم الضرب *1 أو جمع صفر أو إشارتين سالب (--) لإجبار الاكسل أنه يتعامل مع القيمة True أو False كرقم و دى كلها عمليات لا تؤدى لاختلاف قيمة الناتج يعنى الناتج مش هيتغير. طب ليه إشارتين سالب مش إشارة واحدة .. لأن لو عدد الشروط فردى هتبقى (-*-*-) و هيطلع الناتج بالسالب و ساعتها القيمة هتختلف و يكون ناتج غلط.

السلام عليكم اخى الكريم فائده الضرب فى العدد 1 او علامة النفى المضاعف هو --( ) او جمع الرقم 0 متى تستخدم ؟ تستخدم عندما تعيد الصفائف قيما منطقيه (TRUE او FLASE) وفى برنامج الاكسيل تمثل القيمة TRUE القيمة 1 , والقيمة FLASE القيمة 0 ويمكنك استخدام 3 عمليات حسابيه لتحويل القيم المنطقية الى ارقام اولا : الضرب فى العدد 1 : X=1*X ثانيا :اضافة الرقم 0:X=0+X ثالثا:النفى المضاعف X=X-- العمليات الحياديه.rar

الاستا الفاضل // sayed&h 1 ) مرحبا بك أخ فاضل بيننا في أول مشاركة لك 2 ) اعلم رحمك الله ان كنت ترى ان الشيت به كرسة فنحن ننظر لهذا الرجل العملاق علما وخلقاُ ( رجب جاويش ) بكل فخر واحترام ويكفيه شرف المحاولة وليس اي احد معصوم من الخطا او النسيان عزيزي الفاضل بل يكفي اننا تعلمنا من هذا الرجل الشامخ الاسلوب الراقي في الحوار وفن معاملة الاخرين وعدم احراجهم فيما لا فائدة فيه بل تعلمنا منه كيف ينصح الاخرين باسلوب راقي عن طريق الرسائل الخاصة 3 ) تشرفنا بمروركم الكريم في أول مشاركة لك ونتمنى تواجدك بيننا دائما كاخ ناصح امين محب للاخرين 4 ) بل نتمنى مشاركتك معنا واصلاح ما غفل عنه استاذنا ليكون عونا لاخوانك السائلين عنه !!!

الاستاذ الفاضل / قنديل الصياد تحية وسلام اليكم ملف فلاش ينفع للمدارس الاعدادى وارجو ان يفيد زملائى فى المدارس وارجو افادتنا كيف نرفع النتيجة على النت او يتبنى الصرح الكبير منتدى اوفسينا نشر نتائج مدارسنا marks.rar

بارك الله فيك وجزاك خيرا اخي الكريم جرب المرفق بعد التعديلات مع تحياتي CARS2.rar