saad abed قام بنشر أغسطس 4, 2010 مشاركة قام بنشر أغسطس 4, 2010 (معدل) كل عام وانتم جميعا بخير لانى اتعبت الحسامى وخلجت من كثرة طلباتى نقلت الموضوع بعنوان جديد توصلت لكود من اعمال الاخ يحي حسين يعمل ويحدد المجال فور الضغط على مفتاح الطباعه ولكنى طمعت فى ان يكون الشكل الجمالى للكشف اذا اضفت اجمالى الارصده مدين دائن رصيد التى تخص العميل فى نهاية الصفحة فهل هذا ممكن خانة الرصيد هل هناك معادله تجعلها مخفيه اذا لم يظهر ارقام فى خانة مدين ودائن لكم جزيل الشكر كشف حساب.rar تم تعديل أغسطس 4, 2010 بواسطه سعد عابد رابط هذا التعليق شارك More sharing options...
أيسم إبراهيم قام بنشر أغسطس 4, 2010 مشاركة قام بنشر أغسطس 4, 2010 السلام عليكم جرب المرفق أخي الكريم دمت بخير أيسم إبراهيم كشف حساب.rar رابط هذا التعليق شارك More sharing options...
saad abed قام بنشر أغسطس 5, 2010 الكاتب مشاركة قام بنشر أغسطس 5, 2010 اخى ايسم ابراهيم شكرا لك كل عام وانتم بخير هذا هو المطلوب بالضبط هل هنك معادله تظهر الرصيد فى الصفوف التى بها بيانات فقط كل عام وكل اعضاء المنتدى طيبين رابط هذا التعليق شارك More sharing options...
أبوعبد الله قام بنشر أغسطس 5, 2010 مشاركة قام بنشر أغسطس 5, 2010 أخي العزيز / سعد عابد بالمرفق تم إضافة عمود للرصيد بمعادلة لا تظهر الرصيد إلا للصفوف التي بها بيانات ، والشكر أكيد موصول للرائع صاحب الملف عماد الحسامي ولكل من شارك فيه وأخص منهم الأخ العزيز أيسم الذي أضاف إمكانيات الطباعة . تحياتي أبو عبدالله كشف حساب.rar رابط هذا التعليق شارك More sharing options...
الحسامي قام بنشر أغسطس 5, 2010 مشاركة قام بنشر أغسطس 5, 2010 السلام عليكم بارك الله فيك اخي ابو عبدالله ولا اعتقد انه يوجد من هو اروع منك فبارك الله فيك وجزاك الله خيرا والشكر الموصول للجميع لمساهمتهم في الاعمال المتميزة اخي سعد كود مسح البيانات الموجود في حدث صفحة التقارير لا يعمل كونك عملت دمج للخلايا في السطر 500 ولوجود كود تفادي الاخطاء On Error Resume Next فلا يقوم بمسح البيانات القديمة عند طلب كشف جديد فقوم بتغيير الكود التالي Sheet2.Range("b8:g5000,I8:I5000").ClearContents بالكود Sheet2.Range("b8:g499,I8:I499").ClearContents أي دعه يقوم بمسح الاسطر ال 499 الاولى فقط رابط هذا التعليق شارك More sharing options...
saad abed قام بنشر أغسطس 5, 2010 الكاتب مشاركة قام بنشر أغسطس 5, 2010 اخى وحبيبى ابوعبدالله شكرا لك على تعونكم معنا جزاك الله خيرا كل عام وانتم بخير اخى العزيز عماد الحسامى لا اجد كلمات تعبر عن شكرى عن متابعتك للموضوع جزاك الله عنا خيرا وكل عام وانتم بخير الاخ ايسم ابراهيم الف شكر وجزاك الله كل خير ارجو ان تتم الجميل وتجرب الملف معاينة الطباعة تعطى المطلوب ولكن فى وضع المعاينة لا تستطيع الطباعة حتى بالاختصارات المعروفة c+p اذا ضغط طباعه فانه الطباعه العادية تعطى كل الصفحات ول تتوقف عند نهاية البيانات كما كان يعمل الكود رابط هذا التعليق شارك More sharing options...
أيسم إبراهيم قام بنشر أغسطس 5, 2010 مشاركة قام بنشر أغسطس 5, 2010 السلام عليكم أخي الكريم : سعد قم بحذف كود الأستاذ يحيى من الملف نظرا للتعارض بين الكودين لأنهما يؤديان وظيفة واحدة . جرب و ستجد الأمور على ما ترغب. الكود هو Sub Yahya() Dim LatR As Long LatR = Range("b:b").Find("*", LookIn:=xlValues, SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row With ActiveSheet .PageSetup.PrintArea = "A1:i" & LatR .PrintPreview End With End Sub رابط هذا التعليق شارك More sharing options...
saad abed قام بنشر أغسطس 6, 2010 الكاتب مشاركة قام بنشر أغسطس 6, 2010 اخى ايسم ابراهيم اخجل من تكرار طلبى تم رفع كود الاستاذ يحي حسين واردت ان اعين الماكرو على المفتاح فلم اجد غير هيد راو التى تقوم بالمعاينة ايضا والمعاينة صحيحة ولكن الطباعه مختلفه اثناء المعاينه لا تستطيع الوصول لاعدادات الصفحه او الطباعة بالاختصارات ارسلت لك الملف بعد التعديل من فضلك حاول التجربه رابط هذا التعليق شارك More sharing options...
saad abed قام بنشر أغسطس 6, 2010 الكاتب مشاركة قام بنشر أغسطس 6, 2010 (معدل) معذرة هذا هو الملف كشف حساب.rar تم تعديل أغسطس 6, 2010 بواسطه سعد عابد رابط هذا التعليق شارك More sharing options...
أيسم إبراهيم قام بنشر أغسطس 6, 2010 مشاركة قام بنشر أغسطس 6, 2010 السلام عليكم الأخ الكريم واردت ان اعين الماكرو على المفتاح فلم اجد غير هيد راو بالفعل Hide_Rowهو الكود الذي نعمل عليه والمعاينة صحيحة ولكن الطباعه مختلفه أنا جربت الطباعة عندى فوجدتها تماما كما يظهر بالمعاينة اثناء المعاينه لا تستطيع الوصول لاعدادات الصفحه يمكنك ذلك من الضغط على الزر setup و الزر Margins الطباعة بالاختصارات لا يمكنك الطباعة بالاختصارات و إنما يمكنك فقط الطباعة بالضغط على الزر Print ستظهر شاشة الطباعة حدد منها ما تريد دمت بخير أيسم إبراهيم رابط هذا التعليق شارك More sharing options...
saad abed قام بنشر أغسطس 6, 2010 الكاتب مشاركة قام بنشر أغسطس 6, 2010 هل هناك اسباب محتملة فى جهازى انا اعمل على اوفيس 2007 نسخة الويندز xp sp3 رابط هذا التعليق شارك More sharing options...
أيسم إبراهيم قام بنشر أغسطس 6, 2010 مشاركة قام بنشر أغسطس 6, 2010 السلام عليكم أخي الكريم أنا كلامي وتجاربي في الملف على أوفيس 2003 و ما جربتش على 2007 دمت بخير أيسم إبراهيم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان