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

الورقة المطاطية


2saad
إذهب إلى أفضل إجابة Solved by محمد هشام.,

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

إخواني أعضاء المنتدي الكرام بعد سلام الله عليكم ورحمة الله وبركاته

لو سمحت عايز طريقة تجعل الورقة مطاطية عند  الضغط علي كود ترحيل البيانات

بحيث يكون رأس الصفحة ثابت وهو باللون الرصاصي من الصف5 الي الصف 12

ويكون زيل الصفحة ثابت وهو باللون اللصفر من الصف 14 الي الصف 20sella.xlsm

يعني يبدأ الترحيل من الصف 13 

ولكم جزيل الشكر ووافر الاحترام

sella.xlsm

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

اخي اولا هل النطاق المرحل ثابث يعني 15 صف 

ثانيا هل تقصد عند كل ترحيل ان تكون البيانات المرحلة دائما في مابين راس الصفحة وزيلها 

ثالثا هل الاوراق ستكون تحت بعضها 

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

شكرا لرد حضرتك يا أستاذ محمد

أولا : النطاق ليس ثابت ممكن يزيد وممكن يقل

ثانيا :نعم أقصد عند كل ترحيل ان تكون البيانات المرحلة دائما في مابين راس الصفحة وزيلها 

ثالثا: نعم الأوراق ستكون تحت بعضها

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

كبداية  فقط


Sub test()
    Dim a
    With Sheets("sheet1")
        a = .Range(.Cells(10, 3), .Cells(10, 13).End(xlDown)).Cells
    End With
    With Sheets("تقييم")
        .Cells(13, 3).Resize(UBound(a) - 1).EntireRow.Insert
        With .Cells(13, 3).Resize(UBound(a), 9)
            .Value = a
            With .Resize(, 26).Borders(xlInsideHorizontal)
                .Weight = xlThin
            End With
        End With
    End With
End Sub

 

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

سبب التاخير هو المعطيات الغير كافية . المفروض ان لا تجعلنا نخمن ما هو  المطلوب  وما هي طريقة اشتغالك على الملف

 استاد سعد  بعد المعاينة هناك غموض نوعا ما 

بما انك تريد جعل الاوراق تحت بعض لمادا انت مثبت نطاق الطباعة 

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

وهل راس الجدول به قوائم منسدلة ام لا.... المرجوا تزويدنا بالملف الاصلي للاشتغال عليه .

 

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

شكرا يا أستاذ محمد علي تعبك واهتمامك

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

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

والجدول ليس به قوائم منسدلة.

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

والملف مرة أخري

آسف الملفsella.xlsm

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

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

مع بعض الاظافات البسيطة 

في انتظار الرد بعد التجربة 

335166608.png

 

100494777.png

 

sella v4.xlsm

  • Like 4
  • Thanks 1
رابط هذا التعليق
شارك

58 دقائق مضت, Mohamed Hicham said:

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

مع بعض الاظافات البسيطة 

في انتظار الرد بعد التجربة 

335166608.png

 

100494777.png

 

sella v4.xlsm 302.31 kB · 0 downloads

عمل مميز و محترف تسلم ايدك 

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

عمل جميل ومميز وبارك الله فيك يا استاذ محمد

بس فيه حاجة مهمة حضرتك نستها

أنا عايز الجدول الأصفر ينزل في تزييل الصفحة في كل صفحة تترحل فيها بيانات

ويظهر في الطباعة 

وأنا مرفق لك الملف مرة أخري مع زيادة البيانات في شيت 1sella v4.xlsm

زي البرنامج ده في صفحة كشوف المنادةطباعة_1.xlsm

وشكرا لتعبك معاي

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

3 ساعات مضت, 2saad said:

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

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

صراحة اخي سعد لسة مش مستوعب الفكرة... ..... 

 

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

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

وأنا عايزها تظهر في كل صفحة عند الطباعة

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

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

5 ساعات مضت, 2saad said:

اللون الأصفر في آخر ورقة فقط

وأنا عايزها تظهر في كل صفحة عند الطباعة

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

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

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

  • أفضل إجابة
22 ساعات مضت, 2saad said:

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

https://streamable.com/md5m4x 

22 ساعات مضت, 2saad said:

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

تم تعديل بواسطه Mohamed Hicham
  • Like 1
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information