moho58 قام بنشر أكتوبر 3, 2023 مشاركة قام بنشر أكتوبر 3, 2023 السلام عليكم الإخوة الكرام في هذا المنتدى الرائع في هذا المثال أريد تصغير حجم الخط في التقرير إلى (10) إذا كان عدد السجلات في التقرير يفوق 25 سجل وبارك الله فيكم وربي يجازيكم خير الجزاء baseF.accdb رابط هذا التعليق شارك More sharing options...
Foksh قام بنشر أكتوبر 4, 2023 مشاركة قام بنشر أكتوبر 4, 2023 (معدل) اخي الكريم ضع هذا الكود في الجزء الموجود فيه الحقول في حدث عند التنسيق : Dim salloum As Control For Each FontS In Report.Controls If me.x <25 Then FontS.FontSize = 10 Else FontS.FontSize = 14 End If Next FontS حيث X هو الحقل الذي يجمع عدد السجلات في التقرير . واخبرنا بالنتيجة 😊 تم تعديل أكتوبر 4, 2023 بواسطه Foksh إضافة صورة توضيحية 1 رابط هذا التعليق شارك More sharing options...
أفضل إجابة kkhalifa1960 قام بنشر أكتوبر 4, 2023 أفضل إجابة مشاركة قام بنشر أكتوبر 4, 2023 مشاركة مع اساذنا @Foksh تفضل أخي . baseF-1.accdb 1 2 رابط هذا التعليق شارك More sharing options...
moho58 قام بنشر أكتوبر 4, 2023 الكاتب مشاركة قام بنشر أكتوبر 4, 2023 (معدل) 3 ساعات مضت, Foksh said: اخي الكريم ضع هذا الكود في الجزء الموجود فيه الحقول في حدث عند التنسيق : Dim salloum As Control For Each FontS In Report.Controls If me.x <25 Then FontS.FontSize = 10 Else FontS.FontSize = 14 End If Next FontS حيث X هو الحقل الذي يجمع عدد السجلات في التقرير . واخبرنا بالنتيجة 😊 مشكور أخي وبارك الله فيك ظهر الخطأ كما في الصورة تم تعديل أكتوبر 4, 2023 بواسطه moho58 رابط هذا التعليق شارك More sharing options...
moho58 قام بنشر أكتوبر 4, 2023 الكاتب مشاركة قام بنشر أكتوبر 4, 2023 1 ساعه مضت, kkhalifa1960 said: مشاركة مع اساذنا @Foksh تفضل أخي . baseF-1.accdb 928 kB · 5 downloads عمل رائع أخي الكريم مشكور وبارك الله فيك هذا هو المطلوب بالضبط رابط هذا التعليق شارك More sharing options...
Foksh قام بنشر أكتوبر 4, 2023 مشاركة قام بنشر أكتوبر 4, 2023 5 ساعات مضت, moho58 said: ظهر الخطأ كما في الصورة ولا يهمك اخي الكريم ، لما رفعت التعليق كنت برفع من الموبايل ولم أجرب الفكرة ، ولكن الخطأ مردود ، والشكر للأستاذ @kkhalifa1960 لتصويب الخطأ 2 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان