جمال جبريل قام بنشر مارس 22, 2011 مشاركة قام بنشر مارس 22, 2011 حساب او معرفة اكبر قيمة مكررة، اي لدي مجموعة من القيمة في جدول اريد معرفة اكثر قيمة تم تكرارها في هذا الجدول، يوجد ملف مرفق. سؤال آخر : عند نسخ قيمة ولصقها في جدول آخر ثم سحبها تاخذ القيمة التي تليها اي الصف الثاني ولكن اريدها تاخذ القيمة التي تليها اي بعد ترك صف واحد. اكبر قيمة مكررة.rar رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر مارس 22, 2011 مشاركة قام بنشر مارس 22, 2011 السلام عليكم أخي جبريل مرفق حل سريع يوجد دالة من دوال الإكسل مخصصة لهذا الغرض ولكنها تتعامل مع الأرقام وليس مع الحروف هي دالة MODE لذلك يمكنك التحايل علي ذلك كالتالي تستبدل كل حرف من حروف الإتجاه برقم مثلا 1 = E 2 = W 3 = N 4 = S عن طريق Ctrl-h كما فعلت أنا في المثال المرفق في الورقة الثانية ثم تستخدم الدالة MODE ومن الممكن أن تستبدل مرة أخري كل رقم بحرف من حروف الإتجاه تفضل المرفق الجزء الثاني من السؤال غير واضح اكبر قيمة مكررة.rar 2 رابط هذا التعليق شارك More sharing options...
جمال جبريل قام بنشر مارس 22, 2011 الكاتب مشاركة قام بنشر مارس 22, 2011 بارك الله فيك انا اعرف ان هناك طرق اخرى بالتحايل على البرنامج ولكن فهل هناك طريق بالمعادلات يمكن عمل هذا. ----------------------------------------------------------------------------------------------------- اما السؤال الثاني : فهل يمكن التحكم في زيادة عدد الصفوف والاعمدة عن طريق المعادلات مثلاً: هل يمكن مثلا زيادة عدد الصف مثلا عند عمل المعادلة التالية : =R12+1 ------- يؤدي الي زيادة عدد الصفوف الي =R13 رد مع اقتباس رابط هذا التعليق شارك More sharing options...
بن علية حاجي قام بنشر مارس 22, 2011 مشاركة قام بنشر مارس 22, 2011 (معدل) السلام عليكم ورحمة الله أخي الكريم، بالنسبة للسؤال الأول (تعيين القيمة الأكثر تكرارا) يمكنك استعمال دالة الصفيف التالية: =INDEX(C3:N3,MATCH(MAX(COUNTIF(C3:N3,C3:N3)),COUNTIF(C3:N3,C3:N3),0)) في الخلية O3 وتاكيدها(CTRL+SHIFT+ENTER) ثم سحبها إلى الأسفل... وقد وضعتها في الملف المرفق... أخوك بن علية اكبر قيمة مكررة1.rar تم تعديل مارس 22, 2011 بواسطه hben 1 رابط هذا التعليق شارك More sharing options...
جمال جبريل قام بنشر مارس 23, 2011 الكاتب مشاركة قام بنشر مارس 23, 2011 شكرا جزيلا ، والله يوفقك ويزيدك من علمه، ارجو من الاجابة على السؤال الثاني ان امكن. رابط هذا التعليق شارك More sharing options...
يحيى حسين قام بنشر مارس 23, 2011 مشاركة قام بنشر مارس 23, 2011 السلام عليكم و رحمة الله أخي جبريل إضافة لحل الاخ بن عليه هذا حل أخر بطريقة أخرى =INDEX($C3:$N3,0,MATCH(MAX(FREQUENCY(IF($C3:$N3<>"",MATCH($C3:$N3,$C3:$N3,0)),COLUMN($C3:$N3)-COLUMN($C3)+1)),FREQUENCY(IF($C3:$N3<>"",MATCH($C3:$N3,$C3:$N3,0)),COLUMN($C3:$N3)-COLUMN($C3)+1),0)) و لطلبك الثاني قمت بعمل الكود التالي جربه على ان تكون البيانات التي ترغب في نسخخها في العمود A و تريد نسخها الى b Sub Excel4Us() Dim LR As Long, i As Integer, r As Integer LR = Range("a" & Rows.Count).End(xlUp).Row r = 0 For i = 1 To LR Step 2 r = r + 1 Range("b" & r).Value = Range("a" & i).Value Next i End Sub دمت في حفظ الله رابط هذا التعليق شارك More sharing options...
احمد فضيله قام بنشر مارس 23, 2011 مشاركة قام بنشر مارس 23, 2011 جزاكم الله كل خير رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان