اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

  1. حمادة عمر

    حمادة عمر

    المشرفين السابقين


    • نقاط

      43

    • Posts

      6,205


  2. صالح حمادي

    صالح حمادي

    أوفيسنا


    • نقاط

      14

    • Posts

      1,745


  3. sandanet

    sandanet

    الخبراء


    • نقاط

      7

    • Posts

      1,366


  4. Shivan Rekany

    Shivan Rekany

    الخبراء


    • نقاط

      6

    • Posts

      3,491


Popular Content

Showing content with the highest reputation on 16 أبر, 2017 in all areas

  1. السلام عليكم الاخ الكريم / محمود ابو الدهب بارك الله فيك ولكن اطلب منك العذر للجميع .. فكل حسب مشغولياته ووقته واحب ان اعرفك معلوم بسيطة ( وعن تجربة في منتديات كثيرة ) اذا كان الموضوع به طلبات كثيرة يجعل البعض ان يحجم عن التقدم بحل لكثرة الطلبات في الموضوع الواحد ومشاركتك الثانية وطريقتها .. تجعل البعض ايضا يحجمون عن الرد .. فمن شروط المشاركات بالمنتدي عدم مناداه شخص باسمه للحل عنوان الموضوع وبعد اذنك وبعد ردك سوف اقوم بحذف المشاركة الثانيه بعد ردك هذا هو رأي شخصي فقط ونصيحة من اخ لأخيه .. ارجو ان تتقبلها بصدر رحب ========================== بالنسبة لموضوعك .. بقا ... فعذرا لم افهم المطلوب بعض الشئ ... وبعد اذنك سوف نقوم باخذ طلب او طلبين لفهم المطلوب بالتسلسل وان شاء الله يمكنني مساعدتك علي قدر استطاعتي ما المقصود بالعنوان الرئيسي ( تقصد الموجود بالفورم ) .. ولماذا من الصف السادس في حين ان هناك بيانات من الص الاول بالملف والمهم .. ما معني ان يكون الجلب للخلايا التي يتم فيها التعديل في هذا الصف ( هل هذه الخلايا محدد ام ماذا ) وفي ملفك المرفق لا يوجد رؤس للاعمدة ليمكن تسميتها في الفورم والتعامل معها وفي برنامجك قوت ( هذه نسخة من البرنامج لا يهمنى فقط الا نتائج الفورم والمطلوب عملة كالتالى ) ولكن يجب فهم الشكل العام لملفك ليمكن وضع اكواد الفورم لتتناسب مع طلبك عذرا علي الاطالة .. ولكني اردت التوضيح فق تقبل خالص تحياتي
    5 points
  2. قم اخي الكريم بضغط ملفك باحد برامج الضغط ثم قم بارفاقة حيث انه متاح ارفاق ملفات لاي عضو ولكن يجب ان تكون مضغوطة فقط تقبل خالص تحياتي وفي انتار ردك
    4 points
  3. السلام عليكم بعد العديد من المحاولات أخي محمد توصلت إلى كود يقوم بتصدير الباركود كما هو: Dim objWord As Object Dim oDoc As Object Dim i As Integer Dim j As Integer Dim sTemp As String DoCmd.OpenReport "report1", acViewPreview, , , acHidden Set objWord = CreateObject("word.application") Set oDoc = objWord.Documents.Add With objWord .Visible = True .selection.Font.Name = "MW6 Matrix" .selection.Font.Size = 22 .selection.ParagraphFormat.LineSpacing = 11 .selection.ParagraphFormat.SpaceAfter = 0 .selection.ParagraphFormat.SpaceBefore = 0 .selection.InsertAfter Reports![Report1]![Text0] End With oDoc.SaveAs2 CurrentProject.Path & "\ss123.docx" objWord.Quit DoCmd.Close acReport, "report1" Set objWord = Nothing Set oDoc = Nothing Desktop10.rar
    4 points
  4. نعم أخي محمد لا يوجد حرج في أن يطلب الشخص العون من إخوته. كلنا نحتاج و كلنا نطلب العون
    2 points
  5. المعذرة لم أتمكن من إكمال المشاركة السابقة لعدم استجابة المتصفح للتحرير 2- إنشاءالوظيفة ()IsMonth وهي تعود بقيمة منطقية، وتستقبل أيضا متغير يعود بقيمة عددية من خلال الحاوية التي أنسأنها 3- يوضح هذا المقطع مستعرض المراجع؛ وهو هنا يسرد قيم الحاوية التي أنشانها 4- هي لنافذة التنفيذ السريعة ويمكن من خلالها فحص الوظفة السابقة ومدى استجابة المحث بسرد قيم حاوية أسماء الأشهر.. يجب أن تظهر هذه القيم عند كتابة الوظيفة وبعد كتابة القوس الأيسير. وهذا مثال للتوضح T004.zip
    2 points
  6. بارك الله فيك فعلا تلك الموضيع تجعلنا نبحث ونستفيد بس اوقات الواحد دماغه بتقفل فايفضل حينها الاستعانة بالاصدقاء في المنتدي شكرا لك اخي شيفان علي محاولاتك معنا بارك الله فيك
    2 points
  7. شاهد المرفق .. ان شاء الله به طلبك علي حسب فهمي له اسم آخر شيت تم فتحه.rar
    2 points
  8. أخي الكريم ابا جودي لم افهم المشكلة بشكل واضح لكن إليك كود اخذ صورة من الماسح الضوئي وتخزينه في مكان محدد مسبقاً على الجهاز Public Function GetScan(strFileName As String) As Boolean Dim intRes As Integer Dim dlg As WIA.CommonDialog Dim mgr As WIA.DeviceManager Dim prc As WIA.ImageProcess Dim dev As WIA.Device Dim img As WIA.ImageFile Dim imgFmt As WIA.ImageFile Dim itm As WIA.Item Dim prp As WIA.Property Dim flis As WIA.FilterInfos Dim strFullPath As String Set dlg = New WIA.CommonDialog Set mgr = New WIA.DeviceManager Set dev = dlg.ShowSelectDevice Set itm = dev.Items(1) intRes = 300 itm.Properties("Current Intent") = 4 itm.Properties("Horizontal Resolution") = intRes itm.Properties("Vertical Resolution") = intRes Set img = dlg.ShowTransfer(itm) Set prc = New WIA.ImageProcess Set flis = prc.FilterInfos prc.Filters.Add flis("Convert").FilterID prc.Filters(1).Properties("FormatID").Value = wiaFormatPNG Set imgFmt = prc.Apply(img) 'imgFmt.SaveFile "C:\test.png" ومن ثم تحت زر امر سكان ضع الكود التالي Dim x, i x = 0 For i = 1 To Nz(Me.Text1, 1) call GetScan x = x + i Next i MsgBox "تمت عملية السكان بنجاح" حيث ان Text1 هو مربع نص غير منتضم في النموذج يتم تحديد عدد مرات اخذ سكان من خلاله تحياتي
    2 points
  9. يتم نسخ ملف DLL في ملف system32 ثم تسجيلها من ال run
    2 points
  10. العفو أخي ما فيه أي تعب المهم أننا وصلنا إلى النتيجة. موضوعك كان رائعا و أشكرك جزيلا الشكر لأن مثل هذه المواضيع تجعلنا نبحث أكثر و نستفيد أكثر.
    2 points
  11. السلام عليكم ورحمة الله وبركاته على الرغم انا لا اعرف شي عن المخازن و الفاتورة لكن حسب رأيي اولا اخفاء حقل نوع الفاتورة لانه النموذج هو نموذج المشتريات ثانيا اضافة حقل اخر باسم كيفية تسديد هل نقدا ام بواسطة شيك ام اجل ثالثا اخفاء حقل سعر الشراء من نموذج الفرعي ( لكن هذا حسب طلب ) اي واحد يريد ان لا يظهر لانه مايريد يعرف حدى اي المستخدمين عن اسعار الشراء رابعا قيمة افتراضي للحقل كمية الشراء بيكون يساوي 1 لكي يظهر النتيجة مباشرتا واذا اشترى اكثر تكدر تزيده بيد خامسا قيمة افتراضي للحقل خصم بيكون صفر لكي يظهر النتيجة مباشرتا واذا تم خصم بشيء تكدر تتغير بيد سادسا لكي تخطي من الرسالة الخطأ للاكسس اكتب في بدايةة الاكواد on error resume next هذا والله يعلم تقبل تحياتي
    2 points
  12. الحمد لله هذا الاعتراض يدل على أننا عملنا على مطلوب غير المراد فالله المستعان ولكن السؤال هنا هل كنت تريد بالضغط على جديد هو تكرار آخر سجل تم ادخاله مثلا واعادة حفظه مرة أخرى أم ماذا؟ تذكرت الآن كلمة كان يكررها أخى @شيفان ركانى - فهم السؤال نصف الاجابة -
    2 points
  13. وعليكم السلام الجواب الأول: قائمة القيم السردية التي تظهر معاملات (Parameters) هي في الحقيقة معرفات يعوض عنها بقيم عددية ثابتة .. وصيغتها كالتالي Enum SecurityLevel IllegalEntry = 1 SecurityLevel1 =2 SecurityLevel2 = 3 End Enum للأهمية.. يجب أن يعلن عن هذه المعرفات في أعلى الوحدة النمطية الجواب الثاني: يمكن جعل المعاملات اختيارية بوضع الصيغة الاختيارية Optional قبل اسم المعامل.. كالتالي Function Move(Optional Left As Integer, Optional Top As Integer) If IsMissing(Left) Then '..Do Something End If End Function
    2 points
  14. السلام عليكم الاخ الحبيب / سعد عابد بارك الله فيك جمعة مباركة تقبل خالص تحياتي
    2 points
  15. الاخ الحبيب / محمود الاسيوطى بارك الله فيك جمعة مباركة تقبل خالص تحياتي
    2 points
  16. السلام عليكم الاستاذ القدير والاخ الحبيب / جمال عبد السميع بارك الله فيك .. جمعة مباركة .. تقبل خالص تحياتي جزاك الله خيرا
    2 points
  17. السلام عليكم الاستاذ الفاضل العميد / دغيدى النظام لدي 32Bit ويعمل بشكل جيد جدا وسوف اقوم بتجربته علي جهاز 64 او يخبرنا احد الاعضاء ممن لديه نظام 64 جزاك الله خيرا
    2 points
  18. الاستاذ / جعفر ترباق الشكر دائما موصول لك جعل الله هذا العمل في ميزان حسناتك جزاك الله خيرا
    2 points
  19. السلام عليكم الاستاذ القدير / عباد بارك الله فيك ولك مني اجمل تحيه واضم صوتي لصوتك ... في طلب العودة للاستاذ / جفعر كما كان في السبق معنا بتواجده الدائم جزاه الله خيرا الاستاذ الكبير / رجب جاويش بارك الله فيك ليس لي في الموضوع شئ الا انني احببت ان افيد اعضاء اسرتي هنا في هذا الصرح لعملاق حيث رووعه الملف والاتقان والجديد جدا فجزيل شكرنا للكبير / جعفر تربياق ... جعله الله في ميزان حسناته جزاكم الله خيرا
    2 points
  20. السلام عليكم الاخ العزيز / عباس السماوي بارك الله فيك ودائما انت سباق للخير ... جعله الله في ميزان حسناتك الاستاذ الحبيب / أبو حنين بالفعل معك حق ... لم يكن احد يتوقع عمل ذلك ولكن بمراجعة ملفات الاستاذ / جفعر التي صادفتني ومواضيعه وجدت انه لا مستحيل معه ... مثلكم دائما في كل الردود علي الاخوة الاعضاء فالشكر الاكيد للكبير الاستاذ / جعفر ... جزاه الله خيرا وجعله الله في ميزان حسناته جزاكم الله خيرا
    2 points
  21. السلام عليكم الاساتذة والاخوة الكرام الاستاذ / خالد القدس الاخ الكريم / عمر أبو صهيب الاخ العزيز / احمد عبد الناصر شكرا جزيلا لمروركم واتمني من الله ان يكون قد افادكم الموضوع .... عن حق ... الموضوع كله افادة بارك الله فيكم وبالتأكيد ندعو جميعا للكبير / جعفر ترباق ... جزاه الله خيرا بأن يجعل هذا العمل في ميزان حسناته جزاكم الله خيرا
    2 points
  22. السلام عليكم هذا برنامج كشوف المناداة توزيع كل الطلاب كل 3 لجان فى صفحة على خير ما تحبون تفضلوا مع إبداء الآراء يعمل على 2007 ونسخة ل 2003 توزيع اللجان.zip توزيع اللجان2003.zip
    1 point
  23. 1 point
  24. شرح طريقة حماية رأس و تذييل الصفحة فى مستند وورد شاهدوا هذا الفيديو
    1 point
  25. السلام عليكم ورحمه الله وبركاته موضوعي اليوم اضافه الأصناف في الفاتوره بالضغط على f3 عندما يكون الماوس في الحقل الفرعي بالفاتوره رقم الصنف موجود الكود بنموذج مساعدالاصناف اهداني إياه استاذي شفان ريكاني بارك الله فيه وفيكم اجمعين ولكن لم استطع تعديله علما بان نموذج الأصناف هل باستطاعتنا استخدمه لفاتوره البيع والشراء عن طريق الضغط علي f3 تحياتي لكم جميعا الاضافه على الفاتوره.rar
    1 point
  26. تفضل أخي ابا جودي اتمنى ان يكون تعديلي مناسب لك .. طبعاً عند اخذ اكثر من صورة فانه يلزمك دالة تسمية عشوائية لكل صورة .. طبعا انا وضعت دالة تعطيك رقم عشوائي للصورة بالاضافة الى كود الموظف الذي سيكون في بداية تسمية الصورة ليكون بهذا الشكل 1_15.png انظر المرفق تحياتي test scan.zip
    1 point
  27. اخي الكريم ابا جودي لقد اطلعت على برنامجك الرائع لكن سؤالي هو هل تريد عمل لوب لأخذ اكثر من صورة للموظف الواحد؟
    1 point
  28. السلام عليكم اخي ابو ابراهيم جزاك الله عني كل خير هذا ما اردته بالتمام والكمال بارك الله فيك وبعلمك
    1 point
  29. أخي الكريم تم تطبيق الكود هنا في هذه المشاركة https://www.officena.net/ib/topic/76775-سحب-عدة-صور-من-خلال-الماسح-الضوئي/ يمكنك تجربة البرنامج نعم استاذي الكريم يمكن ذلك تابع هذا الموضوع https://www.officena.net/ib/topic/76775-سحب-عدة-صور-من-خلال-الماسح-الضوئي/?page=2#comment-491907
    1 point
  30. تمام الله ينور عليك أخي العزيز حسين الحمد لله الذي بنعمته تتم الصالحات والتعديل على الكود سيكسبك خبرة أكثر ومع الوقت ستتمكن من كتابة الأكواد بنفسك تقبل تحياتي
    1 point
  31. جزيت خيراً أخي الكريم ناصر بمثل ما دعوت لي قمت منذ ساعة تقريباً بتسجيل فيديو يوضح كيفية عمل إجراء عام والأمر مشابه إلى حد كبير للمطلوب
    1 point
  32. 1 point
  33. هو ممكن عمل ده ؟؟؟؟؟ ولو ممكن ممكن لو تكرمت حضرتك تعدل ع المرفق
    1 point
  34. استاذي ياسر خليل أبو البراء جربته وهو يعمل انظر المرفق Nouveau Archive WinRAR (3).rar
    1 point
  35. السلام عليكم ورحمة الله بداية.. موضوع الارشفة موضوع كبير يحتاج الي تقسيم العمل حتي يخرج في احسن صورة.. وقد قام اخي العزيز @ابا جودى بوضع البذرة.. بل ما هو اكثر من البذرة.. ولا اخفي عليكم ان تحليل وفهم معني الارشفة يوفر الكثير من الوقت والجهد.. فلتتخيل مثلا انه يمكن ببرنامج ارشفة متكامل ان نجعل المؤسسة او الشركة او اي جهة تعمل بها البرنامج ان تستغني عن الورق تمام.. (مع اني لا افضل ذلك لاسباب ليس وقتها اذكرها) المهم نستطيع ان نجعل (مؤسسة بلا ورق) من خلال الارشفة الالكترونية من البداية وكل هذا يتحقق باعتماد توقيع الكتروني.. فيمكننا مثلا من عمل خطاب صادر وارسله الكترونيا بمرفقاته الي اي ادارة داخل المؤسسة او خارجها.. وايضا يمكن متابعتها والتنبيه بانتهاء وقت متابعتها.. الخ والكثير والكثير هذا مقدمة اللي جت في ذهني دلوقتي المهم قمت بتجربة مثال اخي ابا جودي صباحا وهو ماشاء الله وفر مرفق لكل الباحثين عن موضوع الوارد والصادر والارشفة الالكترونية (ادارة المراسلات) ومن وجهة نظري التي لا قيمة لها هناك بعض الاشياء البسيطة التي رأيتها اثناء معاينة المرفق 1- لا تعطي صلاحية لاي مستخدم بحذف خطاب (وارد او صادر) نهائيا بعد حفظه وتسجيله حتي ولو برقم سري حتي لا نفقد الرقم الصادر المسلسل.. طب لو فرضنا انه تم الغاء الخطاب او اي سبب اخر.. نعمل ايه.. نقوم بالتعديل علي البيانات المدخلة وندخل بيانات لصادر اخر بنفس الرقم او.. بدل ما نحذفه حذف نهائيا نقوم بعمل جدول للبيانات المحذوفة وننقل له السجل كامل الذي لا نريده حتي لا نفتقده ونستعيده وقتما نشاء 2- بالنسبة للمرفقات يمكنك ادراج دفعة من المرفقات مرة واحدة من الكمبيوتر وتسميتها كما تريد في النموذج الفرعي الخاص بالمرفقات هذا وسوف اكمل الاطلاع وافيكم بباقي الملاحظة ان وجدت ولكن ماشاء الله العمل جميل جدا جدا يتبع اخي العزيز هل جربت تلك الطريقة ونجحت معك؟ ومعلش ممكن تطبيقها بمثال بسيط لنطلع ونري اكثر حيث انني افضل الاعتماد علي برنامج خارجي للسحب من الاسكنر.. ومن ثم بعد السحب الادراج في البرنامج.. وحتي لا اثقل علي الاكسس
    1 point
  36. وعليكم السلام أخي الكريم حسين الكود بهذا الشكل مع الملف الجديد لا أعتقد أنه صحيح إذ يلزم أن تكون الأعمدة المساعدة بعيدة عن مجال البيانات .. قم بالتعديل وتجربة الكود وانظر هل النتائج صحيحة أم لا؟ حاول تدرس الكود وتفهم الأسطر المكتوبة لتستطيع أن تعدل عليه ، وإذا واجهك سطر غير واضح أخبرنا وسنقوم بشرحه إن شاء العلي القدير
    1 point
  37. اتفضل اليك هذا كود سيحذف الحقل DoCmd.SetWarnings (warningsoff) DoCmd.OpenTable "rrrr", acViewNormal DoCmd.GoToControl "vil" DoCmd.RunCommand acCmdDeleteTableColumn DoCmd.Close acTable, "rrrr", acSaveYes DoCmd.SetWarnings (warningson) وهذا الكود سيفرع الحقل DoCmd.SetWarnings (warningsoff) Dim sql as string sql = "UPDATE rrrr SET rrrr.Vil = "";" docmd.runsql (sql ) DoCmd.SetWarnings (warningson) غير "rrrr" باسم جدولك وغير "vil" باسم حقل تريد ان يحذفه
    1 point
  38. سمع الله لمن دعى .. ربّنا ولك مافي القلب
    1 point
  39. ( لعبة الصورة المستخبية ) علي الاكسيل - لعبة بسيطة من تصميمي .. تصلح لالعاب المسابقات للاطفال هذا العمل عمل بسيط جدا جدا ولكني وجدتها فرصة كبيرة لاتقدم بشكري وعرفاني للاساتذة الكبار بالجميل فالف مليون تحية اعزاز وتقدير لكل القائمين علي خدمة المنتدي من اساتذة وخبراء ومشرفين واعضاء الشرف والاعضاء المميزين والاعضاء والضيوف ايضا احب ان انوه في البداية .... انه في منتدي الباوربوينت موضوع باسم ( لعبة الصورة المستخبية ) للاستاذ / مجدى يونس .. جزاه الله خيرا بنفس الفكرة تقريبا وعندما رأيتها اعجبت ابنتي ( سما ) كثيرا .... علي الرابط التالي ... والفكرة في الاصل بالطبع للاستاذ / مجدي ... حقوق الطبع محفوظه ( طبعا ) http://www.officena.net/ib/index.php?showtopic=45425 ولكن لعشقي الرهيب الشديد للاكسيل فقررت ان اقوم بتصميمها علي الاكسيل وها هي بين ايديكم كل ما عليك في اللعبة هو ان تضغط علي الزر الموجود اسفل الصورة يظهر لك جزء منها وكل ضغطة يظهر جزء آخر وعندما تتعرف علي الصورة اختار اسمها من الاجابات الموجودة بالاسفل ستظهر لك الصورة بالكامل ويتم الانتقال للصورة التالية و....... اترككم مع اللعبة ...بلاش كلام كتير ..... ارجو ان تحوز علي اعجابكم ارجو من كل خبراء واساتذة واعضاء ورواد هذا الصرح العملاق ( جامعة اوفيسنا ) ابداء الرأي في هذا العمل ... جزاكم الله خيرا لعبة الصورة المستخبية - اكسيل.rar
    1 point
  40. لا تنشرها جزاك الله خير ... ادخل وحمل وستعرف !! جمعة مباركة اخواني الكرام اللهم صلي علي سيدنا ((( محمد ))) وعلي آله وصحبه اجمعين جمعة مباركة.rar
    1 point
  41. فورم بسيط لاضافة شيت اوعدة شيتات دفعة واحدة هو طلب للاخ الكريم / وليد زقزوق في موضوع وطلب له علي الرابط http://www.officena.net/ib/index.php?showtopic=49438 ولكن ما دعاني لوضعه في موضوع جديد هو ان عنوان الرابط المذكور (( كود لحذف ورقة عمل جديدة )) ********************************** فأردت وضعه في موضوع جديد بعنوان جديد للتسهيل علي من يبحث عن مثل هذه الاوامر ********************************************* وتم تنفيذ طلب للاخ الحبيب / إبراهيم ابوليله ايضا علي نفس الرابط بمنع اضافة الشيتات في حالة تكرار الاسم ارجو ان ينال اعجابكم .... ويكون فيه الافادة للجميع جزاكم الله خيرا sama-add-sheet.rar
    1 point
  42. قائمة منسدلة متعددة الألوان - اختار لون الخلفية و الحروف لكل عنصر في القائمة هو موضوع وجدته في منتدي صديق ( منتدي القدير / يحيي حسين ) للعلامة القدير / Jaafar Tribak المغربي واردت ان اضعه بين ايديكم كما هو وكما هو وضعه بالضبط وبالطبع استئذنه في ذلك ولعلمي انه شديد الحرص علي اعطاء كل معلومه لديه للآخرين فلم اتردد لحظة في نقل الموضوع الي منتدانا العملاق ليستفيد منه الجميع وسأضع الموضوع كما وضعه هو حرفيا جعله الله في ميزان حسناته ==================================================== المــــــــــــــــــوضـــــــــــــــوع ( كما هو ) ==================================================== طلب نجده كثيرا عند مستخدمي الاكسل لكن لا يوجد حل - الحمد لله هذا ما توصلت اليه مؤخرا فأرجو أن يكون مفيدا. من أراد استفسارا لكيفية عمل الكود أو وجد أي مشكلة في تشغيله فأنا ان شاء الله أكون رهن الاشارة Multicolor_Combobox.rar
    1 point
  43. اخي /م وليد بن عبدالرحيم بارك الله فيك وجزاك خيرا تقبل الله منا ومنكم صالح الأعمال بالنسبة للفيديو كان اهداء من صديق عزيز فلذلك ارفقت الرابط تقبل تحياتي
    1 point
  44. اللهم صلي علي سيدنا ((( محمد ))) وعلي آله وصحبه اجمعين اللهم صلي علي سيدنا ((( محمد ))) وعلي آله وصحبه اجمعين اللهم صلي علي سيدنا ((( محمد ))) وعلي آله وصحبه اجمعين
    1 point
  45. اللهم آمين ... آمين ... آمين اللهم آمين ... آمين ... آمين الاخ الحبيب / ضاحي الغريب بارك الله فيك تقبل خالص تحياتي
    1 point
  46. السلام عليكم اخواني الكرام ابدأ بنفسي في تقديم الشكر للكبير / Jaafar Tribak وجعله الله في ميزان حسناته فالموضوع له والفضل بعد الله له والشكر واجب له جزاك الله خيرا
    1 point
  47. السلام عليكم يمكنك اخي الكريم ارفاق الملف الذي وجدته بالمنتدي ويمكن لخبراء منتدانا الرائع التعديل عليه كما تريد ان شاء الله واليك ملفان الاول للاستاذ / احمد يعقوب فكرة الحماية في هذا الملف هي كـ التالي عندفتح الملف الإكسل يتم اخفاء كل اوراق الملف ويظهر الفورد الخاص بادخال البيانات بتم ادخال رقم الموظف و اسمه و الرقم السري له اذا تطابقت البيانات الثلاثة لما نحن مسجلينه في ورقة OPTION يتم اظهار الأوراق المحددة امام اسم الشخص في ورقة OPTION ثم يتم تسجيل اسم المستخدم و يوم و ساعة الدخول = = = = = = = = = ادخل الى ورقة OPTION حدد ارقام و اسماء و الإرقام السرية وامام كل اسم حدد اسماء الأوراق التي تريد ان تسمح للمستخدم بالدخول لها فس كل مرة سوف يتم الدخول للمستخدم للأوراق التي حددتها له فقط و غير ذلك لن يستطيع الدخول لها هذه ارقام و اسماء و كلمات السر الموجودة حاليا بالملف 1 - عبدالله 1 - 1 2 - عبدالله 2 - 2 الملف الثاني : فهو للعبقري الاستاذ / الحسامي باسورد الدخول : 1111 علها ان تنفع معك اخي الكريم فورم_باسوورد_صلاحيات_المستخدمين-احمد يعقوب.zip صلاحيات-الحسامي.rar
    1 point
×
×
  • اضف...

Important Information