جمال جبريل قام بنشر مارس 22, 2011 قام بنشر مارس 22, 2011 حساب او معرفة اكبر قيمة مكررة، اي لدي مجموعة من القيمة في جدول اريد معرفة اكثر قيمة تم تكرارها في هذا الجدول، يوجد ملف مرفق. سؤال آخر : عند نسخ قيمة ولصقها في جدول آخر ثم سحبها تاخذ القيمة التي تليها اي الصف الثاني ولكن اريدها تاخذ القيمة التي تليها اي بعد ترك صف واحد. اكبر قيمة مكررة.rar
طارق محمود قام بنشر مارس 22, 2011 قام بنشر مارس 22, 2011 السلام عليكم أخي جبريل مرفق حل سريع يوجد دالة من دوال الإكسل مخصصة لهذا الغرض ولكنها تتعامل مع الأرقام وليس مع الحروف هي دالة MODE لذلك يمكنك التحايل علي ذلك كالتالي تستبدل كل حرف من حروف الإتجاه برقم مثلا 1 = E 2 = W 3 = N 4 = S عن طريق Ctrl-h كما فعلت أنا في المثال المرفق في الورقة الثانية ثم تستخدم الدالة MODE ومن الممكن أن تستبدل مرة أخري كل رقم بحرف من حروف الإتجاه تفضل المرفق الجزء الثاني من السؤال غير واضح اكبر قيمة مكررة.rar 2
جمال جبريل قام بنشر مارس 22, 2011 الكاتب قام بنشر مارس 22, 2011 بارك الله فيك انا اعرف ان هناك طرق اخرى بالتحايل على البرنامج ولكن فهل هناك طريق بالمعادلات يمكن عمل هذا. ----------------------------------------------------------------------------------------------------- اما السؤال الثاني : فهل يمكن التحكم في زيادة عدد الصفوف والاعمدة عن طريق المعادلات مثلاً: هل يمكن مثلا زيادة عدد الصف مثلا عند عمل المعادلة التالية : =R12+1 ------- يؤدي الي زيادة عدد الصفوف الي =R13 رد مع اقتباس
بن علية حاجي قام بنشر مارس 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
جمال جبريل قام بنشر مارس 23, 2011 الكاتب قام بنشر مارس 23, 2011 شكرا جزيلا ، والله يوفقك ويزيدك من علمه، ارجو من الاجابة على السؤال الثاني ان امكن.
يحيى حسين قام بنشر مارس 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 دمت في حفظ الله
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.