لصق خاص

[nofal.saad]

صباح الخير :

السادة الافاضل :

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

مع خالص الشكر و التقدير

لصق خاص.rar

[رجب جاويش]

تفضل أخى

Book111.rar

[عبدالله باقشير]

السلام عليكم

اخي الحبيب رجب -حفظه الله

تطبيق رائع للدروس

بارك الله فيك وجزاك خيرا

يمكنك وضع هذا الكود في موضوع المصفوفات

كمثال تطبيقي

تقبل تحياتي وشكري

[جمال عبد السميع]

ماشاء الله أستاذي شئ خرافي وتميز منقطع النظير

ولكن هناك حل بسيط يمكن للمبتدئيين أمثالي أتباعة في مثل هذه الحالات وهو الأتي

لصق خاص 2.rar

[إبراهيم ابوليله]

الاخ رجب

بارك الله فيك

اكوادك فى غايه الروعه

[إبراهيم ابوليله]

الاخ رجب

بارك الله فيك

ولكننا نحب دائما ان تتفضل علينا بالشرح

بارك الله لك

[nofal.saad]

تفضل أخى

شكرا جزيلا اخي الكريم و هو المطلوب تماما وفقك الله

[nofal.saad]

ماشاء الله أستاذي شئ خرافي وتميز منقطع النظير

ولكن هناك حل بسيط يمكن للمبتدئيين أمثالي أتباعة في مثل هذه الحالات وهو الأتي

شكرا اخي الكريم تعليمة حلو جدا و جديدة علية لكن هي جزء من المطلوب لانها تعمل فرز وليس تبديل المواضع كما اريد على كلن وفقك الله

[عبدالله المجرب]

السلام عليكم

عمل مميز استاذ رجب وتطبيق رائع للمصفوفات

===

هذا الكود يقوم بنفس العمل

Sub ragab2()

T = 2

Range("B8:iv8").ClearContents

LC = [iv5].End(xlToLeft).Column

For i = LC To 2 Step -1

Cells(8, T) = Cells(5, i)

T = T + 1

Next

End Sub

[أبو حنــــين]

عمل احترافي أخي رجب

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

و هذا كود مختصر يقوم بنفس العمل

Private Sub CommandButton1_Click()

For s = 1 To 8

Cells(8, 10 - s).Value = Cells(5, s + 1).Value

Next

End Sub

[جمال عبد السميع]

شئ رائع وجميل بارك الله فيكم

[أبو ردينة]

ما شاء الله لا قوة إلا بالله

تعاون رائع و حلول أروع أستفدت منها الكثير

جزاكم الله خيرا يا شباب و نفع بكم جميعا

[رجب جاويش]

أستاذى الرائع والمبدع / عبد الله باقشير

شرف كبير جدا لى تعليق أستاذى على مشاركة لى

وشرف كبير هذا التشجيع من أستاذى وفعلا هذا هو تواضع العلماء

بالفعل شرح حضرتك لموضوع المصفوفات أزال الرهبة من المصفوفات وفتح الطريق لاستخدامها

فبارك الله فيك وجعل كل ذلك فى ميزان حسناتك ان شاء الله

[رجب جاويش]

أستاذى الفاضل / عبد الله المجرب

شرفنى جدا هذا المرور العطر والكلمات الطيبة

[رجب جاويش]

أخى الحبيب / محمود

أخى الحبيب / أبو حنين

أخى الحبيب / أبو ردينة

أخى الحبيب / ابراهيم أبو ليله

أخى الحبيب /nofal.saad

حفظكم الله جميعا وجزاكم الله كل خير على هذا المرور العطر

[الشهابي]

أساتذة كرام وابداعات متنوعة

بارك الله فيكم وزاد من أمثالكم