محمد طاهر

أخي Abu Nazzal هذا الموضوع مفتوح لمشاركة الجميع و يمكن لكل عضو أن يشارك بحسب امكانياته تصوري عن البرنامج المرحلة الاولي منه تشمل العرض و البحث فقط المرحلة الثانية تشمل معاني الكلمات المرحلة الثالثة تشمل التفاسير المرحلة الرابعة تشمل الترجمة و لكن كل من هذه الم…

هذه مجموعة أكواد أعددنها للتغلب علي موضوع تحديث عدد كبير من الجداول المحورية فى نفس الملف و تغيير مصدر بياناتها الي مجال محدد ( اسم ) و عرض و تغيير خاصية التحديث عند فتح الملف لها و عذرا ، فلن يستفيد منها الا من يستخدم الجداول المحورية بالفعل و بكفاءة و تمكن و…

الموضوع السابق http://www.arabteam2000.com/vb/showthread....%CD%E6%D1%ED%C9 و المثال pivotex1.rar

كما ذكرت لك ، ما تريد هو بالضبط طريقة الجداول المحورية ، و التي تنتج تقارير علي شكل جداول قابلة للتحديث و قد قمت بعمل جدولين بناء علي بياناتك فى المثال المرفق فى ورقة العمل الاخري أما عن الطريقة فيوجد لها شرح مصور فى موضوع ، سابق ، و ان كان هناك استفسار فيها ف…

تم تعديل المشاركة Sub Pr1() ActiveSheet.Protect Password:=1234, DrawingObjects:=True, Contents:=True, Scenarios:=True End Sub Sub Pr2() x = InputBox("please enter PAssword '1234'", "Password", 123) If x <> 1234 Then MsgBox "Sorry You are not Allowed !!! " Exit…

قسم الفيجوال ان كنت تريد ذلك بالكود و ان كانت القاعدة المخزنة فيها البيانات من نوع الاكسس مثلا فيمكن التصدير من خلالها بدون فتح واجهة البرنامج اذا لم تكن عليها حماية قوية أما ما يخص البيزيك هنا ـ فهو فيجوال بيزيك التطبيقات ، VBA و لا أعتقد ان له حظا كبيرا فى ا…

و بالاضافة الي ذلك هذا كود يقوم بعمل قائمة بالشرائح الموجودة و أول عنوان بها و ارساله الي ملف نص علي الC , اسمه tmp.txt Sub ListtoC() 'Open "c:temp.txt" For Output As #1 'Lineinput ,#1 "koko" ' Close #1 Dim fs, S, A Set fs = CreateObject("Scripting.FileSystemO…

أعتقد أن المثال السابق يقوم بذلك مع تغييير مكان المعادلات و سأرفقه ثانية و لكن أعتقد أن الاجابة المثلي ليست فى المعادلات و لكن فى أسلوب الجداول المحورية Pivot Tables و يوجد شرح مصور له فى موضوع سابق برجاء الاطلاع عليه sumif2.rar

فكرة جميلة وعلي بركة الله نبدأ فيها و عذرا اذ لم أنتظر الآراء ، فانا أعرف رأيكم مسبقا و أولا نرجو ان تضع املفات المتاحة لتصفحها قبل البدء و لكن أرجو ذكر مصدر الملفات بدقة لنعرف هل يمكن الاعتماد عليه أم لا و أخيرا ، أود أن أشير الي أنه لابد من تكثيف الجهد لانوا…

نعم لقد جربت المثال نفسه علي اوفيس اكس بي و وويندوز 98 و لم يعمل و يحتاج الي تعديل جرب علي ويندوز اكس بي و ان شاء الله تجده يعمل

مرفق المثال و يمكن اخفاء الاعمدة المستخدمة لتجميع البيانات sumif2.rar

السلام عليكم ، أخي أبو عقيل ساحاول القيام بدور الرافض لفكرتك ، و دعم الاسلوب الاخر ، لكي نحاول اظهار كافة العيوب و المميزات :D الأخ زكي : بالنسبة للمثال موضوع المناقشة ، فلن يتغير شكل البيانات ، حيث ان الاخ ابو عقيل يستخدم جدول الترميز فى الادخال فقط ، و يتم ت…

فقط أعد تنزيل الملف جربت إنزاله و تم فكه اذا لم يعمل معك ، فقم بتحميل اصدتر احدث من الوينرار www.rarlabs.com

هل يفيد استخدام هذه الطريقة مع تطبيق دالة الاخ أسامة الاولي :o Private Sub Command0_Click() x = FoundFunOrSub("Myweekday2", 1) If x = True Then MsgBox "the function exists" Else MsgBox "the function does not exist" End If End Sub

اخي أبو عقيل أنا أتفق نعك فى ذلك ، - بل و ألجأ لهذا الاسلوب عند الاحتفاظ بجداول معينة فى القاعدة لهذا السبب ، و هذه النقطة فى صالح أسلوبك و لكن أعتقد أن البحث و الفلترة فى الاسلوب الآخر أقوي و أسرع جدا خاصة مع زيادة حجم البيانات الأخ زكي أنا أقصد بحديثي الاسلو…

اذا ممكن توضح السبب قد نجد حل بديل فمثلا اختيار ال TITLE لكل شريحة قد يجعلك تستعيض عن تغيير الاسم باستخدام ال TITLE

المطلوب countif_if_condit.rar

هل هذا ما تريد ؟؟ sumif.rar

عن طريق استخدام and فى الكود يمكن عمل أكثر من شرط داخل معادلة واحدة و بالنسبة ل go فلم افهم ما تقصد ، و لكن GO TO يمكن استخدامها فى الاكسب كما فى البيزيك IF X = 5 THEN GO TO GGGG تحدد مكان GGGG هكذا GGGG: اذا لم يكن الرد واضخا رحاء ارسال المثال أو التحديد أكثر

أعتقد أن العدد أكثر بكثير من 15 ألف و لن نتحدث عن العدد النظري ، و لكن من العوامل المؤثرة جدا تصميم القاعدة نفسها و مدي مثاليته بالنسبة للاسماء العربية ، و تأثيرها فلا أعرفه لاني لا أستخدمها بتاتا بعد عدة مشاكل معها يمكن التجربة ، و التجربة خير دليل يمكن عمل ا…