اذهب الي المحتوي
أوفيسنا

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

  1. ياسر خليل أبو البراء

    ياسر خليل أبو البراء

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


    • نقاط

      7

    • Posts

      13,165


  2. الزباري

    الزباري

    الخبراء


    • نقاط

      7

    • Posts

      462


  3. Shivan Rekany

    Shivan Rekany

    الخبراء


    • نقاط

      7

    • Posts

      3,491


  4. يوسف أحمد

    يوسف أحمد

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


    • نقاط

      4

    • Posts

      1,055


Popular Content

Showing content with the highest reputation on 16 ينا, 2017 in all areas

  1. اعتذر عن التأخير الكود سيكون كالتالي DoCmd.OpenReport "rpt1", acViewPreview, , Me.Filter حيث أن rpt1 هو اسم التقرير مرفق مثال لتتضح لك الفكرة بالتوفيق للجميع filterName.rar
    2 points
  2. السلام عليكم أخى الفاضل استخدم هذه المعادلة =IFERROR(INDEX(J2:J9;MATCH(1;(E3=G2:G9)*(A6=H2:H9)*(B6=I2:I9);0));"")
    2 points
  3. رجاءا لا تشكرني على اي شي اريد بدل الشكر ان تدعوا لنا استخدمت هذا كود
    2 points
  4. السلام عليكم اضافه الى ما تفضل به اخي العزيز صالح يمكن وضع القيمه التاليه بباراميتر اسم الفلتر بامر فتح التقرير Me. Filter المعذره انا اكتب من الموبايل لظروف السفر و ارجو ان تكون الفكره واضحه بالتوفيق للجميع
    2 points
  5. وجدت لك مثالا بهذا الخصوص لضبط وتنسيق النص داخل التقرير باستخدام الكائن RTF Control من اعداد الاخت الكريمة زهرة تنسيق خلية في تقرير.rar
    2 points
  6. بسم الله نبدأ عامنا الحالي بهذه الموسوعة 1200_Visual_Basic_macro_examples.rar عسى أن ينال إعجابكم
    1 point
  7. بسم الله الرحمن الرحيم مقدمه أولادنا الصغار فلذة الأكباد نهديهم هذه الخطوط الرائعه المنقطة جزا الله صانعها الفاضل / ابو سلمان العمر وغيره كل خير وغفر الله ذنوبهم .. آمين ومن يسرها لنا ومن يسرها للظهور في المنتدى الفاضل / محمدي عبد السميع كل خير وكذلك نهديهم هذه الخطوط الرائعه المفرغة لكي يتم ملأها هذه الخطوط وتلك أيضا تصلح للكبار لتحسين خطوطهم كيفية الاستفاده من هذه الخطوط اكتب جملا تربويه مثلا: أكرم الأب ولده بالخط المنقط ... في هذه الجمله نغرس في نفس الطفل ان الأب كريم مع ولده . وهكذا ... ... ثم بعد ذلك يعيد المتمرن بالقلم الرصاص على هذه الكتابات عدة مرات الى ان تتقن يده كتابة الجملة بنفس المنظر وكأنه يصورها بارك الله لكم _______________.rar
    1 point
  8. وأخيراً تمت مشاركة ملف الإكسيل في شبكة محلية مع الموظفين وتم تبادل البيانات معهم والتعديل عليها.. تابعونا لمعرفة الخطوات.
    1 point
  9. السلام عليكم ورحمة الله وبركاته إخواني الكرام .. قد يكون موضوع الكسر موضوع شائك وفيه خلاف ، ولكن ربما يكون مفيد لصاحب العمل نفسه ، حيث أنه معرض لنسيان الباسورد الذي تم وضعه على محرر الأكواد .. الموضوع مميز لأنه يقوم بكسر الحماية بدون برامج على الإطلاق ..وبدون AddIns وبدون الاستعانة بأية برامج مجانية أو مدفوعة !! كسر محرر الأكواد بالأكواد نفسها (قنبلة الموسم) وعلى رأي المثل : علمته رمي السهام فلما اشتد ساعده رماني .. الكود قليل الأصل !! محفظش الجميل للبيئة اللي هو منها ، لأنه كسر بيئة محرر الأكواد !!! Sub HackVBA() Open "C:\Users\Future\Desktop\Test.xls" For Binary As #1 Put #1, 1, Replace(Input(LOF(1), 1), "DPB=", "DPX=", , 1) Close Workbooks.Open "C:\Users\Future\Desktop\Test.xls" End Sub المطلوب فقط أن تغير مسار الملف المراد كسره داخل الكود ، والمسار يوضع بين أقواس تنصيص .. أترككم مع الفيديو عله ينال إعجابكم وتستفيدوا منه إن شاء المولى .. ولا تنسونا من اللايكات على اليوتيوب !!!!! ....أكرر اللايكات على اليوتيوب ..فضلاً لا أمراً تقبلوا تحيات أخوكم أبو البراء
    1 point
  10. مشالله تبارك الله بس ياليت ابو خليل والا احد الاخوان يضيف كود لمنع تراكم النسخ الاحتياطيه ويكون فيه خيار عدد اخر ايام يتم ابقائها والباقي يحذفها ويتم ضبطها من الاعدادات
    1 point
  11. جربت الملف ويعمل بشكل جيد .. تأكد من أن الملف قد تم استخراجه من الملف المضغوط بشكل صحيح ثم حاول مرة أخرى .. اضغط Alt + F8 بعد فتح الملف ، واختر الماكرو الموجود ثم انقر Run
    1 point
  12. قم بالإطلاع على الملف في الرابط التالي لعله يفيدك إن شاء الله الرابط من هنا
    1 point
  13. بارك الله فيك أخي الكريم الزباري اسمح لي بمشاركة بسيطة بالموضوع .. طالما أن كود الاستدعاء يمكن أن يستخدم أكثر من مرة فالأفضل وضعه في إجراء يمكن الاستدعاء منه ..اطلع على الكود وستعرف مقصدي Sub ImportAhmad() ReadString "ahmad", Sheet2 End Sub Sub ImportAli() ReadString "ali", Sheet3 End Sub Sub ImportYosuf() ReadString "yosuf", Sheet4 End Sub Sub ReadString(customer As String, sh As Worksheet) Dim sLine As String Dim sFName As String Dim intFNumber As Integer Dim lRow As Long Dim lColumn As Long Dim vDataValues As Variant Dim intCount As Integer sFName = ThisWorkbook.Path & "\Info\" & customer & ".txt" intFNumber = FreeFile On Error Resume Next Open sFName For Input As #intFNumber If Err.Number <> 0 Then MsgBox "Text File Not Found!", vbCritical, "Error!" Exit Sub End If On Error GoTo 0 sh.Cells.Clear lRow = 1 Do While Not EOF(intFNumber) Line Input #intFNumber, sLine vDataValues = Split(sLine, vbTab) With sh lColumn = 1 For intCount = LBound(vDataValues) To UBound(vDataValues) .Cells(lRow, lColumn) = vDataValues(intCount) lColumn = lColumn + 1 Next intCount .Cells.EntireColumn.AutoFit .Activate .Range("A1").Select End With lRow = lRow + 1 Loop Close #intFNumber MsgBox "Values From File '" & sFName & "' Were Imported To Sheet '" & sh.Name & "'!", vbInformation End Sub
    1 point
  14. وعليكم السلام Private Sub ComboBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) Dim myDate As Date myDate = CDate(ComboBox1.Value) TextBox1.Value = Format(Day(myDate), "ddd") TextBox2.Value = MonthName(Month(myDate)) TextBox3.Value = Year(myDate) End Sub
    1 point
  15. استاذنا الفاضل / ياسر خليل ابو البراء ربنا يخليك لنا ياحبيبى ويبارك فيك ودايما نتعلم منك ودايما سباق للخير ودايما منور المنتدى بالعلم جزاك الله كل خير ياحبيبى وعلى فكرة انا سمعت الفيديو على فكرة صوتك حلو وجميل مثلك انت مابتفكرش تغنى وتقدم نفسك فى برنامج the voice حبيب قلبى ياسر وشكرا
    1 point
  16. كود ممتع ومميز يحفه الابداع من كل ناحية .. الابداع يصنعه المبدعون أمثالكم أبا البراء..
    1 point
  17. اذا تتذكر من قبل كان قلت لي اريد ان يبدأ بالرقم اللي انا اكتبه في تسلسل الاول ؟ هل تتذكر لذا اي رقم تكتبه في الاول راح يبدأ من ذاك الرقم واذا كتبت رقم صفر لتسلسل الاول راح يبدأ من صفر واذا كتبت رقم واحد في التسلسل الاول راح يبدأ من رقم 1 لكن العلاج بسيطة اذا تريد ان يبدأ من رقم التالي اي اذا تكتب رقم صفر وتريد ان يبدأ من رقم 1 افتح محرر فيجوال اللي بها اكواد واحذف ناقص 1 H + A - 1
    1 point
  18. ما فهمت قصدك ممكن تنطي مثال حي اي يعني توضيح وين المشكلة
    1 point
  19. 1 point
  20. تفضلوا ملف أخونا ابراهيم مع المندوبين الثلاثة، حاولو تنقلوا الملفات في المكان الذي فيه مجلد info (وليس داخله) والذي سبق أن تم تنزيله من قبل ، ومن ثم جربوا فتح ملفات المندوبين وأخيراً ملف أخونا ابراهيم وقومو باستدعاء الملفات الثلاثة إليه. وتقبلوا تحياتي. allfiles.rar
    1 point
  21. سؤال هل تريد تطبق على اي جدول اي بواسطة اي نموذج هل ممكن توضح لنا
    1 point
  22. شكرا اخي kaser906 على المعلومة بارك الله فيك وزادك علما ونورا اوليس من الخطر وضع الجداول في القرص C كون هذا القرص مع للخطر اكثر من غيره من الاقراص
    1 point
  23. عملنا نموذج وشوف الشرح بالصور وبكود اسهل اولا حددنا حقل الصنف وبعدين رحنا الى مصدره شوف المصدر الحقل هو استعلام وفيه ثلاث حقول والارقام حقول يبدأ من رقم صفر شوف خصائص الحقل صنف كولوم كوانت يساوي 3 و كولوم وايدث يساوى حقل الاول يساوي 0 مساحة و الحقل الثاني يساوي 2 سم مساحة والحقل الثالث يساوي 0 مساحة لكي يظهر حقل الثاني فقط في حقل صنف حين تختار صنف من الاصناف وشوف كود بعد تحديث للصنف قلنا السعر يساوي حقل صنف و عمود 2 لكي يظهر السعر مع تقدير
    1 point
  24. جزاكم الله خيرا وجعله الله فى ميزان حسناتكم
    1 point
  25. اوليس من الخطر وضع الجداول في القرص C كون هذا القرص مع للخطر اكثر من غيره من الاقراص
    1 point
  26. بصراحة بدأت أستخدمها من شهر (يعني من بداية طرح الموضوع).. وهي شغالة معاي مية المية، وقد ربطت قسمين مختلفين على نفس السيرفر الخاص بالعمل، كل قسم يقدم معلومات مختلفة يتم تجميعها كل بحسب حاجته، وجاري تطوير العمل معكم.
    1 point
  27. مش عارف بصراحة انا فاهمك كدة صح ولا غلط بس عموما الملف المرفق يتم استدعاء بيانات الصنف وفقا لاسمه وعند تغيير الاسم فى اى خلية من خلايا الاسماء يتم الاستدعاء لباقى البيانات استدعاء بيانات على اساس اسم الصنف.rar
    1 point
  28. بارك الله فيكم وأن يجعل أعمالكم حسنات لكم تتضاعف إلى يوم القيامة لما لها من أثر كبير في حياة من يبحث عنها ويريد العلم
    1 point
  29. ملف الأخ الكريم توكل يعمل بشكل جيد .. ما المشكلة التي بالملف الآن؟ هل ما زالت مشكلة التاريخ قائمة ؟ أم ماذا تظهر المشكلة لديك بالتحديد الآن؟ حاول توضح المشكلة بالصور لتتضح الصورة أكثر
    1 point
  30. أخي أبا سلمان الملف يعمل وبشكل سليم أمس عملته في البيت وأنا أستخدم نسخة أوفس 2016 مرخصة من مايكروسوفت أيضا واليوم أنزلته من المنتدى في المكتب وهو يعمل ولامشكلة فيه لست أدرى أين المشكلة.
    1 point
  31. خطوط الدهبي والجزيره وخط GoldenLotus Stg1_Ver2 http://up.top4top.net/downloadf-333a1p6m1-rar.html
    1 point
  32. أخي مختار.. الظاهر إنك كسرت علي الباب وأنا قاعد أجهز الدرس.. المرة الجاية راح أشتغل بعيد عن الباب.. تحياتي القلبية
    1 point
  33. الدرس الأول: مولد الباركود أول خطوة لمعرفة كيفية قراءة الباركود هو طريقة توليدها ومن ثم ربطها بالبرنامج. تختلف صياغة الباركود نظراً للكود الذي يتبعه والتي تحدد معايير رسم وقراءة رموز الباركود، مثل كود 93 و كود 39 وكود 128، ولهذا السبب يشتكي البعض من عدم تمكنه من قراءة رموز الباركود، ولهذا في هذا الدرس سنعتمد على كود 128 وكود QR لأنهما الأكثر شيوعاً وتقبل معظم الأجهزة.. هناك برامج ومواقع كثيرة تقوم بتوليد الباركود، ونحن في هذا الدرس قمنا بتوليد الباركود عن طريق موقع خارجي من خلال المرفق التالي. barcode generator.rar
    1 point
  34. الأخ الحبيب عادل أبو زيد اشكرك على كلماتك الرقيقة ..جزيت خيراً ولك بمثل ما دعوت .. الأخ الحبيب خزاني لكم يسعدني مرورك بموضوعاتي المتواضعة ..بارك الله فيك الأخ الغالي عبد العزيز .. أي مفتاح تحتاجه إن شاء الله تلاقيه ..شد حيلك وشوف الأسرار عشان نتعلم منك فيما بعد الأخ الغالي حماد بيه عمر .. سلمت يداك وعشت وبارك الله فيك تقبلوا تحياتي إخواني الكرام
    1 point
  35. انظر المرفق يمكننا التحرير بواسطة الوورد InDoc.rar
    1 point
  36. وهذه وظيفة add-in تعمل باركود ولكنى لم اجربها وهذا شرح فيديو للوظيفة وهذا موقع التحميل http://www.tec-it.com/en/software/barcode-software/office/word-excel/Default.aspx بالتوفيق BarcodeFunctions.zip Excel Example.rar
    1 point
  37. Télécharger gratuitement Barcode Add in for Word and Excel على هذا الرابط من هنا هذا وانظر المشاركة هذه كذلك على هذا الرابط اما في ما يخص عمل النظام على الاكسل لقراءة الرموز فسيجيبك عليها المختصين في الاكسل مع مطالعة هذا الرابط او هذا الرباط والسلام عليكم ورحمة الله وبركاته
    1 point
×
×
  • اضف...

Important Information