DR.ZUHAIR

السادة الافاضل ...  السلام عليكم ...  لدي جدولين الاول باسم Move ويحتوي على حركة المنتجات من وارد وصادر بشكل مفصل ،،، والجدول الثاني باسم Items كدليل للمنتجات كيف يمكن تحديث قيم الفئات الرئيسية بالجدول الثاني Items في الحقول المسماة In & Out بمجاميع حركة المنتجات اي اظهار مجموع الوارد والصادر بالنسبة للفئات الرئيسية كفئة المواد الغذائية ومنتجات الالبان وكذلك الاجبان كما بالمرفق نأمل أن يكون السؤال واضح حيث تم طرحه في مشاركة سابقة بطريقة اخرى ،،، ولكم جزيل الشكر جميعاً Items.accdb

للرفع

الاخوة الافاضل ... السلام عليكم ... لدي جدولين الاول باسم Move ويحتوي على حركة الحسابات ،،، والجدول الثاني باسم Acc كيف يمكن تحديث الحسابات الرئيسية اي Type = 2 بمجاميع حركة الحسابات بجدول المرتبط Move اي اظهار مجموع Debit & Credit بالنسبة للحسابات الرئيسية كالاصول والاصول الثابتة والمباني والخصوم كما بالمرفق Acc.accdb

ما شاء الله تبارك الرجمن .... بارك الله فيك ... انا حاليأ نزلت المرفق ... ولا زلت ما اطلعت عليه بالكامل ... ولكن المكتوب مبين من عنوانه وحالياً انا اتمتع بمنظر التقارير الرائعة المبهرة .. فعلاً شغل متعوب عليه جزاك الله كل خير اخي الفاضل ... والله يعطيك الصحة والعافية والهناء

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

رائع رائع اخي ياسر خليل .... بالفعل المعادلة بسيطة واخف بكثير على الملف مما سبق جزاك الله عنا خير الجزاء فتح الله عليك

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

أخي الفاضل بن علية رحم الله والديك دنيا واخرة ... بارك الله فيك وجزاك الله عنا خير الجزاء ... حل جميل ورائع ... شكراً

السلام عليكم أخي الفاضل بن عليه حياك الله وبياك ولكن لماذا تظهر لدي نتيجة المعادلة هكذا كما بالصورة REF#

السلام عليكم ورحمة الله المطلوب الترقيم في العمود f وفقاً للشروط الظاهرة بالجدول في حالة تساوي رقم الحالة ونوع الكشف والطبيب والتاريخ يعني إذا كان جميع البيانات الواردة متشابهة تعطى رقم واحد لكل حالة ويضاف 1 على الحالة التي تليها وهكذا ... وجزاكم الله عنا كل خير ترقيم بشروط.zip

الأخ الفاضل عبدالله المجرب السلام عليكم جزاك الله عنا كل الخير وفتح الله عليكم ... الكود المرفق منكم أنجز العمل بنجاح فبارك الله فيك ... وأعذرني لتأخري في الرد وأثناء تجوالي في أرشيف المنتدى قبل أن أتحصل على الكود المرفق منكم وجدت كود مشابه لما أطلبه وهو من عمل الأخ الفاضل : هادى محمد المامون سالم على هذا الرابط : http://www.officena.net/ib/index.php?showtopic=15490 إلا أن الأمر أحتاج مني لتعديل في الكود ومعادلة التسلسل حتى يتناسب مع طلبي لذا إسمح لي بعد إذنك بنقله حتى تعم الفائدة على الجميع : Sub ZUHAIR() Dim i, ii As Integer For ii = 2 To 7 For i = 2 To 200 If Sheets("2").Cells(ii, 7) = Sheets("1").Cells(i, 7) Then Sheets("1").Cells(i, 7).Offset(0, -6) = Sheets("2").Cells(ii, 1) Sheets("1").Cells(i, 7).Offset(0, -5) = Sheets("2").Cells(ii, 2) Sheets("1").Cells(i, 7).Offset(0, -4) = Sheets("2").Cells(ii, 3) Sheets("1").Cells(i, 7).Offset(0, -3) = Sheets("2").Cells(ii, 4) Sheets("1").Cells(i, 7).Offset(0, -2) = Sheets("2").Cells(ii, 5) Sheets("1").Cells(i, 7).Offset(0, -1) = Sheets("2").Cells(ii, 6) End If Next Next MsgBox "تم الترحيل" End Sub أجدد لكم التحية وجزاكم الله عنا كل خير ... NEW FBB.zip

