أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
مالك ماريه ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil تعديل الكود ليتم حفظ الصوة باسم الخلية مع تاريخ اليوم  اكسيل اسئله واجابات


اعلان هنا
ألعاب فلاش أون لاين
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا



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





كود لاضافة صف ثابت فى تذييل كل الصفحه

السلام عليكم ورحمة الله وبركاته لو اردنا تثبيت عناوين اعلى او اسفل كل صفحه عند الطباعه نستخدم Header amp; Footer ولكن قد ..



25-01-2018 04:19 مساء
Eslam Abdullah
menu_open
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1445
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 4
يتابعهم : 0
يتابعونه : 75
قوة السمعة : 9126
الاعجاب : 216
 offline 

السلام عليكم ورحمة الله وبركاته
لو اردنا تثبيت عناوين اعلى او اسفل كل صفحه عند الطباعه نستخدم
Header & Footer
ولكن قد لا تسع البيانات الكبيره
بالنسبه للHeader يوجد اداة لتثبيت بعض الصفوف كل اعلى كل صفحه
اما بالنسبه للFooter فلا يوجد اداة لتثبيت صف كل صفحه كتذييل للصفحه
اليوم اقدم لكم كود يتم اضافته كموديول ومن ثم عند تفعيل الكود بالضغط على F5 مثلا
يظهر لنا مربع حوال لتحديد الصف الذى نريد تثبيته اسفل كل صفحه ثم نضغط على OK
وهكذا نلاحظ ان الصف المحدد تم تثبيته اسفل كل صفحه
لا اعلم من صاحب الكود لكنى حصلت عليه من احدى الصفحات الاجنبيه وشكرا لصاحب الكود
وهذا هو الكود المستخدم
Sub MyFooter()
    Dim xTxt As String
    Dim xAddress As String
    Dim xRg As Range
    Dim xCell As Range
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Select the row you will insert repeatedly at the bottom:", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
        For Each xCell In xRg
            xTxt = xTxt & xCell.Value & " "
        Next
        ActiveSheet.PageSetup.LeftFooter = xTxt
    End Sub






25-01-2018 08:23 مساء
مشاهدة مشاركة منفردة [1]
ناصر سعيد1
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس : ذكر
تاريخ الميلاد : 2-2-1990
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 618
الاعجاب : 10
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
جزاك الله خيرا وبارك فيك استاذ اسلام






25-01-2018 08:50 مساء
مشاهدة مشاركة منفردة [2]
ناصر سعيد1
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس : ذكر
تاريخ الميلاد : 2-2-1990
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 618
الاعجاب : 10
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
هل نتعشم في ملف به الكود .. ؟
جزاك الله خيرا





25-01-2018 09:05 مساء
مشاهدة مشاركة منفردة [3]
Eslam Abdullah
menu_open
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1445
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 4
يتابعهم : 0
يتابعونه : 75
قوة السمعة : 9126
الاعجاب : 216
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
وجزاك الله خيرا استاذ ناصر
اتفضل ملف بمثال عملى
 
 
  كود تثبيت تذييل صف.rar   تحميل rar مرات التحميل :(54)
الحجم :(13.692) KB






26-01-2018 11:54 صباحا
مشاهدة مشاركة منفردة [4]
ناصر سعيد1
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس : ذكر
تاريخ الميلاد : 2-2-1990
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 618
الاعجاب : 10
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
جزاك الله خيرا
عند فتح الملف تظهر هذه الرساله
MTQ2OTk4MQ9911
 
 
 






26-01-2018 02:12 مساء
مشاهدة مشاركة منفردة [5]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7895
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 421
قوة السمعة : 22861
الاعجاب : 2122
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
بارك الله فيك أخي العزيز إسلام ومشكور على الموضوع المميز
أخي العزيز ناصر قمت بتحميل الملف ويعمل بشكل جيد ..حاول التحميل مرة أخرى لأنه يبدو أن الملف الذي قمت بتحميله غير مكتمل





