افكر باستخدام مصنف واحد "موحد"يتضمن كافة مصنفات أوراق العمل لدي ولكن..!

[ramez]

السلام عليكم 

نظرا لكثرة صفحات الاكسيل لدي والتي تتضمن كلا منها مجموعة من اوراق العمل وبالتالي كثيرا مايصعب علي البحث عنها في جهازي فقد فكرت بطريقة لتوحيد كافة المصنفات في مصنف واحد يتضمن كافة الاوراق التي بحوزتي ..

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

فما رأيكم .  

[ramez]

بتعبير آخر سمعت أن عدد أوراق العمل محدود لا يمكن تجاوزه ففهل هذا صحيح وكم عدد اوراقها!!

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

السلام عليكم

تستطيع اضافة اكثر من 1000 ورقة في نفس الملف لكن المشكلة انه يصبح ثقيل جدا عند الغلق

جرب الكود التالي

Sub Add_Pages()

        For i = 1 To 1000
        Set sh = Worksheets.Add
        sh.Name = i
        sh.Move After:=Sheets(Sheets.Count)
Next

End Sub

[ramez]

السلام عليكم

اولا اعتذر عن عدم الرد في حينه كون خطوط الانترنت تم انقطاعها لدينا لاسباب قاهرة.

المهم أشكركم اخي الفاضل لاهتمامكم .

 يبقى لدي بعض الاستفسار .

-هل هناك حد معين من الأوراق المستخدمة "الافتراضية" بحيث لا  تجعل صفحة الاكسيل "ثقيلة "!

-لاحظت  ان ادراجي للصور في صفحة الاكسيل " وهي كثيرة " تجعل الملف ثقيلا أيضا . فهل يعني ان حجم الملف يجعله "ثقيلا أيضا:" وان كان كذلك ماهو الحجم الافتراضي للملف لجعل عمله سهل التعامل .

- هل الكود المذكور يساعد على تجنب ذلك ..

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