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

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

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

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

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


    • نقاط

      35

    • Posts

      13165


  2. ياسر العربى

    ياسر العربى

    الخبراء


    • نقاط

      13

    • Posts

      1510


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

    • نقاط

      13

    • Posts

      2221


  4. أبوبسمله

    أبوبسمله

    الخبراء


    • نقاط

      9

    • Posts

      3467


Popular Content

Showing content with the highest reputation on 03/31/16 in all areas

  1. الاخوة الكرام واساتذتى فى هذا الصرح العلمى أستكمالا لهذا الموضوع على الرابط التالى أقدم لكم اليوم ثلاث اكواد تقوم بعمل مؤثرات حركيه عند فتح أو اغلاق الفورم أعتقد هذا الموضوع جديد فى المنتديات العربيه والاجنبيه وأن كان موجود فأشهد الله انى لم اصادف موضوع أو كود مثل هذا وأن هذا العمل خالص من اجتهادى الميزه فى الاكواد انها تناسب جميع نسخ اصدارات الاوفيس ارجوا ان ينال اعجابكم جارى تطوير الموضوع للوصول الى ما هو افضل وانتظر اقتراحاتكم ونقدكم ومشاركاتكم تقبلوا جميعا تحياتى اخوكم وتلميذكم / حسام لا تنسونا من صالح دعائكم ولا تنسوا الدعاء للفقيد استاذنا / عماد الحسامى مؤثرات على فتح الفورم.zip
    4 points
  2. حبيبي عبد العزيز فعلا ايام وانا عن نفسي مش عارف ليه اعشق الفيجوال 6 مع انه اصبح في عداد الموتى نعمل ايه بقي يامعلم لازم نواكب العصر وكل جديد تقبل تحياتي هههههههههه الله ينور يامعلم الحاسبة شغالة زي الفل لسه هسطب الفيجوال في البيت هنا بقي لسه بحاول اوفر مساحة عشان تقبل التنصيب
    3 points
  3. و الله ضبطت معك يا فلاحجي .. بسم الله ما شاء الله بالنسبة لي أنا .. يومان و أنا أبحث كيف أكتب بالتاكست بوكس عن التاريخ و التوقيت .. لم أفلح يبدو انّ القضية صعبة ليست كما نتخيّل الله يرحم أيام دروس الفيجوال بيسك 6 .. من أول وهلة أنا فرحان بالشريط المتحرك الذي أنجزته أبو يوسف أوقف الدنيا على رجلٍ واحدةٍ ولم يُقعدْها .. لأنّه عمل فورم للتّاريخ و التّوقيت و أبو ليله الغائب الحاضر بقلوبنا " أدعو الله مخلصا أن يكون بألف خير.. إفتقدناه" .. طايرْ بالسعادة وفرحان بإنجازه العمليات الحسابية إحتراماتي
    3 points
  4. السلام عليكم ورحمة الله بارك الله فيك . دائم الابداع وحفظك من كل سوء
    3 points
  5. انا عارف انى هضرب بس كنت تعبان شويه ان شاء الله النهارده سارفع المثال جزاك الله كل خير ياابواسيل تقبل تحياتى واحترامى طبتم واهتديتم
    3 points
  6. رابط النسخة القديمة http://download.microsoft.com/download/6/9/7/697096F6-4EEA-4704-AF2D-F3BAF57C7634/VS2012_RC_ULT_ENU.iso رابط النسخة الجديدة تقدرو تحملوها باذن الله لاني اتذكر اني قمت بتحميلها بهذه الطريقة ذهبت الى موقع ميكروسوفت وقمت بتحميلها من هناك وبعدين دول 1.5 جيجا ياعم ابو البراء مش 5 جيجا https://download.microsoft.com/download/D/B/0/DB03922C-FF91-4845-B7F2-FC68595AB730/VS2012_ULT_enu.iso الاولي هي نسخة تجريبية ولم تكتمل وتم وضع لها مدة معينة ونتعرف عليها من الحروف RC بعد كلمة فيجوال2012 ولمعرفة المزيد عن الاصدارات حتى لا نقع في مثل هذه الاخطاء أ. مرحلة (Pre-Alpha): أولى مراحل تصميم وتطوير التطبيق، ولا تحتوي أو تشمل نسخة (Pre-Alpha) على كل الوظائف.ب. مرحلة (Alpha): نسخة يتم طرحها لإختبارها وتجربتها داخليا (أي داخل الشركة أو المنظمة أو المجتمع المطور لهذا التطبيق).ج. مرحلة (Beta): نسخة يتم طرحها لإختبارها من قبل مجموعة محددة من المستخدمين أو من قبل العامة وأحيانا يتم طرحها مجانا، تعتبر هذه النسخة غير ثابتة وقد تحتوي على ثغرات أو أخطاء.د. نسخة (Release candidate) أو تعرف إختصارا (RC): نسخة إجتازت بنجاح المراحل السابقة ومرشحة لتكون نسخة نهائية.بعض الشركات أو المنظمات تستخدم كلمات أخرى كذلك، مثل جاما (Gamma) ودلتا (Delta) والتي قد تدل على مراحل أخرى يمر بها التطبيق، والجدير بالذكر أن ألفا وبيتا وجاما أو غاما وسجما ودلتا هي أحرف يونانية.2. مراحل الإنتاج:أ. مرحلة (Release to Manufacturing) وتعرف إختصارا (RTM): هي مرحلة تسبق مرحلة الإصدار النهائي، ويتم توزيعها على المصنعين، مثال على ذلك نظام التشغيل الجديد من Microsoft المسمى بـ Windows 7 حيث يتم توزيعه حاليا على كبار المصنعين باسم (Windows 7 RTM) ومن المعلوم أن تاريخ الإصدار الرسمي هو 22 أكتوبر 2009.ب. مرحلة (General Availability) وتعرف إختصارا (GA): مرحلة تكون فيها النسخة مستقرة تماما ومتوفرة للعامة أو المستخدمين النهائيين عن طريق التحميل من الويب أو عن طريق الوسائط المادية مثل القرص المدمج CD أو القرص الرقمي DVD.أمثلة:Download Windows 7 RTM Windows 7 Preinstallation Kit for OEMs – SoftpediaWindows 7 Release Date | Windows 7 NewsMozilla Firefox 3 Release Candidate Release Notes تقبلو تحياتي
    3 points
  7. السلام عليكم ورحمة الله وبركاته صورة توضح ربط التاريخين في ال Criteria بجدول تاريخي البدء والانتهاء ولذلك لا حاجة للكتابة بهما...تم إخفاؤهما..والدالة هي: =IF(C3="";"";">="&C3) =IF(C4="";"";"<="&C4) كما تم إعداد قوائم منسدلة لخلايا ال Criteria الباقية باستخدام التسمية للقوائم باستخدام المعادلة التالية: =OFFSET(متقدمة!$C$10;;;COUNTA(متقدمة!$C$10:$C$100)) وذلك كمتمم للتصفية المتقدمة لتلبي حاجتنا بشكل أسرع والسلام عليكم ورحمة الله وبركاته.
    3 points
  8. اخى ابوالبراء تسلم اخى اسال الله ان يمد في عمرك وان يحسن عملك جزاكم الله خير
    3 points
  9. السلام عليكم ورحمة الله وبركاته إخواني وأحبابي في الله في أحد الموضوعات لأحد الأخوة الأعضاء كان قد طلب كيفية إرسال رسالة بريد إلكتروني (إيميل Email) باستخدام ملف إكسيل واليوم أقدم لكم الطريقة بالتفصيل من الألف إلى الياء ... وإن شاء الله تكون الطريقة ناجحة ومفيدة للجميع الخطوات اللازمة لعمل المطلوب : فتح حساب جديد على الـ Gmail إذا لم يكن لديك حساب وكيفية إنشاء حساب جديد مشروحة بالصور : نقوم بفتح برنامج الـ Outlook من قائمة Start ثم All Programs وندخل بيانات الحساب الذي أنشيء على الـ Gmail .. بهذا الشكل : وأخيراً وبعد عملية إنشاء الحساب وربط برنامج الـ Outlook بحساب الـ Gmail .. نقوم بفتح ملف إكسيل وفي العمود الأول ندخل الإيميلات المراد إرسال بريد إلكتروني لها .. وفي العمود الثاني نكتب اسم صاحب الايميل (اختياري) وفي العمود الثالث نكتب محتوى الرسالة المراد إرسالها .. وهذا هو الكود الذي سيقوم بمهمة إرسال رسائل البريد الالكتروني دفعة واحدة لكل الإيميلات المسجلة لديك .. ملحوظة مهمة جداً : من خلال محرر الأكواد يتم إضافة المكتبة التالية Microsoft Outlook Object Library من القائمة Tools ثم References .. Sub Mail_To_Friends() Dim SendTo As String Dim ToMSg As String Dim I As Integer For I = 2 To Cells(Rows.Count, 1).End(xlUp).Row SendTo = ThisWorkbook.Sheets(1).Cells(I, 1) If SendTo <> "" Then ToMSg = ThisWorkbook.Sheets(1).Cells(I, 3) Send_Mail SendTo, ToMSg End If Next I MsgBox "Done ...", 64 End Sub Sub Send_Mail(SendTo As String, ToMSg As String) Dim OutlookApp As Object Dim OutlookMail As Object Set OutlookApp = CreateObject("Outlook.Application") Set OutlookMail = OutlookApp.CreateItem(0) With OutlookMail .To = SendTo .CC = "" .BCC = "" .Subject = "Hello Officena" .Body = ToMSg .Send End With Set OutlookMail = Nothing Set OutlookApp = Nothing End Sub وأخيراً إليكم الملف المرفق مطبق فيه الكود وفيه نموذج لشكل ورقة العمل .. ويوجد زر أمر لعملية الإرسال .. وهذا هو الملف تقبلوا وافر تقديري واحترامي كان معكم أخوكم أبو البراء من منتدى أوفيسنا Send Mass Emails Through Outlook Using Excel VBA YasserKhalil Officena.rar
    2 points
  10. بسم الله والصلاة والسلام على رسول الله وعلى آله وصحبه ومن والاه أما بعد: السلام عليكم ورحمة الله وبركاته ...إخوتي الكرام بعد أن اطلعت على دروس أخينا الحبيب ياسر خليل أبو البراء حول الفلترة المتقدمة وكذلك الفيديوهات التي تبين ذلك مشكوراً - جزاه الله خيراً على ما قدم ويقدم ولكم بمثله أيضاً - أردت أن أقدم لكم تصفية متقدمة بين تاريخين وفق عدة معايير ..بالكود حيث بإمكانك تحديد تاريخي البدء والانتهاء ..وأيضاً المعايير للتتغير تلقائياً وفق الكود في حدث الورقة كما يلي: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.CountLarge > 1 Then Exit Sub If Not Intersect(Target, Range(" l4:p4")) Is Nothing Then Call تصفية_متقدمة End If End Sub أما الكود الأساسي للتصفية المتقدمة فهو في حدث موديول وفق الآتي: Sub تصفية_متقدمة() ' مفتاح الاختصار: Ctrl+Shift+S ورقة1.Range("B9").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _ "متقدمة!Criteria"), CopyToRange:=Range("متقدمة!Extract"), Unique:=False End Sub هذا من ناحية الأكواد ،أما المعادلات ضمن معادلة صفيف Ctrl+Shift+Enter يقوم بالتصفية حسب التاريخ: =IFERROR(INDEX(B$10:B$25;SMALL(IF(($C$3<$B$10:$B25)*($C$4>=$B$10:$B25);ROW($B$10:$B25)-9);ROW(A1)));"") أرجو أن تكون به فائدة ومن كان لديه ما يثري الموضوع فليتحفنا بمشاركته مشكوراً ...لأنني أحب التعلم وإن لم أستطع إدراك الكثير والحمد لله على ما يسّر الله لنا والصلاة والسلام على سيد المرسلين والحمد لله رب العالمين ...والسلام عليكم. حمل الملف من هنا
    2 points
  11. جزاك الله كل خير اخى عبدالعزيز مش صعبه ولا حاجه اخى محتاجين الصبر والتركيز والبحث مع ابو اسيل لاننا هنا كلنا بندعم بعض لنتعلم الفيجوال وان شاء الله هنتعلم وهنكون فريق عمل باذن الله شيل كلمة مستحيل من القاموس بتاعك الاول ثم توكل على الله وابداء ب بسم الله الرحمن الرحيم وهتلاقى كل حاجه ماشيه معاك زى التاكس على السريع هههههههههه حبيبى ياعم عبدالعزيز تقبل تحياتى
    2 points
  12. السلام عليكم ورحمة الله أخي الكريم، كما وعدتك سابقا أقدم لك الملف بالرابط التالي على ميديافاير، وبه الكثير من التعديلات مع إضافة شيت آخر خاص بالعملاء... والملف أخذ حجما كبيرا ولم يعد التعامل معه بكيفية سريعة... بالنسبة للمواد أو للعملاء فقد جعلت عددهم 500 لتسريع الملف قليلا وعدد المواد المباعة لكل عميل في كل يوم هو 12 مادة (وإن تعدى ذلك يجب المواصلة بالصف الموالي لليوم نفسه والعميل نفسه)... وأعتقد أن الأكواد لهذا النوع من الحالات أفضل وأحسن ولكني لا أحسنها (ننتظر من يقوم بذلك من إخوتنا الكرام)... أخوك بن علية الداخل_المباع_الرصيد.rar
    2 points
  13. أخي الكريم أبو حمادة إليك ملف البرنامج ومعه الباسورد حمل برنامج صقر المنتدى EMA تقبل تحياتي
    2 points
  14. وعليكم السلام أخي الكريم أبو عبد الواجد لقد رسمت لك خارطة الطريق للكود .. وإن شاء الله توفق في التعديل ..إنما سيكون إضافة على النطاقات الموجودة ولعلك تكون قد فهمت فكرة الكود .. اعذرني لعدم اكتمال الكود .. ولكن صدقني من الأفضل أن تكمله بنفسك لتعرف كيف يمكنك التعديل وقتما تشاء بدون الرجوع إلى أحد تقبل تحياتي
    2 points
  15. ننتظر لحظة الولادة حيث الولادة متعثرة .. جيجا ونصف بالنسبة لي كتير جداً ممكن يستغرق ليلة كاملة أو ربما أكثر للتحميل .. الله المستعان .. بس على الله الكهربا متعملهاش وأعيد التحميل من البداية
    2 points
  16. ايه ده ..ايه ده ..ايه ده بسم الله ما شاء الله ..أيوا كدا أسعدنا وأتحفنا بهداياك يا صقر المنتدى بارك الله فيك وجزاك الله خيراً يا صاحب الحركات السحرية تقبل وافر تقديري واحترامي
    2 points
  17. اخى الفاضل جلال الجمال وفيك بارك اخى الكريم وجزاكم الله خيرا على مروركم العطر تقبل تحياتى ------------------------------------- استاذى الحبيب ابويوسف الاروع من الموضوع هو مرورك وتزينك للموضوع بمشاركتك تقبل تحياتى ------------------------------------- اخى الحبيب والغالى عبدالعزيز والله لك وحشه ادام الله محبتنا فى الله وشاكر مرورك العطر وثناءك على الموضوع فأنتم مصدر الهامنا وتشجيعنا للوصول الى الافضل بارك الله فيك وفى صحتك واهلك تقبل تحياتى
    2 points
  18. السّلام عليكم و رحمة و بركاته ماشاء الله أخي الغالي " حسام عيسى " .. ما أحلى و أجمل إطلالاتك .. قمّة الرّوعة .. ملف و أمثلة رائعة من أستاذنا رائع الابداعات .. حركات فعلاً جميلة .. أنا شخصيًّا أهتم كثيرًا بهذه اللّمسات الفنيّة و اللوحات المميّزة جزاك الله خير الجزاء و زادك من علمه و فضله و نفع بك الاسلام و المسلمين خالص تحياتي
    2 points
  19. السلام عليكم ورحمة الله وبركاته أخي الحبيب "صقر المنتدى حسام" جزاكم الله خيراً على هذه النماذج الرائعة بالحركات المؤثرة التي نشكرك على أدائها ونحمد الله أنه بيننا إخوة مبدعين ....وقد تكون في المرات القادمة حركات عشوائية بمعنى عند كل فتح تنتقل من حركة إلى أخرى في كل مرة... والسلام عليكم ورحمة الله وبركاته.
    2 points
  20. استاذى الحبيب / ابويوسف جزاكم الله خيرا ونفع بكم الى الامام دائما وننتظر ابداع جديد تقبل تحياتى
    2 points
  21. وعليكم السلام ورحمة الله وبركاته أخي الحبيب " عبد العزيز" أعزكم الله ...أشكركم على مروركم العطر وكلماتكم الطيبة التي أعتبرها حافزاً من أخ كريم محبب إلى القلب..أشكركم على دعائكم الطيب علماً أنني ما زلت على بداية الطريق ويهمني رأيكم كما أشرت لكم بالرسالة حيث ندرس ونصحح معاً ونستفيد من أخطائنا لنمضي قدماً في سبيل العلم "من سلك طريقاً يلتمس به علماً سهل الله له به طريقاً إلى الجنة "... والسلام عليكم ورحمة الله وبركاته. أخي الحبيب " أحمد الفلاحجي أبو بسملة" جعلك الله من أهل الحمد ...آمين ...أشكركم على هذا الدعم اللا محدود . جعله الله بميزان حسناتكم والسلام عليكم ورحمة الله وبركاته.
    2 points
  22. السّلام عليكم و رحمة الله و بركاته كفيت و وفّيت يا "أبا يوسف" .. بارك الله فيك و لك .. بارك الله بصحّتك و أوقاتك و أعمالك و بجميع أفراد أسرتك الكريمة .. مواضيعك .. بل دروسك و أعمالك ممتازة و مميّزة و أكثر من ذلك ..راقية و متقنة .. نستفيد كلّنا منه كمرجع من المرجعيات لكل من يهتم بالحسابات و الفواتير جزاك الله خير الجزاء و زادك من علمه و فضله فائق إحتراماتي و إعجاباتي
    2 points
  23. ربنا يهدي الجميع الى النسخ السليمة ياعم احمد وشكرا على مساهمتك المهم طالما النسخة شغالة معاك فين الامثلة ياعم الحاج ننتظر من الاخوة جميعا اللمسات الجميلة وبصراحة هتكون المجموعة دي سبب اني اتعلم الفيجوال دوت نت جيد لاني يعتبر همشي معاكوا خطوة خطوة نتعلم مع بعض تقبلو تحياتي
    2 points
  24. هل حد حمل الفيجوال اللى قمت بتجزئته وهل قام بتنصيبه ؟ لم يواجهنى به اى مشاكل واعمل عليه فى انتظار حد حمله ويقول النتيجه
    2 points
  25. وهذه النسخة هي الاقرب ايضا حيث مكتوب بعد فيجوال RTM وهي النسخة الت اعمل عليها جزاك الله خير اخي عبد العزيز
    2 points
  26. بسم الله الرحمن الرحيم كل عام و انتم بخير جعل الله هذه الايام_ايام رحمة و مغفرة اللَّهُمَّ انْفَعْنَا بِمَا عَلَّمْتَنَا , وَعَلِّمْنَا مَا يَنْفَعُنَا , وَزِدْنَا عِلْمًا إِلَى عِلْمِنَا مرفق هديتى مع الشرح للتعامل مع الملف برنامج لتوزيع التكاليف و المصروفات على مراكز التكلفه بالمعادلات يعطى تقرير على مستوى مركز التكلفه و تقرير اخر شهرى عن السنه المختاره للتقرير باسورد الحمايه للصفحات 123 تحياتى لاتنسونا من صالح الدعاء برنامج توزيع المصروفات على مراكز التكلفه.rar تحياتى للجميع و شكرا على الجهد المبذول من ادارة المنتدى
    2 points
  27. هل تقصد أنك تريد تلك النتائج ام أنك تسأل كيف تم الحصول على تلك النتائج ؟ إذا كان الأمر الثاني وهو معرفة كيفية الحصول على تلك النتائج فأعتقد أنه سيكون من الصعب التخمين حيث أنها قوانين أنت من تعرفها أو من يعمل في مجالك .. إذا كنت قد فهمت الموضوع بشكل خاطيء فيرجى تصحيح الأمر والتوضيح .. لأن الموضوع ما زال مبهم للغاية
    2 points
  28. أخي الكريم أبو عبد الواجد ربما لم تجد استجابة في موضوعك نظراً لأن الخلايا المراد ترحيلها كثيرة جداً ... ولذا أهديك الكود فقط وأنت قم بالتعديل عليه بحيث تكمل بقية المصفوفة الكود يعتمد على عمل مصفوفة بالنطاقات المراد الترحيل منها ثم الترحيل دفعة واحدة وهذا الكود أسميه الكود السحري للترحيل وخصوصاً مع الخلايا المفردة والمتباعدة كما في ملفك حيث أن الخلايا المراد ترحيلها غير متجاورة ...وهذا ما يصعب المهمة السطر الذي ستقوم بالتعديل فيه هو السطر التالي myValues = Array(.Range("C4"), .Range("C5"), .Range("B27"), "", "", "", .Range("B28"), "", "", "", .Range("B29"), "", "", "", .Range("B30"), "", "", "", .Range("B31")) في هذا السطر لو لاحظت تكتب اسم الخلايا التي سيتم الترحيل منها وإذا كانت الخلية التي سيتم الترحيل إليها غير مستخدمة كما لاحظت في ملفك تترك مكانه فراغ .. حاول تفهم السطر عشان تعرف تكمله لأن وقتي ضيق للغاية وفي السطر التالي ستغير العدد 19 إلى آخر عمود حيث الرقم 19 يمثل العمود S وهو العمود الذي توقفت عنده ، ويمكنك التكملة على نفس المنوال .Range("A" & .Cells(Rows.Count, "A").End(xlUp).Row + 1).Resize(1, 19).Value = myValues حمل الكود من هنا تقبل تحياتي
    2 points
  29. أخي الحبيب أبو يوسف بارك الله فيك وجزاك الله كل خير على مبادرتك الطيبة ، ويعجبني أنك تجتهد حتى وإن فشلت ، فأنا أسعد بالمجتهد حتى ولو فشل آلاف المرات ... أخي الغالي سعد عابد أسئلة كثيرة .................. ولكن لعيون سعد (سعد سعد يحيا سعد) الفرق بين Value و Value2 لن أجيبك بشكل نظري بحت ولكن اعلم أن التاريخ يكتب في خلية ويظهر لك بشكل مختلف عن الشكل الأصلي الذي يقرأه الإكسيل اكتب أي تاريخ في الخلية A1 .... روح لمحرر الأكواد واضغط Ctrl + G عشان تفتح النافذة الفورية (يوجد موضوع لها في حلقات افتح الباب) ... في النافذة الفورية اكتب هذين السطرين (أنا قلت اكتب ولم أقل انسخ والصق ..بطل كسل) ?range("A1").Value ?range("A1").Value2 ولاحظ النتائج بنفسك السؤال الثاني هو الكلمة Redim وهي لإعادة تشكيل المصفوفة من حيث الأبعاد فوضعت هنا لكي أجعلها نفس أبعاد المصفوفة الأولى المسماة Arr .. السؤال الثالث لإضافة شروط .... الموضوع بسيط شايف السطر ده اللي فيه IF ..... If Arr(I, 1) >= startDate And Arr(I, 1) <= endDate Then قبل كلمة Then يمكن إضافة الشروط باستخدام كلمة AND ثم تضيف الشرط المطلوب .. ويمكن إضافة أكثر من شرط لا مشكلة في ذلك على الإطلاق أما بخصوص آلية الكود فهو يقوم بوضع قيم النطاق في مصفوفة ثم إنشاء مصفوفة أخرى لوضع النتائج المتوافقة مع الشروط الموضوعة وفي نهاية المطاف في آخر سطر يتم التعامل مع الإكسيل بوضع النتائج التي في المصفوفة Temp ووضعها في الخلية L10 أرجو أن تكون الإجابات قد أدت الغرض وأخيراً إليك شرح الكود في الموديول الثاني في الملف المرفق حمل الملف من هنا وتقبلوا وافر تقديري واحترامي
    2 points
  30. السلام عليكم أخي الحبيب سعد عابد جعلك الله من سعداء العابدين في الدنيا والآخرة..جزاكم الله خيرا على طيب كلماتكم وأشكركم على دعائكم لي.. وما أنا إلا بكم ومنكم..لم أخضع لدورات أو أتعلم على الحاسب إلا ما حصلته من أساتذتي الكرام في منتدى أوفيسنا...واسمح لي أن أخمن جواب سؤالك ريثما يجيب عنه أخونا الحبيب أبو البراء فيسعد بطلابه.. 1- Value: قيمة تاريخ البدء. 2- Value2:قيمة تاريخ الانتهاء. 3- ReDim:إعادة الحلقة التكرارية من جديد( وهذه لست متأكدا منها)..نرجو التدقيق في هذه الإجابات لننطلق منها. والسلام عليكم ورحمة الله وبركاته.
    2 points
  31. وعليكم السلام ورحمة الله تفضل أخي جرب هذه المحاولة TESTQryYear.rar
    1 point
  32. أخي الكريم أنا لا أعرف في أمر التجارة في حقيقة الأمر قم بتصميم ملفك بشكل مبدئي ثم اطرح المطلوب واحدة واحدة وضع تصورك للمطلوب من خلال المنتدى يمكن بناء برنامج متكامل .. ولكن لن يكون مرة واحدة .. ابدأ بالتصميم ثم ابدأ في طرح طلباتك بشكل جزئي ..إلى أن يكتمل العمل إن شاء الله
    1 point
  33. وعليكم السلام ورحمة الله وبركاته أخي الكريم أبو عبد الواجد يمكن إنشاء عدد أوراق عمل كثيرة جداً .عندي ملف فيه حوالي 900 ورقة عمل وقابل للزيادة ولكن ما الفائدة من أوراق العمل الكثيرة .. لا أعتقد أننا بحاجة إلى كل هذا الكم الهائل من أوراق العمل ..
    1 point
  34. ايوة يعنى تظهر على الفورم بشكل ايه ؟ قايمة بيانات Listbox ولا كل بيان منفصل textbox ولا تظهر باى شكل بالظبط ؟
    1 point
  35. أخي الكريم أبو حمادة جرب الملف التالي .. بعد إزالة النطاق المسمى الذي يحتوى على خطأ مرجعي وتحويل الملف إلى xlsm .. وظهر لدي إمكانية التحويل في الأوفيس عندي ... وهذه أول مرة تظهر معي هذه الخاصية الجديدة حمل الملف من هنا
    1 point
  36. ضع الكود السابق وايضا اجعل التقارير قم بعمل جميع التقاريرPOP UP = YES فقط منبثق اجعلها نعم لكن مشروط اجعلها لا
    1 point
  37. تم تنزيل النسخة التي أرفقها الأخ ابو العربي وبعد التنصيب طلب البرنامج السريل نمبر ووضعت السريل الزي أرفقه في المشاركة الأولى وظهرت بعض المشاكل ولكن البرنامج حلها بنفسه وبعد فتح البرنامج أخبرني أن هناك تحديث جاهز والآن أقوم بالتحديث وسف أطلعكم على آخر المستجدات بعد التحديث إن شاء الله الله يستر وتمشي الأمور على خير. جزاكم الله كل خير على صبركم علينا جميع الإخوة بلا استثناء
    1 point
  38. بارك الله فيك أخي الغالي محي الدين فينك من أول الأسبوع يا mohadin ... كنا في انتظار مشاركتك من بدري .. عموماً استعد لموضوع الأسبوع الجديد إن شاء الله .. جزاكم الله خيراً
    1 point
  39. مشكوور اخي / حسام الحين اشتغل كويس لكن ظهر مشكلة اخري عند فتح تقرير لا يظهر التقرير و تتوقف شاشة النموذج لانها مشروطة !!!!
    1 point
  40. السلام عليكم ورحمة الله وبركاته: تشرفت بمروركم العطر أخي الكريم جلال الجمال_ابو أدهم وإياكم ..ولكم بمثل مادعوتم ..راجياً أن يقبل الله تعالى منا صالح أعمالنا وأن يجعلها خالصة في سبيله وابتغاء مرضاته والسلام عليكم ورحمة الله وبركاته
    1 point
  41. وعليكم السلام ورحمه الله تفضل اخى ضع الوحدة النمطية ببرنامج وضع كود عند الفتح فى نموذج الدخول للبرنامج هذة طريقة ويوجد بالمنتدى العديد من الطرق الاخرى يمكنك البحث مثال.rar
    1 point
  42. بارك الله بك أخي، يبدو ان هناك مشكلة في تحميل الملف أخي وأستاذي الكريم أبو البراء جزاك الله عني خير الجزاء هذا هو المطلوب بارك الله بك، وزادك علما وفضلا...
    1 point
  43. أخي الكريم راجع التوجيهات لتعرف طريقة تغيير اسم الظهور ..موضوع التوجيهات في الموضوعات المثبتة في المنتدى بالنسبة لملفك ما هي شكل النتائج المطلوبة بالضبط؟ وما هي النطاقات والأعمدة المراد العمل عليها؟ مزيد من التوضيح لتجد الاستجابة المناسبة من قبل إخوانك بالمنتدى تقبل تحياتي
    1 point
  44. السّلام عليكم و رحمة الله و بركاته إخواني الأفاضل : ياسر العربي ياسر خليل أبو البراء محمد حسن المحمد أحمد الفلاحجي و كل من يشاركنا عرس الدوت نات البهيج .. من باب زيادة الخير .. خيريْن .. و الدّال على الخير كفاعله لمن يعاني من روابط التّحميل .. و ضعف النت .. موقع منذ حوالي 3 سنين و أنا أستعمله ..لتحميل نسخ الوينداوز بجميع أنواعها و لغاتها .. لجميع البرامج الكاملة و الكمال لله .. و الآن لجميع نسخ الفيجوال بيسك باختلاف إصدارتها و لغاتها .. لم يصادفني أنْ وجدت يوما ملفا فاسدًا إطلاقًا .. و الوحيد الذي أستعمله منذ سنوات عن تجربة .. التّحميل بالتورنت .. و أنا الآن بصدد تحميل نسخة 2012 أنجليزية لعل و عسى نحتاجها .. سأضعها على دكّة الاحتياط .. رابط الموقع .. للتّحميل إضغط على البرنامج المراد تحميله .. ثم عند الانتقال لصفحة البرنامج .. إضغط على رمز المغناطيس http://undertorrents.com/usearch/visual studio 2012/ إحتراماتي
    1 point
  45. استاذنا المتالق دائما ياسر خليل شرح ولا اروع ... وافادة بمعنى الكلمة اعزك الله ونفعك بما علمك دمت ودام تالقك تقديري
    1 point
  46. لمعرفة اذا كان نظام الوندوز عند 32بت او 64بت ، هنا تجد مسار معرفة هذا: . حسب موقع مايكروسوفت: https://support.microsoft.com/en-us/kb/2687441 لتسجيل الاداة (سواء كان نظام التشغيل عندك 32بت او 64بت) ، احفظ هذه الاسطر في ملف واحفظه بصيغة bat ، باسم RegFix.bat مثلا ، ثم انقر على الملف بالفأرة اليمين ، وشغل الملف كمسؤول (وإلا لن يعمل الملف بالطريقة الصحيحة) reg delete hkcr\typelib\{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}\2. /f if exist %systemroot%\SysWOW64\cscript.exe goto 64 %systemroot%\system32\regsvr32 /u mscomctl.ocx /s %systemroot%\system32\regsvr32 mscomctl.ocx /s exit :64 %systemroot%\sysWOW64\regsvr32 /u mscomctl.ocx /s %systemroot%\sysWOW64\regsvr32 mscomctl.ocx /s exit جعفر
    1 point
  47. أخي الكريم محمد جرب تبدل كلمة ActiveDocument إلى كلمة myDoc وكذلك أضف كلمة Application متبوعة بنقطة قبل الأربعة كلمات CentimetersToPoints
    1 point
  48. شكرا استاذ علي ... لم ارى هذا الكود الا اليوم ...
    1 point
  49. الخطوات كتالي: 1- من قائمة تحرير اختار استبدال. 2- في خانة البحث عن اكتب ( صلى الله عليه وسلم ). 3- في خانة استبدال بـ: غير الخط إلى اللغة الإنجليزية ثم اختر زر ( أكثر) ثم ( تنسيق) ثم ( خط ) ثم في النص اللاتيني أختر نوع الخط ( AGA Arabesque ) ثم ( موافق ) ثم في نفس خانة استبدال بـ : اكتب حرف r 4- اضغط استبدال الكل. 5- لا تنس تدعو لي أن ربي ييسر أموري ويوفقني لطاعته في خير ولطف وعافية
    1 point
×
×
  • اضف...

Important Information