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

السلام عليكم الموضوع (1) الدالة SUBSTITUTE كثيرا منا لم يسمع عنها وهى من دوال استبدال النصوص اى كان مكانها من الجملة ولها استخدامات اخرى انظر المرفق لاتحرمونا من ردودكم ودعائكم تحياتى دالة SUBSTITUTE.rar

برنامج الفواتير و المخزون الشامل المحدث ( الاكسيل بشكل جديد ) office 2010 اليوم وبعد مرور ستة شهور من طرح برنامجى السابق على الرابط التالى http://www.officena....opic=41247&st=0 اقدم لكم برنامج الفواتير و المخزون الشامل المحدث ( الاكسيل بشكل جديد ) برنامج يحتوى على الاتى 1- شاشه ادخال الفواتير بكافه انواعها وفى هذه الصفحه ايضا يكمنك البحث عن اى فاتورة وتعديلها او الغائها او طباعتها كما يوجد اختصار لاخرالفواتير المدخله التى يمكن استدعائها بضغطة زر واحده و العديد من التفاصيل اكتشفها بنفسك 2- شاشه لادخال العملاء و التعديل عليها بها جميع تقاصيل العميل 3- شاشه ادخال الموردين و التعديل عليها بها جميع تقاصيل المورد 4-شاشه ادخال الاصناف و التعديل عليها بها جميع تقاصيل الصنف 5-شاشه ادخال المناديب و التعديل عليها 6- شاشه ادخال مستخدمين بصلاحيات مختلفه 7- شاشات التقرير وتشمل الكثير و الكثير من التقارير كتقارير المبيعات و المشتريات وتقرير على حسب المناديب او المستخدمين و الكثير من التقارير التى يمكن اكتشافها بنفسك 8- شاشه تقرير حسب العميل يوضح مشتراياته ومدفوعاته بالتواريخ وايضا يبين المديونيه المستحقه 9- كما توجد العديد والعديد من الشاشات كادخال السندات و الخصومات و المصاريف وطباعتها 10- الكثير من المزايا الاخرى كحركه صنف وتقرير المخزون وتقرير الموازنه والربح و الخساره... اكتشف المزيد ملاحظات هامه 1- تم عمل البرنامج على اوفيس 2010 و البرنامج لن يعمل بشكل جيد الا على هذا الاصدار لذلك ارجون من يقوم بتجربته ان يكون على هذا الاصدار 2- تم وضع الكثير من الاختصارات التى توصلك لبعض التقارير وتم الشرح داخل البرنامج 3- لاى استفسار خاص بالبرنامج يكون عن طريق هذا الصرح العظيم او عن طريق مراسلتى بالايميل التالى amroomo@gmail.com 4- اتمنى ان يكون هذا البرنامج اضافه لهذا المنتدى العظيم 5- شكر واجب لكل مشرفى و اعضاء منتدى اوفيسنا الذى اصبح مناره الاوفيس فى الوطن العربى 6- الرقم السرى للدخول 123 7- الرقم السرى لمحرر الاكواد هو 85211 8- للبدء باستخدام البرنامج وتجربته قم بادخال الاصناف او حتى صنف واحد وكذلك مع العملاء و الموردين قم بادخال بيان واحد لكل منهما وبعد ذلك قم بعمل الفواتير و السندات بعد ذلك يمكنك استدعاء التقارير المختلفه الخاصه بالبرنامج كما انه لابد من ادخال المناديب او حتى مندوب واحد لكى تستطيع حفظ الفاتوره صورة البرنامج اخيرا ارجو من الجميع عدم التردد فى اى استفسار او ملاحظات تم رفع البرنامج على موقع الميديا فاير حيث ان مساحه البرنامج 1.9 ميجابايت ============================= تم إضافة الملف الى المشاركة بدل الرابط الخارجي الإشراف ============================= البرنامج هو تحديث للبرنامج السابق على الرابط التالى http://www.officena....opic=41247&st=0 برنامج المخزون و الفواتير 2013.rar

