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

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

  1. محمد حسن المحمد

    • نقاط

      8

    • Posts

      2220


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

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

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


    • نقاط

      6

    • Posts

      13165


  3. أسامة البراوى

    أسامة البراوى

    الخبراء


    • نقاط

      4

    • Posts

      157


  4. مختار حسين محمود

    • نقاط

      3

    • Posts

      944


Popular Content

Showing content with the highest reputation on 06/05/15 in all areas

  1. السلام عليكم ورحمة الله وبركاته اخوتي الكرام اليكم مثال بسيط لترجمة الكلمات العربية الى لغة صوتية عربية بواسطة مترجم google يلزم ان يكون النت شغال ترجمة صوتية.rar
    2 points
  2. بسم الله الرحمان الرحيم السلام عليكم اعلم اعلم ان غيابي طال عنكم احبتي في الله هي الظروف ومشاغل الحياة التي تمنعني عنكم لاكن دائما و ابدا لن اعود بعد غيابي و انا فارغ اليدين لا اطيل عليكم اقدم لكم اليوم نموذج فاتورة بسيط مصمم على الاكسل ؟؟؟؟ ماذا يوجد الكثير من النماذج في المنتدى نعم يوجد لا كن هذا النموذج مختلف جدا عما الفتوموه من الاخر فكرة النموذج هي انشاء ليست برمجيا تسهل علينا ادخال الاصناف بالاضافة الا الشكل الجمالي لها ماذا ستستفيد من هذا البرنامج غير استعماله ؟؟ وانا اقصد الذين يريدون تطوير مهاراتهم في برمجة VBA اولا ستتعلم كيفية استخدام المصفوفات ثانيا ستتعلم شيئ اسمه الوراثة في البرمجة ثالث كيفية الاستفادة من الكلاس موديل و استخدامه مع الوراثة ملاحظة لم اعمل الجزء المتعلق باضافة و تعديل الاصناف وايضا الجزء المتعلق بالعملاء امرهم بسيط يمكن لاي عضو اضافة العملية من نفسه لا اطيل عليكم واترككم لتجربة البرنامج وانا طوع اي احد يريد الاستفسار حول اكواد البرنامج تحياتي للجميع FcteurRabie.rar
    2 points
  3. الأخ أحمد الرشيدي السلام عليكم ورحمة الله وبركاته لقد استغربت أمراً أصارحك به - المسلم للمسلم كالمرآة - كيف تسأل عن أمر لم تدركه ثم تكون أفضل إجابة هي إجابتك لنفسك ثم إنني اطلعت على الملف الثاني (طلب كود أو معادلة للربط بين الفهرس والفاتورة) الذي تطول أوراقه أكثر من 100 ورقة ولذلك رحمة بحالك ونصحاً لك فإنني أقترح عليك أن تعمل هذه الـ 100 ورقة ورقة واحدة تعمل بها من خلال التصفية حسب اسم العميل تستطيع من خلالها التصفية حسب العميل أو التاريخ ويمكنك وضع أرقام للفواتير وأخيراً أرجو أن تلتمس لي عذراً على صراحتي واقبل توجيه أخيك الأكبر منك سناً.. تقبل تحياتي .... السلام عليكم.
    2 points
  4. السلام عليكم مرفق اخر لجب البيانات (من جميع الملفات csv) الى ملف اكسل واحد وسهل الاستخدام ... 1- ممكن فى اول استخدام تشيل اى اوراق عمل (شيتات) زائدة عن الحاجة ما عدا الشيت الرئيسى 2- اختار المجلد الذى يحتوى ملفات CSV المطلوب استدعائها 3- يقوم البرنامج باستدعاء بيانات الملفات كل واحد فى شيت منفصل 4- البيانات المتجددة من عمود A حتى J 5- اعمل الدوال والوظئف التى تريدها خارج هذه الاعمدة 6- لتحديث البيانات هناك طريقتين الاولى : بالضغط على المفتاح (جلب البيانات) : بيمسح اى بيانات موجودة فى الشيتات تقع فى الاعمدة A حتى J (وتستدعى اى ملفات جديدة ان وجدت) من المجلد الذى تقوم بتحديده (نغ=فس الخطوات 2 ، 3) الثانية: تستلزم ان تكون الملفات الجديدة فى نفس المجلد القديم ، وتقوم بعمل تحديث تلقائى للبيانات (لو فيه اى ملفات جديدة لن تشملها ) Import From CSV to Excel Rev 02.rar 2جلب البيانات اول مرة
    2 points
  5. بسم الله الرحمن الرحيم والصلاة والسلام على اشرف خلق الله سيدنا محمد صلى الله عليه وسلم اخوانى الافاضل تم سابقا عمل نموذج فاتوره بدون فورم على الرابط الاتى http://www.officena.net/ib/index.php?showtopic=50183&hl= وبناء على طلب بعض الاخوه الافاضل فى شرح كيفيه عمل ذلك وعزرا على التأخير فى عمل ذلك وفى تلبية رغباتهم اليوم سوف نبدأ هذا المشروع الكبير واوجه عناية الاخوه الافاضل ان الموضوع ان شاء الله يكون فى غاية البساطه بحيث يتسنى لم لديه الخبره فى ذلك ان يقوم بنفسه بتصميم برامجه التى يريدها اتمنى من الله ان يوفقنى فى الشرح لاننى لا اجيد هذا كثيرا تقبلوا تحياتى
    1 point
  6. تعيين عناصر تحكم التقرير يصف هذا القسم كيفية العمل مع الحقول وعناصر التحكم في التقرير. يشرح كيفية إضافة عناصر التحكم، واختيار الحقول لتجميع وفرز السجلات، وكيفية إدارة مصدر البيانات في التقرير. يغطي هذا القسم أيضا بعض من خصائص التقرير وعنصر التحكم التي يمكن تعيينها من صفحة الخصائص. ------------------------------------------------------------------------------------- حمل ملف PDF حمل ملف البوربوينت صفحتي الخاصة على الفيسبوك
    1 point
  7. السادة إدارة الموقع والمشرفين الكرام: السلام عليكم ورحمة الله وبركاته - تواجهنا بعض الأحيان رسائل خطأ - يوجهوننا إلى المواضيع المساعدة أو الاتصال بإدارة الموقع الكرام ولذلك تيمناً بتوجيهاتكم الكريمة لتعريب أسماء الأعضاء الكرام فإننا نطلب - ومن باب أولى - تعريب كل ما يتعلق بشؤون الأعضاء الكرام ومن بينها المواضيع المساعدة حتى لا نحتاج لترجمة موقع عربي إلى العربية للحصول على هذه المساعدة وليس كل من ينتمي إلى منتداكم الكريم يتقن الإنكليزية شاكراً تفهمكم للموضوع والسلام عليكم ورحمة الله وبركاته.
    1 point
  8. هذا ملفى الأول باستخدام تقنية VBA التي تعلمتها من موقعنا الحبيب والاستعانة بشرح وأكواد الأخوة الأفاضل بالموقع، برجاء من كل الزملاء النقض البناء لتعم الاستفادة وشكرا مقدما. للدخول للشيت استخدم البيانات : اسم المستخدم (roaa) وكلمة المرور (yossif) وللدخول للكود استخدم كلمة المرور (eyad). أكرر شكرى مرة أخرى الحقيقة يا أخواني رُفض رفع الملف بصيغة xslm وبصيغة Xls وظهرت لي العبارة "غير مسموح برفع هذا النوع من الملفات" ولا أعرف هل مسموح رفع الملف على موقع مثل فور شيرد أم لا. أنا محبط !!!! عنوان الملف http://www.4shared.com/file/qVSFjEmoba/raouf.html?
    1 point
  9. السلام عليكم ورحمة الله وبركاته إخواني الأعزاء .. أقدم لكم بعون الله كل ما هو جديد ومفيد في عالم الإكسيل .. الموضوع اليوم عن النطاقات المعرفة Defined Names .. نبدأ بكيفية عمل نطاق معرف .. نقوم بتحديد الخلايا ثم في صندوق الاسم على يسار شريط المعادلات ننقر بالماوس نقرة واحدة ونكتب اسم للنطاق الذي تم تحديده .. وللإطلاع على النطاقات المسماة يمكن الدخول إلى التبويب Formulas ثم انقر على Name Manager لتطلع على النطاقات المسماة بالفعل ، ويمكنك تعديل النطاق من خلال Name Manager .. كما يمكنك حذف أي نطاق مسمى (الحذف يكون لاسم النطاق وليس للنطاق نفسه) الجديد: هو كيفية إخفاء أسماء هذه النطاقات (واللي يحضر عفريت يعرف يصرفه) ، وبالتالي يوجد أيضاً إظهار النطاقات المسماة في الملف المرفق. بالملف المرفق تم تسمية نطاقين بأسماء MyData و MyRange .. قم بالإطلاع على Name Manager قبل أن تضغط زر الأمر Hide Defined Names ثم بعد النقر على الإخفاء قم بالإطلاع على النطاقات المسماة ، لن تجدها في Name Manager (واحد عنده أمل إنها تكون موجودة ففتح صندوق الاسم Name Box اللي على شمال شريط المعادلات ..انسى انسى يا عمرو) اختفت النطاقات المسماة وانتهى أمر وجودها .. لإرجاع النطاقات المسماة يتم النقر على زر الأمر Unhide Defined Names فيعود كل شيء لطبيعته .. أعتقد أن الموضوع قد يكون جيد لحماية المصنف من المتطفلين من الإطلاع على النطاقات المسماة أرجو أن يفيدكم الموضوع ، تقبلوا تحياتي Hide Unhide Defined Names.rar
    1 point
  10. نعم أنت تستطيع وبطل الكسل اللى فيك ده عايزين موضوع نقولك عليه يا محلاااااااااااااااااااااااااااااااااه
    1 point
  11. السلام عليكم ورحمة الله مرحبا أخي بالإضافة لما اشار إليه أستاذ ياسر وفي رأي البسيط أنه لا يفضل لقواعد البيانات ذات الحجم الكبير استخدام الإكسل في المقام الأول لكبر حجم الملف مع ازدياد حجم البيانات تقل الملف بشكل ملحوظ في الحفظ والفتح وخاصة اذا كان هناك Auto recovery كل عشر دقايق مثلا ومع الوقت وزيادة حجم البيانات الملف معرض بنسبة كبيرة للأخطاء التي تؤدي إلى تلفه يمكنك استخدام الإكسس لهذا الكم المتوسط نسيبيا لحجم البرمجيات الكبير لحجم الإكسل والله يوفقك
    1 point
  12. السلام عليكم بارك الله فيك و جزاك خيرا
    1 point
  13. قم بعمل نموذج مشابه وقم بتغيير البيانات بأي بيات اعتباطيه (حلوة اعتباطيه دي)
    1 point
  14. الاخ الكريم ياسر جزاك الله كل الخير كده فعلا خطوه نحو الامام بشرحك وملاحظاتك 1-المشكلة لديك سببها أنك قمت بتمسية الماكرو باسم كلمة محفوظة في اللغة ..ألا وهي كلمة Sort 2- http://www.officena.net/ib/index.php?showtopic=56941#entry374440 جزاك الله خيرا
    1 point
  15. هلا و سهلا فيك يرجى ان يكون بداية الكلام ذكر الله بالسلام عليكم ، أما بخصوص مشكلتك فيرجى ارفاق الملف لتحديد طبيعة المشكلة قد يكون الأمر راجع لإختلاف اصدار نسخة الأوفيس لديك عن نسخة أوفيس الملف و كذلك عدم تمكين وحدات الماكرو أو تفعيل المعادلات و قد يكون الملف ذاته محمى هناك عدة أسباب لذلك يفضل إرفاق الملف حتى نتعرف على السبب الفعلى ..و فضلا لا أمرا يرجى مراجعة رابط التوجيهات من هنا http://www.officena.net/ib/index.php?showtopic=60147
    1 point
  16. تفضل يا اخى اخفاء الاعمدة و الصفوف التى مجموعها = صفر اخفاء اعمدة و صفوف مجموعها صفر.rar
    1 point
  17. الأخ أبو تمام :السلام عليكم يقوم الأخوة أعضاء المنتدى الكرام حين يريدون رفع ملف ما للبحث بتجهيز الملف وضغطه بأحد برامج الضغط المعروفة وكتابة المطلوب كمشاركة (يرفقون الملف المطلوب ) وينتظرون ريثما يجيبهم الأخوة لا أقول لك ذلك إلا للدلالة فاعذرني... تقبل تحياتي والسلام عليكم
    1 point
  18. أخي الكريم ارفق شكل النتائج المتوقعة ..ليسترشد من يريد تقديم المساعدة بها ..
    1 point
  19. أخي الكريم أهلا بك في المنتدى ومرحباً بك بين إخوانك ----------------------------------- يرجى تغيير اسم الظهور للغة العربية يرجى الإطلاع على رابط التوجيهات لمعرفة كيفية التعامل مع المنتدى وإرفاق ملف تقبل تحياتي
    1 point
  20. بسم الله ما شاء الله روعة أخي ومعلمي رؤوف بارك الله فيك .. سأنتظر شرح فيديو لخطوات العمل بالتفصيل ليستفيد منه الجميع .. مللنا من الأعمال الجاهزة ..عايزين أعمال تفصيل .إزاي وبالتفصيل الممل والخطواات اللازمة لعمل مثل تلك الأعمال السحرية ربنا يجعله في ميزان حسناتك يوم القيامة والله كنت ببالي اليوم ..ولما خطرت ببالي لقيتك في المنتدى (القلوب عند بعضها)
    1 point
  21. اخي مختار يا عسل انا مجرد ناقل و اتوقع انه سوف يفيد الاخرين هو انا لو اقدر اعمل زيه كاااااااااان يااااااااااااااااااااااااااااااا حلاه...............
    1 point
  22. اخى الحبيب ياسر جزاك الله كل الخير كده الامور ذى الفل بمجهودك ووقتك وجميع اعضاء المنتدى الكرام جزاك الله كل الخير
    1 point
  23. أخي الحبيب أبو يوسف يمكن معالجة تلك النقطة بسهولة بربط الكود بخلية محددة إذا كانت فارغة يتم الخروج من تنفيذ الكود .. انتهى كلام أخي أبو البراء. السلام عليكم أخي الحبيب ياسر وفقك الله إلى كل خير.. .عالم تخفى علينا كثير من مكنوناته ...تحلون ألغازه ...وتأطرونه ليكون مطواعاً لقد ألان الله تعالى لداوود الحديد ...وأسال لسليمان عين القطر (النحاس المذاب) وها نحن نفتح أبصارنا وبصائرنا لندرك ما حولنا بهمة الطيبين أمثالكم جزاكم الله خيراً..والسلام عليكم.
    1 point
  24. أخي الحبيب أبو يوسف يمكن معالجة تلك النقطة بسهولة بربط الكود بخلية محددة إذا كانت فارغة يتم الخروج من تنفيذ الكود ..
    1 point
  25. تم التحديد وجزاكم الله جميعاً كل خير
    1 point
  26. اخوانى السلام عليكم الدالة ReverseCell احدى الدوال المدمجة فى الأفيس تؤدى هذا الغرض موجودة فى أوفيس 2010 فما فوق ولا أدرى أن كانت فى 2007 أو 2003 الكود الذى قدمه أخى علاء يعمل وهو لنفس الدالة ReverseCell ويعتبر هنا دالة من النوع UDF يستعملها اللى ما عندوش الدالة المدمجة كأصحاب أوفيس 2003 مثلا سؤال لأخى أحمد أبوزيزو : ازاى حولت ملف الــ PDF الى اكسل أبحث عن طريقة بكود وليس عن طريق منتديات التحويل أو البرامج ؟ ملحوظة صغيرة أرجو أن تتقبلوها بصدر رحب : كلمة محتوايات خطأ والصواب محتويات وأطلب من الإدارة المراجعة والتصحيح . هذا المرفق التالى تطبيق للدالة عكس محتويات الخليه.rar
    1 point
  27. الله عليك كده بدأت تجتهد يا أبا سليمان بس لولو عملت لنا تطبيق بأسلوبك يبقى روعة ( لو فقط ما بحبهاش ) تفضل تطبيقى المتواضع و تحياتى لك كيفية حساب عدد مرات تواجد رقم أو نص في نطاق .rar
    1 point
  28. حياك الله بلا أمارة عليك ، لوسمحت تختار المشاركة الصحيحة ، واختر تحديد كأفضل إجابة ، علشان يقفل الموضوع ، وطبعا دائما تقدر تفتح سؤال جديد بموضوع جديد جعفر
    1 point
  29. السلام عليكم مرفق حل بسيط لعله يفى بالغرض المصنف1.rar
    1 point
  30. تفضل ولكن رجاء انظر الى الكود ، ففيه الكثير 1. في النموذج client عندما تضغط على زر "دفع القسط" ، فالحدث لا يفتح النموذج df فقط ، وانما يختار من قائمة Code_Client (ليس يدخل الاسم فقط) ، وذلك من خلال مقارنة رقم العميل ، بتلك الموجودة في القائمة المنسدلة ، والكود الذي يعمل هذا هو: Dim stDocName As String Dim stLinkCriteria As String stDocName = "df" DoCmd.OpenForm stDocName, , , stLinkCriteria 'Now select this name from the Listbox Code_Client of the Form df, 'this is as if we select from the Code_Client listbox itself, 'where we will get the Code_Client and Name_Client columns Dim ctl As Control Set ctl = Forms!df!Code_Client For i = 0 To ctl.ListCount - 1 If Val(ctl.Column(0, i)) = Val(Me.Code_Client) Then ctl.Value = Val(ctl.Column(0, i)) Exit Sub End If Next i 2. في النموذج df ، دائما نجعل التاريخ d1 يكون اول الشهر ، بغض النظر عن اي تاريخ تم اختيارة (وذلك تسهيلا للمستخدم ، بدل ان يفتش عن اول الشهر) ، والكود التالي يعمل هذا: 'make the date always the 1st of the month, 'making it easier for the user to select anydate of the month, and the code corrects it Me.d1 = DateSerial(Year(Me.d1), Month(Me.d1), 1) 3. عند الضغط على زر دفع ، تأتي الخطوات التاليه فيه: أ- التأكد ان المستخدم اختار عدد الاشهر ، والذي يجب ان يكون اكبر من 0 ، وإلا سيتوقف عمل الحدث: 'if No month is selected, get out If Me.f = 0 Then Exit Sub ب- يبحث في الجدول B_Pay ، في انه هل تم الدفع لهذا الزبون في الشهر d1 مسبقا ، فاذا تم الدفع ، واذا تم ، ستحصل على رسالة بذلك ، وسيتوقف عمل الحدث: Dim rst As DAO.Recordset Set rst = CurrentDb.OpenRecordset("Select * From B_Pay Where [Code_Client]=" & Me.Code_Client) rst.FindFirst "[data_eldfa1]=" & DateFormat(Me.d1) If rst.NoMatch = False Then MsgBox "you already used this date for this client" Exit Sub End If ج- اما اذا كان كل شئ تمام ، فالكود التالي يدخل البيانات في الجدول B_Pay: For i = 0 To Me.f - 1 rst.AddNew rst!Code_Client = Me.Code_Client rst!Code_Elshr = i + Month(Me.d1) 'rst!Dfa= 'rst!mogl= 'rst!data_eldfa = rst!data_eldfa1 = DateAdd("m", i, Me.d1) rst!data_eldfa2 = DateAdd("m", i + 1, Me.d1) 'rst!byen = rst.Update Next i MsgBox "Done" جعفر 89.db1.mdb.zip
    1 point
  31. وهذه تحسين لفكرة اخي الفنان جعفر ! وحسب فهمه ! يعني لو خطأ مالنا شغل ! الصق جملة الاستعلام التالية كمصدر للاستعلام TRANSFORM Sum(Table1.ammount) AS Sumمنammount SELECT Year([dates]) AS السنة FROM Table1 GROUP BY Year([dates]) PIVOT IIf(Month([dates]) Between 1 And 6,"1-6","7-12"); بالتوفيق
    1 point
  32. بدّلهـــــا كلمة هاي أو مرحبا أو مساء الخير أو باي بكلمة السلام عليكم ورحمة الله وبركاته إنها الباعث على المحبة بين الناس نفشي السلام بيننا كباراً وصغاراً رجالاً ونساء.. إذ كيف ستكون لهذا المجتمع وشائج محبة وعرى وثيقة دون إفشاء السلام ؟ والله تعالى هو السلام
    1 point
  33. السادة إدارة الموقع الكرام :السلام عليكم ورحمة الله وبركاته ...أما بعد : أشكركم شكراً جزيلاً على استجابتكم لطلبي....وكان هذا رجائي بكم ..أحسنتم أحسن الله إليكم. متمنياً لكم السعادة والتوفيق الدائم.. تقبلوا تحياتي العطرة....السلام عليكم.
    1 point
  34. السلام عليكم ان اعلانات جوجل تتيح اختيار انواع الاعلانات بالمنع الكلي لانواع مختلفة من المواقع و علي الرغم من اختيار المجموعات التي تناسب الموقع فقط الا انه تحدث بعض الاستثناءات ربما عن طريق تلاعب بعض أصحاب هذه المواقع فى التصنيف عند التسجيل، و التي يجب منعها يدويا بعمل بلوك للموقع من لوحة التحكم الخاصة بجوجل للأسف الاعلانات التي تظهر في بلد لا تظهر للجميع ، فالظهور يتم بحسب الموقع الجغرافي ، لذا لا يمكننا معرفة ما يظهر للجميع و قد سبق و أثير هذا الموضوع من فترة ، و قد طلبت حين ظهور إعلان غير مناسب لأحد الأخوة أن يرسل رسالة لأضيفه لقائمة الحظر حتى الان لم يحدث هذا كثيرا. و سأضيف الموقع المشار اليه الان لقائمة الحظر ( قمت بحذفه من المشاركة) أيضا أحيانا تضاف انواع جديد للتصنيفات تكون مدخلا للاعلانات الغير مرغوب بها ، و سأقوم بمراجعة التصنيفات مرة اخرى الان باذن الله للتأكد من حذف كل ما به شك. حتى الان الموضوع لا يحدث كثيرا كما ذكرت ، و اذا تكرر بصورة ملحوظة سنبحث عن حلول أخرى باذن الله
    1 point
  35. السادة مطوري وخبراء برامج الإكسل الكرام...... السلام عليكم: أرجو إفادتي من خبراتكم العالية بإنشاء برنامج تنظيم مكتبة صغيرة يسهل فيه البحث عن الكتاب أو الخريطة أو المستند أو الملف المطلوب ولكم جزيل الشكر.
    1 point
×
×
  • اضف...

Important Information