الشيباني1 قام بنشر ديسمبر 3, 2011 قام بنشر ديسمبر 3, 2011 اخواني الاعزاء تحية طيبه جاد عمالقة المنتدى بالكود ادناه لطباعة المفرز من البيانات ، ارجو المساعده بكود مع قائمه منسدله لاختيار اسم الوكيل وطباعة المفرز من بياناته فقط مع الامتنان.(علما ان البيانات المثبته في الكود ادناه ليس لها علاقة بالمرفق). Sub Button12_Click() TT = 4 Do Until Cells(TT, "Q").Value = "" TT = TT + 1 Loop Range(Cells(4, "O"), Cells(TT - 1, "U")).PrintOut Copies:=1, Preview:=True, Collate:=True End Sub Sub Button13_Click() TT = 4 Do Until Cells(TT, "Q").Value = "" TT = TT + 1 Loop Range(Cells(4, "O"), Cells(TT - 1, "U")).PrintOut Copies:=1, Collate:=True Selection.AutoFilter Range("O4:X4").AutoFilter End Sub طباعة المفرز.zip
أبوعبد الله قام بنشر ديسمبر 3, 2011 قام بنشر ديسمبر 3, 2011 أخي العزيز أرجو الاطلاع على المرفق وفيه تم الآتي : عمل فورم بكومبوبوكس لاختيار أسماء العملاء منه ثم ضغط مفتاح اطبع لطباعة كشف حساب هذا العميل مع مراعاة ربط نطاقات الطباعة لكل عميل بإسمه بالكود الخاص بالفورم ، مهما غيرت إسم العميل بالصف الثاني ، مع مراعاة مصدر أسماء العملاء الذي يظهر بالكومبوبوكس موجود بقائمة بالورقة الثانية في بالعود الأول لذا لا يجب حذف هذه الأسماء وهي مربوطة بنفس أسماء العملاء بالصف الثاني بالورقة الأولى وتتغير معها مباشرة . أرجو أن يكون هذا موافق لما طلبته . تحياتي أبو عبدالله قائمة للطباعة حسب أسماء العملاء.rar
abouelhassan قام بنشر ديسمبر 3, 2011 قام بنشر ديسمبر 3, 2011 شكر وتقدير واحترام استاذنا ابوعبدالله ابداع وتألق احترامى
الشيباني1 قام بنشر ديسمبر 4, 2011 الكاتب قام بنشر ديسمبر 4, 2011 استاذنا العزيز مع شكري وتقديري لهذا الابداع كنت راغبا بأن تكون الطباعة للبيانات التي تتضمنها جداول الوكلاء دون تحديد للمديات وان تطبع الاسطر الممتلئه فقط متمنيا ان يكون الكود الذي ارفقته والذي يطبع الممتليء فقط مساعدا للخروج بكود موحد مع الامتنان
أبوعبد الله قام بنشر ديسمبر 4, 2011 قام بنشر ديسمبر 4, 2011 استاذنا العزيز مع شكري وتقديري لهذا الابداع كنت راغبا بأن تكون الطباعة للبيانات التي تتضمنها جداول الوكلاء دون تحديد للمديات وان تطبع الاسطر الممتلئه فقط متمنيا ان يكون الكود الذي ارفقته والذي يطبع الممتليء فقط مساعدا للخروج بكود موحد مع الامتنان أخي العزيز لم أفهم بشكل واضح قصدك ، أم أنك تقصد استدعاء بيانات هذا العميل في ورقة أخرى ، ومن ثم طباعتها ، أرجو توضيح طلبك بالتفصيل حتى يتم العمل على أساس ما تحتاج . تحياتي
الشيباني1 قام بنشر ديسمبر 4, 2011 الكاتب قام بنشر ديسمبر 4, 2011 استاذنا العزيز مع شكري وتقديري ارفق ملفا يقوم بتنفيذ الكود اعلاه وهو مفيد جدا لي اتساءل عن امكانية تنفيذه على ملفي اعلاه مع الشكر كود لطباعة بيانات مفرزه HaNcOcK2.zip
أبوعبد الله قام بنشر ديسمبر 4, 2011 قام بنشر ديسمبر 4, 2011 أخي العزيز هل تريد تنفيذ الفكرة على كل البيانات بالورقة أي طباعة كل العملاء معاً بشرط إخفاء الصفوف الفارغة ( مع وجود فرق بين عميل وآخر فيما يتعلق بآخر صف به بيانات ) وبالتالي سيتم الطباعة على مستوى آخر صف لأكثر عميل لديه بيانات ، أم تريد تطبيق الفكرة بإخفاء الصفوف الفارغة على مستوى كل عميل بطباعة منفصلة لكل عميل ، أرجو التأكيد والتوضيح ؟
الشيباني1 قام بنشر ديسمبر 4, 2011 الكاتب قام بنشر ديسمبر 4, 2011 استاذنا الكريم ما وددت الحصول عليه هو الخيار الثاني (تطبيق الفكرة بإخفاء الصفوف الفارغة على مستوى كل عميل بطباعة منفصلة لكل عميل ) مع تقديري
أبوعبد الله قام بنشر ديسمبر 4, 2011 قام بنشر ديسمبر 4, 2011 أخي العزيز أرجو الاطلاع على المرفق تم تنفيذ طلبك حسب ما فهمت بنفس الفكرة الأولى التي بدأت بها ، أرجو أن يناسب طلبك . تحياتي قائمة للطباعة حسب أسماء العملاء مع إخفاء الصفوف الفارغة-1.rar
الشيباني1 قام بنشر ديسمبر 4, 2011 الكاتب قام بنشر ديسمبر 4, 2011 استاذنا القدير تحية طيبه مع شكري لما تجودون به لدي بعض الملاحظات حول الملف الاخير : - لا يمكن طباعة الاسطر التي تتجاوز السابع رغم تعديلPrint_Area وعدم امكانية طبع الاسماء غير ( محمد ) ارجو المساعده في معالجة الموضوع مع الامتنان
أبوعبد الله قام بنشر ديسمبر 4, 2011 قام بنشر ديسمبر 4, 2011 أخواني الأعزاء فضلاً أرجو التكرم ممن قام بتنزيل الملف بالرد رقم (9) أن يطابقه مع ما ورد برد الأخ العزيز صاحب السؤال في الرد (10) فيؤكد ما جاء به أو ينفيه ، حيث أنني لم أجد أي شيئ مما ذكره يحدث بالملف عندي قبل أو بعد إرفاقه . مع جزيل الشكر والتقدير
الشيباني1 قام بنشر ديسمبر 5, 2011 الكاتب قام بنشر ديسمبر 5, 2011 استاذنا العزيز اعتذر عن هذا الخطأ غير المقصود والذي كان لسبب في برنامجي اشكرك جدا وادامك الرحمن لنا مرجعا
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.