السلام عليكم ورحمة الله وبركاته إخواني وأحبابي في الله مع التحديث الجديد .. للأسف لم أجد التوجيهات التي تم وضعها من قبل ، وهذه القواعد والأسس هامة جداً ليدرك الأعضاء كيفية التعامل مع المنتدى طبعاً الموضوع سيكون متجدد .. سيتم وضع القواعد مرة أخرى فالرجاء الرجاء أن تساعدوني في اتمام الأمر .. كل عضو يذكرني بتوجيه من هذه التوجيهات ليتم إرساء القواعد ، إذ أن نجاح أي مؤسسة يعتمد في المقام الأول على قواعد ومنهج ثابت للسير على دربه التوجيهات والقواعد التي يجب مراعاتها التوجيه الأول : قبل طرح موضوع جديد يتعلق بطلب محدد يرجى استخدام خاصية البحث أولاً ، فإذا لم يجد طارح الموضوع بغيته ، فعليه أن يقوم بطرح موضوع جديد ، وفي هذه الحالة على طارح الموضوع أن يعلم أن حسن السؤال شطر الإجابة ، فاللباقة واللياقة والكياسة من الصفات التي يجب أن يتحلى بها طالب العلم. التوجيه الثاني : عند طرح موضوع جديد ، يتم وضع عنوان مناسب للطلب بحيث يفهم الطلب قبل الإطلاع عليه ، وعلى طارح الموضوع أن يبتعد عن العناوين الغير مجدية مثل : ( طلب مساعدة - الرجاء المساعدة - ساعدوني من فضلكم - عاجل وهام - الحقوني - نداء للعباقرة - نداء للعمالقة - إلى آخر تلك العناوين ...) ، وأمر آخر ألا يكون العنوان على شكل سؤال أو طلب .. نبتعد عن كلمة "طلب" مثال تطبيقي : نفترض أنني أريد معادلة تجمع القيم في عمودين العنوان المناسب للطلب يكون بهذا الشكل : معادلة جمع القيم في عمودين والنتائج في عمود آخر التوجيه الثالث : أن يتم توضيح المطلوب بالموضوع بشكل يزال معه أي لبس ، وفي نفس الوقت يراعى الإجمال في الطلب ، فأقصر الخطوط هو الخط المستقيم ، بمعنى "لا إطالة مملة ولا اختصار مخل" ، أي لا يكون طرح الموضوع مختصر للغاية بل يجب أن يستوفي جميع العناصر المطلوبة ، ومن ضمنها أن يحدد طارح الموضوع هل الحل المطلوب بالمعادلات أم بالأكواد أم بكلاهما لتكون الأمور واضحة بالنسبة لمن يريد تقديم المساعدة ، وأن يقوم صاحب الموضوع بإرفاق ملف به بيانات وهمية لتوضيح طلبه وللوصول إلى حل سريع ودقيق ، وإذا صعب على طارح الموضوع شرح المطلوب يمكنه إرفاق بعض النتائج المتوقعة كي يسهل الوصول لحل. التوجيه الرابع : نلاحظ أن شكل المنتدى لا يعجب معظم الأعضاء ، فلما لا نغير بأيدينا الشكل العام للمشاركات ، فيفضل على سبيل المثال استخدام حجم خط كبير 22 على سبيل المثال وجعل الخط عريض Bold مما يجعل المشاركة واضحة ومقروءة بشكل جيد ، كما يمكن استخدام الألوان أي قم بتنسيق المشاركة بشكل جذاب يجعل القاريء لا ينفر منها. التوجيه الخامس : بعد الانتهاء من الموضوع والوصول لحل يرضي صاحب الموضوع ، يرجى أن يتم تحديد أفضل إجابة من خلال النقر على علامة الصح الموجودة بجانب كل مشاركة ، وأن يسجل صاحب الموضوع إعجابه من خلال النقر على "سجل اعجاب بهذا" كنوع من رد الجميل لمن قدم المساعدة ، ويمكن أيضاً أن يقوم بتقييم المشاركة تقييم إيجابي كنوع من التقدير ، وأن تشكر من قدم المساعدة فمن لم يشكر الناس لا يشكر الله. فيما يخص لو كان هناك أكثر من إجابة للموضوع ، يمكن لصاحب الموضوع عمل مشاركة جديدة يجمع فيها كل الحلول ويختار هذه المشاركة كأفضل إجابة التوجيه السادس : لا تكن لحوحاً ، يكفي أن أعضاء المنتدى يقدمون وقتهم و خبرتهم مقابل لا شيء وعندهم أعمال أخرى (مشاغلهم الخاصة) يقومون بها ، و إذا تأخر الرد ، فمن الممكن أن يكون أحد الأعضاء يقوم بمحاولة الإجابة ، وهذا يستغرق بعض الوقت خاصةً إذا كان الموضوع صعباً. التوجيه السابع : حمل الملف المرفق دون زركشات (ألوان و تنسيقات مختلفة) مما يزيد من حجم الملف و أحياناً تكون الألوان مقززة بشكل ينفر منها المساعد (خاصةً إذا كانت ألوان الخلايا غير متناسقة مع لون الخط) التوجيه الثامن : تأكد أن الملف المرفوع غير مصاب بفيروس و غير محمي بكلمة سر ، وإلا لن تجد المساعدة من قبل الأعضاء. التوجيه التاسع : متابعة صاحب الموضوع لموضوعه والتفاعل معه ، فلا يعقل أن يطرح أحدهم موضوع ولا يتابعه إلا بعد مرور وقت طويل ، فهذا يعد من اللامبالاة الغير مرغوب فيها ، والتي تنفر الجميع من العضو. التوجيه العاشر : عدم التسجيل في المنتدى بأكثر من حساب ، وأن يكون اسم الظهور باللغة العربية ومعبر عن الاسم الحقيقي أي (تعريب اسم العضو) ، فلا يجوز أن يكون اسم الظهور اسم واحد وفقط بل أن يكون ثنائي على الأقل أو أن يكون اسم ولقب ، ولذا يرجى عدم استخدام الأسماء المستعارة أو الأسماء باللغة الأجنبية ، فاللغة العربية هي هويتنا ولابد من الحافظ عليها. ** يتم تغيير اسم الظهور أو اسم المستخدم من خلال إعدادات الحساب ثم التبويب اسم المستخدم ، قم بتغيير الاسم ثم انقر كلمة حفظ التوجيه الحادي عشر : عدم طرح أكثر من موضوع لنفس الطلب من نفس العضو ، فهذا يعد مخالفة صريحة ، وليعلم العضو الذي يقوم بذلك أن تكرار الموضوع لن يجدي نفعاً في حالة عدم توضيحه للمطلوب. وفي حالة أن قام العضو بذلك عن طريق الخطأ يقوم العضو بالتنويه في الموضوع وطلب حذف الموضوع نظراً لتكراره. التوجيه الثاني عشر : على من يقدم المساعدة أن يكون مثالاً يحتذى به في العطاء والصبر والحلم وكرم الأخلاق وحسن الإجابة ، يجتذب بتلك الصفات عقول الآخرين وأفئدتهم التوجيه الثالث عشر : عند طرح موضوع يفضل أن يكون هناك طلب واحد فقط إذ أن الموضوع الذي تكثر فيه الطلبات ينفر الأعضاء الذين يريدون تقديم يد المساعدة ، وعلى رأي المثل (من يطارد عصفورين يفقدهما) فما بالك لو طاردت أكثر من طلبين أقصد أكثر من عصفورين ، يمكنك أن تتعامل بذكاء بأن تطرح الموضوع بطلب واحد حتى إذا تم على خير قم على الفور بطرح موضع جديد بطلب جديد وهكذا إلى أن يتم الأمر التوجيه الرابع عشر : يرجلا عدم إرسال رسائل خاصة للأعضاء لطلب المساعدة بشكل شخصي ، لأن هذا الأمر يضايق الكثير من الأعضاء ، وتأكد أن العضو إذا كان لديه معلومة أو يستطيع أن يفيد بشيء ووقته يسمح بذلك فلن يتأخر عنك ، يكفي أن تكتب كلمة "للرفع" في موضوعك ، ليشاهده أكبر عدد من الأعضاء. ** كيفية رفع الصور في المشاركات : ******************************* دمتم على طاعة الله

