محمدحسني احمد قام بنشر مايو 18, 2017 مشاركة قام بنشر مايو 18, 2017 الساد اعضاء المنتدى وعباقرة الاكسل ارجو منكم المساعدة هل من الممكن ادارج كود يتم ترحيل وفرز الاصناف المكررة عند كتابة كود الصنف لعمل كارتة صنف مع العلم انة تم عمل المعادلات ولكن يوجد تقل شديد بالملف لان عدد الاصناف يتعدى 3000 صنف شاكر حسن التعاون والخلق حركة يومية1.rar رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر مايو 20, 2017 مشاركة قام بنشر مايو 20, 2017 السلام عليكم ورحمة الله تم التعديل وتم تجريب الكود بعد عمل صفحة جديدة غير محمية حيث لم اتمكن من التجربة فى المرات السابقة اليك الكود Sub TransKinds() Dim ws As Worksheet, sh As Worksheet Dim Arr As Variant, Temp As Variant Dim i As Long, j As Long, p As Long Dim Kname As String Set ws = Sheets("حركة اليوميه") Set sh = Sheets("كارت الصنف") Kname = sh.Range("F2").Value Application.ScreenUpdating = False Arr = ws.Range("D5:O" & ws.Range("F" & Rows.Count).End(xlUp).Row).Value ReDim Temp(1 To UBound(Arr, 1), 1 To UBound(Arr, 2)) For i = 1 To UBound(Arr, 1) If Arr(i, 3) = Kname Then p = p + 1 For j = 1 To 10 Temp(p, j) = Arr(i, Choose(j, 1, 4, 3, 6, 7, 8, 9, 10, 11, 12)) Next End If Next If p > 0 Then sh.Range("E5").Resize(p, UBound(Temp, 2)).Value = Temp Application.ScreenUpdating = True End Sub 4 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر مايو 21, 2017 مشاركة قام بنشر مايو 21, 2017 بارك الله فيك أخي الغالي زيزو العجوز .. كود رائع واستخدام أروع للدالة CHOOSE في تحديد الأعمدة المطلوب ترحيلها .. جزاك الله خير الجزاء على كل ما تقدمه لإخوانك تقبل وافر تقديري واحترامي 2 رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر مايو 21, 2017 مشاركة قام بنشر مايو 21, 2017 السلام عليكم ورحمة الله هذه شهادة من استاذى الكبير ذ / ياسر و وسام على صدرى بارك الله فيك 1 رابط هذا التعليق شارك More sharing options...
خالد الرشيدى قام بنشر مايو 21, 2017 مشاركة قام بنشر مايو 21, 2017 السلام عليكم حقيقه كود ولا اروع.. وليس بالجديد عليك ا. زيزو فدائما اعمالك رائعه ولكن اعتقد ان المستخدم يريد اظهار عمود اخر ضمن النتائج هو عمود الملاحظات لم يشمله الكود.. ايضا مسح محتوي نطاق النتيجه في بدايه الكود ليستقبل الجديد تقبلوا خالي تحياتي وتقديري رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر مايو 21, 2017 مشاركة قام بنشر مايو 21, 2017 السلام عليكم ورحمة الله شكرا لك استاذى العزيز / خالد نصائحك دائما فى العقل والقلب بارك الله فيك و فى جميع اساتذتنا الاجلاء 1 رابط هذا التعليق شارك More sharing options...
محمدحسني احمد قام بنشر مايو 25, 2017 الكاتب مشاركة قام بنشر مايو 25, 2017 اسف جدااا لعدم التوصل لقطع الانترنت استاذي الفاضل 1 / زيزو العجوز للاسف بعد تغير الكود لا يوجد اختلاف بل بالعكس انة تم الفرز علي جميع الاصناف كما موضح بالصورة اسف جدااا لعدم التوصل لقطع الانترنت استاذي الفاضل 1 / زيزو العجوز للاسف بعد تغير الكود لا يوجد اختلاف بل بالعكس انة تم الفرز علي جميع الاصناف كما موضح بالصورة رابط هذا التعليق شارك More sharing options...
خالد الرشيدى قام بنشر مايو 27, 2017 مشاركة قام بنشر مايو 27, 2017 السلام عليكم بعد اذن استاذي الحبيب / زيزو .. اسمح لى ان اضع كود حضرتك بالمرفق اخي الكريم .. الكود يعمل بكفاءة -- ولكن بعد فك حماية الورقة وجدت انك لا زلت تحتفظ بالمعادلات بنطاق البحث ... وقد تم اضافه سطر بالكود للقيام بعمليه التفريغ في كل مرة يتم فيها البحث انظر المرفق وابدي ملاحظاتك حركة يومية1.rar رابط هذا التعليق شارك More sharing options...
محمدحسني احمد قام بنشر مايو 27, 2017 الكاتب مشاركة قام بنشر مايو 27, 2017 اشكرك يا ا خالد وجعلة الله في ميزان حسناتك فعلا تم تفعيل الكود بنجاح ولكن يوجد مشكلة بسيطة كما موضح بالصورة المرفقة رابط هذا التعليق شارك More sharing options...
أفضل إجابة خالد الرشيدى قام بنشر مايو 27, 2017 أفضل إجابة مشاركة قام بنشر مايو 27, 2017 (معدل) السلام عليكم تفضل اخي الكريم عله المطلوب كما يفضل ان تلغي تنسيق format as table في صفحه كارت الصنف لانه الان مجرد نطاق لنسخ نتائج البحث من خلال الكود... حركة يومية.rar تم تعديل مايو 27, 2017 بواسطه خالد الرشيدى رابط هذا التعليق شارك More sharing options...
محمدحسني احمد قام بنشر مايو 27, 2017 الكاتب مشاركة قام بنشر مايو 27, 2017 شكرااا جزيلا اخوانى الاعزاء جاري تجربة الملف شاكر حسن تعاونكم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان