اذهب الي المحتوي
أوفيسنا

" طلب " عكس جدول من A:D الى D:A


klma7lwa

الردود الموصى بها

السلام عليكم

الاخ الفاضل klma7lwa

استخدم هذا الكود


Sub Ali()

CC = 9

For C = 1 To 4

   For R = 1 To Cells(Rows.Count, 1).End(xlUp).Row

Cells(R, CC).Value = Cells(R, C).Value

   Next

   CC = CC - 1

Next

End Sub

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله

أخي الكريم، يمكن القيام بذلك باستعمال خاصية الفرز بالطريقة التالية:

1- نقوم بترقيم الأعمدة من A إلى D في السطر الأول (فارغا) ترتيبا تنازليا من 5 إلى 1

2- نحدد الأعمدة من A إلى D

3- نختار من قائمة الأوامر "DATA" أي "بيانات" ثم نختار الخاصية "فرز" "SORT" حسب السطر الأول ونختار في "خصائص" أي "Options" الخاصية من اليمين إلى اليسار Sort right to left أو من اليسار إلى اليمين Sort left to right (حسب طريقة عرض الورقة في الإكسيل)... ثم نوافق على الاختيارات.....

أتمنى أن يكون الشرح مفهوما...

أخوك بن علية

  • Thanks 2
رابط هذا التعليق
شارك

ما رأي أساتذتي لو تم عكس الجدول بالمعادلات لتكتمل الفائدة

عكس جدول بالمعادلات.rar

عكس جدول بالمعادلات 2.rar

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله

أخي الكريم، دائما باستعمال المعادلات هذه حلول أخرى مع بعض الشرح في الملف المرفق...

أخوكم بن علية

عكس جدول بالمعادلات.rar

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله

أخي الكريم، قمت ببعض التغييرات على ملف أخي الحبيب محمود الذي أرفقه في الرد رقم 6... حيث اختصرت التسميات صف2، صف3، ... الخاصة باالنطاقات Sheet1!$A$2:$D$2ـ Sheet1!$A$3:$D$3... إلى تسمية واحدة "صف" لنطاق متغير Sheet1!$A1:$D1 (متغير حسب رقم السطر) وحجزت المعادلة :

=IF(INDEX(صف;ROWS(الراتب)-ROW(INDIRECT("a"&COLUMN()-1))+1)="";"";INDEX(صف;ROWS(الراتب)-ROW(INDIRECT("a"&COLUMN()-1))+1))

في الخلية M2 ثم نسخها إلى آخر الجدول (عناوين الجدول + بياناته)...

وهذا تفاديا لتغيير المعادلات في الجدول وإضافة تسميات عديدة (وخاصة لما يكون هذا الجدول كبيرا بعدد صفوفه)

تجد كل ذلك في الملف المرفق...

أخوكم بن علية

عكس جدول بالمعادلات_2.rar

تم تعديل بواسطه بن علية حاجي
رابط هذا التعليق
شارك

أستاذي (بن علية ) بعد تعديلك هذا تبرأالملف مني ولم يعد ينتمي لي ولكن أصبح منتميا أكثر للعبقرية التي قامت بهذا التعديل أنت مكسب أستاذي لهذا الصرح بارك الله فيك

رابط هذا التعليق
شارك

بسم الله ماشاء الله

بارك الله فيكم

نجحت الحلول معى وبالنسبة للاكواد فعلا افكار جميله وانا ستخدمتها فى شغل تانى

شكرا للرد والافاده

جعله الله فى ميزان حسناتكم وزادنا وايكم من علمه

رابط هذا التعليق
شارك

جزاك الله أخي بمثل دعائك وأكثر والدعاء بجد الذي يستحقة عن جدارة أساتذتي ( أبو نصار ) وأستاذي ( بن علية ) جزاهم الله ألف جزاء

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information