أخي الكريم أبو عبد الملك يرجى الإطلاع على الملف التالي والتحقق من النتائج تم إضافة هذه الأسطر '=======Start======= 'هذه الأسطر تقوم باستخراج بيانات عمود المنهج في ورقة التقرير الفصلي With Sheets("المنهج") LRCur = .Cells(Rows.Count, 1).End(xlUp).Row Set rngA = .Range("A2:A" & LRCur): Set rngB = .Range("B2:B" & LRCur) Set rngC = .Range("C2:C" & LRCur): Set rngD = .Range("D2:D" & LRCur) Set rngMnhg = .Range("A2:D1000") End With X = ValueLookUp(rngB, .Cells(I, "N").Value, rngC, rngD, .Cells(I, "O").Value, rngA) XX = Application.WorksheetFunction.VLookup(X + 29, rngMnhg, 2) YY = Application.WorksheetFunction.VLookup(X + 29, rngMnhg, 4) .Cells(I, "W") = XX & " " & YY '=======End======= إذا تم الأمر فيرجى إنهاء الموضوع بالشكل المناسب وطرح موضوع آخر بالطلب الجديد ولا تنسى أن تسجل إعجابك إذا أعجبك الحل تقبل تحياتي Quran School V10.6.rar

السلام عليكم و رحمة الله وبركاته أظنّه ملف ملغّم سيدي الفاضل

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

السلام عليكم ها هو رابط الكتاب على موقع خارجى http://www.mediafire.com/download/dj01xxwnczia62k/VBA_Excel.rar

وعليكم السلام ربما لا زالت المشكلة قائمة بسبب تحديث الموقع وعدم وجود بعض المرفقات جرب هذا الموضوع http://www.officena.net/ib/topic/40157-طلب-كتب-برمجة-أكسل-vba/?do=findComment&comment=225150 أو هذا http://www.officena.net/ib/topic/60550-مطلوب-كتاب-انجليزى-سهل-وبسيط-اتعلم-منه-الفيجوال-البيسيك-للاكسيل/?do=findComment&comment=389349 أو هذا http://www.al-mostafa.info/data/arabic/depot/gap.php?file=VBA_lessons.pdf أو هذا http://www.thanwya.com/vb/showthread.php?t=526295

السلام عليكم اخي العزيز هذه الرسالة سببها انك ادخلت قيمة مكررة في حقل مفهرس او مفتاح رئيسي و في هذه الحالة يرفض الاكسس حفظ السجل مالم تقوم بالتعديل على القيمة المدخلة او التعديل في تصميم الجدول فيما يخص الفهارس او المفاتيح الرئيسية... بالتوفيق

إن شاء الله ستراها في البرنامج قريبا تحياتي لك استاذنا

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

من الفوائد : - داخل محرر الفيجوال للتمييز بينها من النظرة الاولى - يمكن ان يأخذ الجدول والاستعلام والنموذج والتقرير اسما واحدا ويكون الفرق فقط في هذه اللاحقات هذا الترتيب مفيد على المدى البعيد عند الرجوع الى البرنامج ويفيد المتعلم ابتداء ولا شك هو برنامج تعليمي

تفضل إضغط تنفيذ وجرب المرفق 1دمج.rar

الأخت الفاضلة رشا يوسف يرجى عدم تخصيص عضو معين لتقديم المساعدة فلربما كان هناك من هو لديه حلول أفضل .. ويمتنع عن تقديم المساعدة بسبب ذلك الأمر إليكي الكود التالي عله يفي بالغرض Sub DeleteEntireRowForSpecificWords() Dim Rng As Range, Cell As Range, I& On Error Resume Next Set Rng = Application.InputBox("Select Range", "Officena", Selection.Address, Type:=8) Set Rng = Intersect(Rng, Columns(4)) If Rng Is Nothing Then MsgBox "Process Cancelled": Exit Sub Application.ScreenUpdating = False For I = Rng.Rows.Count + Rng.Row - 1 To Rng.Row Step -1 If Cells(I, 4) = "نشاط" Or Cells(I, 4) = "ش+ن" Or Cells(I, 4) = "ادارى" Or Cells(I, 4) = "خط" Or Cells(I, 4) = "كاتب" Then Cells(I, 4).EntireRow.Delete Next I Application.ScreenUpdating = True End Sub Delete Entire Row For Specific Words YasserKhalil.xls

السلام عليكم و رحمة الله وبركاته السلام عليكم و رحمة الله وبركاته اولا الشكر شكر خاص وتقدير لكلا من الأستاذ الفاضل خبور خير على تعلمي منه عمل النموذج المرفق بالملف الأستاذ الفاضل اكسلجي على دالة ادخال الوقت بدون فواصل ارفق لكم ملف وهو عبارة عن فكرة لمتابعة دخول و خروج الموظفين من كروت الدوام 1- تقوم بتسجيل اسماء الموظغين في الصفحة الثانية للملف 2- بالضغط على نموذج تسجيل فترة لموظف يظهر لك النموذج حيث تقوم باختيار اسم الموظف ثم تقوم بتحديد الفترة المطلوبة من تاريخ الى تاريخ ثم تحدد مواعيد الدخول و الخروج للفترة الأولى و الفترة الثانية وبالضغط على موافق سوف يتم ادراج البيانات في الصفحة والتي تعتبر قاعدة بيانات يتم العمل عليها في احتساب مواعيد الدخول و الخروج اليومية لاحقا 3- من كرت الدوام يتم تسجيل مواعيد الدخول و الخروج وسوف يظهر معك الخصم و الغياب آليا 4- من الخليتين الأولى في اعلى الصفحة من اليمين تقوم باختيار الشهر المطلوب و اسم الموظف وثم تضغط على الزر الموجود بجانبه لتظهر لك هذه البيانات المحددة فقط مع التحية و التقدير آمل ان يكون الموضوع مفيد ____________2.rar