اريد كود لترتيب روقات الملف

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

الاخوه الافاضل

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

اريد كود يقوم بترتيب الشيتات

كما فى المرفق

 

SORT.rar

 

تم تعديل سبتمبر 1, 2015 بواسطه إبراهيم ابوليله

[ياسر خليل أبو البراء]

أخي الحبيب إبراهيم

عوداً حميداً ..طالت غيبتك علينا

يرجى مزيد من التوضيح ..الترتيب على أي أساس ..هل الترتيب تصاعدي .. تنازلي ..ترتيب مخصص ؟؟

 

أعتقد أنه ترتيب تنازلي ...لم أستطع تحميل المرفق

يرجى إعادة رفعه مرة أخرى

تم تعديل سبتمبر 1, 2015 بواسطه ياسر خليل أبو البراء

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

اخى ياسر

مشكورا على الكلمات الطيبه

فى صوره مرفقه هل استطعت مشاهدتها

فى تعبر عما اريده

تقبل تحياتى

[ياسر خليل أبو البراء]

ممكن ترفق الملف مرة أخرى أخي الغالي إبراهيم

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

انت تأمر

ياعم ياسر

[ياسر خليل أبو البراء]

أين الملف المرفق ؟

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

[جعفر الطريبق]

Sub SortSheets()
    Dim I As Integer, J As Integer

    For I = 1 To Sheets.Count - 1
        For J = I + 1 To Sheets.Count
            If Val(Sheets(I).Name) > Val(Sheets(J).Name) Then
                Sheets(J).Move Before:=Sheets(I)
            End If
        Next J
    Next I
End Sub

 

[ياسر خليل أبو البراء]

أخي وحبيبي في الله جعفر

لكم يسعدني ويبهجني ويفرحني ويملأ كل أرجاء قلبي فرحاً أن أراك بيننا

نورت المنتدى وشرفت بين إخوانك

في انتظار مساهماتك القيمة والفريدة .. فكم استفدت منك ومن علمك

بارك الله لنا فيك وجعلك ذخراً لنا

تقبل وافر تقديري وحبي واحترامي

[محمد حسن المحمد]

السلام عليكم إخوتي الكرام:

لقد شوقنا الأستاذ الكريم ياسر خليل أبو البراء لمعرفة الأستاذ الكريم جعفر الطريبق عندما عرض لنا بحثاً حول العدسة المكبرة في الإكسل

وها نحن الآن نراه بيننا ...نرحب بك أستاذنا الكريم أيما ترحيب أخ عزيز ومكرّم بين أخوة متحابين ...ستجد إن شاء الله تعالى في منتدانا الكريم هذا كل التفاعل والتكامل والمودة والإخاء والإيثار.

كنا شغوفين ومتلهفين لمعرفتك فلله الفضل والمنة راجين منك التكرم بإعطاء هذا المنتدى الكريم عصارة وخلاصة أفكارك النيرة والتي جمعتها عن خبرة وعلم رفيع من خلال طرح أفكار جديدة ابتداءً أو الرد لحل المشكلات التي تعوق الأخوة المشاركين كمساهمة مع الأساتذة الكرام الذين نقدم لهم كل إجلال واحترام وتقدير ونشكرهم على كل ما بذلوا ويبذلونه لنا.

تقبل تحياتي والسلام عليكم.

 

[جعفر الطريبق]

شكرا على ترحيبكم و كلماتكم الطيبة   ... العضو الكريم السيد *ياسر خليل* هو من استضافني في هدا المنتدى

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

اخى جعفر

اشكرك على الكود الجميل ده

الكود يفى بالغرض تماما

بارك الله فيك

[ياسر خليل أبو البراء]

ممكن ترفق الملف المرفق للاستفادة أخي إبراهيم

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

اخى ياسر

اليك الملف

 

sort sheets.rar

[saad abed]

اخى جعفر

اكوادك ممتازة

جزاك الله خيرا

 

[ياسر خليل أبو البراء]

بورك فيك أخي الحبيب إبراهيم

جزاك الله كل خير