26-01-2018 07:56 مساء
مشاهدة مشاركة منفردة [6]
ناصر سعيد1
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس : ذكر
تاريخ الميلاد : 2-2-1990
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 618
الاعجاب : 10
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
بستاذنك استاذ ياسر
ارجو اعاده تحميله منكم لاني حملته عده مرات ويعطي نفس النتيجه





26-01-2018 10:27 مساء
مشاهدة مشاركة منفردة [7]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7895
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 421
قوة السمعة : 22861
الاعجاب : 2122
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
تفضل أخي ناصر
 
 
  كود تثبيت تذييل صف.rar   تحميل rar مرات التحميل :(12)
الحجم :(13.692) KB






27-01-2018 03:22 مساء
مشاهدة مشاركة منفردة [8]
ناصر سعيد1
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-09-2017
رقم العضوية : 705
المشاركات : 440
الجنس : ذكر
تاريخ الميلاد : 2-2-1990
يتابعهم : 0
يتابعونه : 4
قوة السمعة : 618
الاعجاب : 10
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
اولا يجزيكم الله خيرا
ثانيا الملف ...  مش عارف ايه المشكله نفس الرساله





27-01-2018 03:30 مساء
مشاهدة مشاركة منفردة [9]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7895
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 421
قوة السمعة : 22861
الاعجاب : 2122
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
أعتقد أنه يوجد فيروس في الجهاز الخاص بك ..أو نسخة الويندوز معطوبة .. أو نسخة برنامج فك الضغط بها مشكلة (حاول تنصيبها مرة أخرى)
هذا والله أعلم





27-01-2018 04:03 مساء
مشاهدة مشاركة منفردة [10]
عبدالجيد
menu_open
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-08-2017
رقم العضوية : 194
المشاركات : 383
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 15-2-1986
الدعوات : 1
يتابعهم : 158
يتابعونه : 32
قوة السمعة : 2839
الاعجاب : 43
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
تم اضافة زر للتحكم فى الخلايا التى تريد اظهار بيانها اسفل الورقة وهذا بعد اذن الاستاذ الاسلام لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
  كود لاضافة صف ثابت فى تذييل كل الصفحه.rar   تحميل rar مرات التحميل :(35)
الحجم :(23.458) KB


أثارت هذه المشاركة إعجاب: صلاح الصغير،




27-01-2018 04:11 مساء
مشاهدة مشاركة منفردة [11]
Eslam Abdullah
menu_open
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1445
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 4
يتابعهم : 0
يتابعونه : 75
قوة السمعة : 9126
الاعجاب : 216
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
المشاركة الأصلية كتبت بواسطة: عبدالجيد
تم اضافة زر للتحكم فى الخلايا التى تريد اظهار بيانها اسفل الورقة وهذا بعد اذن الاستاذ الاسلام لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب

بارك الله فيك استاذ عبدالجيد





27-01-2018 04:11 مساء
مشاهدة مشاركة منفردة [12]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7895
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 421
قوة السمعة : 22861
الاعجاب : 2122
 offline 
look/images/icons/i1.gif كود لاضافة صف ثابت فى تذييل كل الصفحه
يمكن إعداد صورة بشكل التذييل ووضعها في التذييل السفلي وهذه الطريقة لا بأس بها أيضاً

أثارت هذه المشاركة إعجاب: صلاح الصغير،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
التنبيه برسالة في حالة التكرار مع الخيار بالاضافة او الالغاء عبدالله الصاري
19 1406 ahmed ghoneim
مطلوب تعديل الكود لاضافة حدود للخلايا التى بها بيانات عبدالقادر محمد مهدى
12 1497 karwan
كود لاضافة الاسماء المرجعة مع القيم من خلال قائمة jjebril
5 851 jjebril
الاضافة من فورم الي كمبوكس رمضان بكري
8 1030 YasserKhalil
الحالة الغريبة عند الاضافة الي لست بوكس يظهر معك كود الصنف رمضان بكري
1 474 رمضان بكري

الكلمات الدلالية
لاضافة ، ثابت ، تذييل ، الصفحه ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 11:18 مساء

أعلن هنا
أعلن هنا
أعلن هنا