أبو عبد الملك السوفي قام بنشر أغسطس 20, 2020 مشاركة قام بنشر أغسطس 20, 2020 السلام عليكم في الملف ادناه شيت به جدول يحتوي على زبائن اريد كود لتصفية الزبائن حسب الزبون والتاريخ مثلا اريد ان يكون التقرير في الفتره من 15/08/2020 الى 20/08/2020 للزبون محمد1 ومحمد3 فقط فالكود يقوم بانشاء تقرير كما في شيت تقرير ..فيقوم الكود باستدعاء المشتريات من الزبون الواقعة بين التاريخين المحددين Example.xlsm رابط هذا التعليق شارك More sharing options...
أبو عبد الملك السوفي قام بنشر أغسطس 22, 2020 الكاتب مشاركة قام بنشر أغسطس 22, 2020 استسمحك اخي الفاضل ..لكنه ليس صعب على جهابذة الموقع ...العمل انجزته بالمعادلات لكنه ليس عملي ولا يستجيب لزيادة عدد الموردين ...يتسع ل20 مورد وانا اريد كود يقوم بالتقرير لمئات من الموردين 1 رابط هذا التعليق شارك More sharing options...
عبدالفتاح في بي اكسيل قام بنشر سبتمبر 2, 2020 مشاركة قام بنشر سبتمبر 2, 2020 جرب هذا الكود لعله المطلوب اكتب في الخلايا e3,f3 الاسماء بعد كتابة التواريخ Sub bring_customers() Dim CustID As String: CustID = sheet2.[e3].Value Dim CustID1 As String: CustID1 = sheet2.[f3].Value Dim FromDt As Long: FromDt = sheet2.[d3].Value Dim ToDt As Long: ToDt = sheet2.[c3].Value Application.ScreenUpdating = False sheet2.[A5].CurrentRegion.Offset(1).Clear With sheet1.[A2].CurrentRegion .AutoFilter 3, CustID, xlOr, CustID1 .AutoFilter 2, ">=" & FromDt, xlAnd, "<=" & ToDt .Offset(1).EntireRow.Copy sheet2.Range("A" & Rows.Count).End(3)(2) .AutoFilter End With Application.ScreenUpdating = True End Sub Example.xlsm 3 رابط هذا التعليق شارك More sharing options...
عبدالفتاح في بي اكسيل قام بنشر سبتمبر 9, 2020 مشاركة قام بنشر سبتمبر 9, 2020 اخي الكريم اليس هذا ما طلبته انا لا اعمل على التخمين كان وجب عليك توضيح ذلك من البداية 1 رابط هذا التعليق شارك More sharing options...
أبو عبد الملك السوفي قام بنشر سبتمبر 9, 2020 الكاتب مشاركة قام بنشر سبتمبر 9, 2020 جزاك الله خيرا نعم ربما المطلوب فيه لبس ولم يوضح جيدا فقد ضربت مثلا فيه موردين فقط ...لكن المطلوب ان يكون الموردين من 1 الى ربما قد يصل حتى 100 مورد رابط هذا التعليق شارك More sharing options...
أبو عبد الملك السوفي قام بنشر سبتمبر 11, 2020 الكاتب مشاركة قام بنشر سبتمبر 11, 2020 للرفع بورك فيكم رابط هذا التعليق شارك More sharing options...
أبو عبد الملك السوفي قام بنشر سبتمبر 12, 2020 الكاتب مشاركة قام بنشر سبتمبر 12, 2020 للرفع بورك فيكم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.