(وبشرط عدم مسح البيانات المؤرشفة في صفحة رقم 1 ================================== المقصود أخي الفاضل الابقاء عليها كما هي أي عدم مسحها فهي الورقة التي ستستقبل البيانات وتستحدث البيانات التي تتساوى فيها القيم بالعمود G بالورقة 1 مع الخلية G2 بالورقة 2 ================================= أخي المطلوب هو ما قمت به تماماً ولكن العكس صحيح فقط ============================================== أي أن نقل المجال A2:F7 من الورقة 2 إلى ورقة رقم 1 بشرط تساوي قيمة الخلية G2 بالورقة 2 مع القيم بالعمود G بورقة رقم 1 مرفق ملف + فيديو للتوضيح ولك كل المودة والتقدير FBB3.zip

أخي عبدالله السلام عليكم وفتح الله عليك وزادك من علمه وكرمه لكن أخي الفاضل المطلوب هو ما قمت به تماماً ولكن بالعكس نقل البيانات من ورقة 2 إلى ورقة 1.... وأنا جد متأسف لأنني أرهقتك ... فجزاك الله عنا كل خير

السلام عليكم ورحمة الله وبركاته أستاذنا الفاضل عبدالله جزاك الله عنا كل الخير وجعله في ميزان حسناتك .... المطلوب الثاني قمت بإنجازه على أكمل وجه فبارك الله لنا فيك ... أما عن المطلوب الأول فأنا أعتذر إن لم يكن سؤالي واضح ... وهو ببساطة أريد كود يقوم بترحيل قيم الخلايا على أن يكون الشرط كالتالي : المدى من G2:G7 بالصفحة رقم 2 يساوي X حيث X هي قيم الخلايا المساوية له في العمود G بالصفحة رقم 1 عندها يتم ترحيل قيم الخلايا بالأعمدة 1 إلى 6 بالصفحة 2 إلى الصفحة رقم 1 (وبشرط عدم مسح البيانات المؤرشفة في صفحة رقم 1 ولكن نسخ البيانات الجزء الموجود بالمدى G2:G7 من الصفحة 2 إلى ما يقابلها بالصفحة رقم 1) مثال : FBB-3 في الصفحة 2 = FBB-3 في الصفحة 1 عندها يتم ترحيل البيانات إلى الصفحة رقم 1 مرفق ملف لشرح المطلوب FBB2.zip

عذراً للرفع

الاخوة الكرام السلام عليكم المطلوب : أولاً : كيف يمكن ترحيل البيانات من الصفحة 2 إلى الصفحة 1 بشرط تساوي بيانات العمود G مع العمود G بالورقة 1 أي مثلاً عند FBB-1 في ورقة 2 يتم نقل البيانات إلى FBB-1 في ورقة 1 مع الإبقاء على البيانات الاخرى كما هي ... ( والمقصود بالتساوي هنا هو تساوي كل حالة بذاتها على حدة ) ثانياً: عمل متوالية تتزايد برقم 1 كل 6 خطوات في الورقة رقم 1 أي FBB-3 ، FBB-2 ، FBB-1 ... وهكذا على أن تتكرر FBB- عدد 6 مرات وجزاكم الله عنا كل خير FBB.zip

فتح الله عليك جزاك الله عني كل خير استاذي الفاضل على هذه الإجابة السريعة والموفقة مائة بالمائة ،،، الله يزيدك من علمه بارك الله فيك هذا هو المطلوب تماماً

عفوا كما هو موضح بالصورة

الاستاذ عماد بارك الله فيك عمل رائع جداً ،، ولكن ماذا لو اردنا ان نجعل البيانات المفلترة تحتوي على المعيار المطلوب فقط ولا تساويه مثلاً بمثالك المشروح Range("A1:e1").AutoFilter Field:=1, Criteria1:=Range("F3").Value في خلية البحث او المعيار نكتب "عم" للبحث عن اسم عماد أي نختار يحتوي على وليس يساوي فما هو التعديل اللازم في الكود ارجو ان يكون سؤالي واضح وشكراً سلفاً

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

السلام عليكم استاذي يحي بارك الله فيك وعذراً لأنني لم ارى ردك إلا الأن ،،، شكراًُ شكراً وبوركت هذا هو بعينهما أريده بل وافضل من الحل الذي توقعته فجزاك الله عني خير الجزاء ،،، الله يوفقك إن شاء الله

للرفع مع المعذرة،،، للجميع

السلام عليكم الاخوة اعضاء النتدى الكرام هل من الممكن ترحيل البيانات من ورقة إلى اخرى مع التجميع وفقاً لأساس معين ،،، كأن يكون رقم يتم على اساسه تجميع قيم معينة ،،، والمطلوب عفواً كود وليس معادلة نظراً لان البيانات حجمها كبير والمرفق عينة منها.. والملف المرفق يوضح ذلك ،،،ولكم جزيل الشكر ترحيل وتجميع.rar

السلام عليكم البرنامج يبدو انه ممتاز ولكن نفس الاشكالية لدى اخي افرام رشو تظهر لدي ،،، وشكراً

السلام عليكم اخي الحبيب kemas الله يفتح عليك دنيا واخرة ،،، هدية رائعة جدا