abdou42 قام بنشر أبريل 26, 2015 مشاركة قام بنشر أبريل 26, 2015 (معدل) اريد رز طباعة بحيث يكون لك الحق في اختيار صفحة معينة او مجموعة صفحات من feuil1 للطباعة يعني طباعة الصفحة الاولى او الثانية او كليهما لي الاختيار recharche XD.rar تم تعديل أبريل 26, 2015 بواسطه abdou42 رابط هذا التعليق شارك More sharing options...
مختار حسين محمود قام بنشر أبريل 26, 2015 مشاركة قام بنشر أبريل 26, 2015 (معدل) تفضل أخى الكريم عله يفى بالغرض فى المرفق الأول أدخل عدد مرات الطباعة تم أدخل عدد الصفحات 1 للصفحة الاولى 2 تعنى أول صفحتين وهكذا فى المرفق الثانى أدخل عدد مرات الطباعة تم أدخل رقم الصفحة 1 للصفحة الاولى 2 للصفحة الثانية وهكذا ملحوظة : انقل زر استدعاء الفورم لأى ورقة عمل فى الملف وأى عملية طباعة ستكون على الورقة النشطة تحياتى recharche XD.rar recharche XD 2.rar تم تعديل أبريل 26, 2015 بواسطه مختار حسين محمود 2 رابط هذا التعليق شارك More sharing options...
مختار حسين محمود قام بنشر أبريل 27, 2015 مشاركة قام بنشر أبريل 27, 2015 (معدل) خلاص بقى طالما الحل عجبك أنهى الموضوع ولا تنسونا فى دعائكم تم تعديل أبريل 27, 2015 بواسطه مختار حسين محمود رابط هذا التعليق شارك More sharing options...
abdou42 قام بنشر أبريل 27, 2015 الكاتب مشاركة قام بنشر أبريل 27, 2015 شكرا بارك الله فيك طريقة رائعة للطباعة من نفس الشيت لكن انا اود ان تتم الطباعة من الشيت الثاني لمحتوى الشيت الاول صفحة صفحة وكذا دفعة واحدة بارك الله فيك اخي رابط هذا التعليق شارك More sharing options...
أفضل إجابة مختار حسين محمود قام بنشر أبريل 27, 2015 أفضل إجابة مشاركة قام بنشر أبريل 27, 2015 تفضل أخى عبدووووووووو recharche XD 1 v2.rar recharche XD 2 v2.rar 1 رابط هذا التعليق شارك More sharing options...
abdou42 قام بنشر أبريل 28, 2015 الكاتب مشاركة قام بنشر أبريل 28, 2015 بارك الله فيك اخي الفاضل مختار حسين جزاك الله عني خير الجزاء شكرا جزيلا لك. رابط هذا التعليق شارك More sharing options...
مختار حسين محمود قام بنشر أبريل 28, 2015 مشاركة قام بنشر أبريل 28, 2015 بُوركت وجازاكم الله خيراً أخى عبدو 1 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر أبريل 28, 2015 مشاركة قام بنشر أبريل 28, 2015 أخي الحبيب الغالي مختار بارك الله فيك وجزاك الله خيراً على كل ما تقدمه بس إنت تاعب نفسك ليه كدا بأزرار الأوامر (خليك كسول زي حالاتي عشان توصلك لأقصر الحلول ..بلاش الطرق الوعرة الطويلة يا صاحبي) جرب الملف التالي لعله يكون أقصر الطرق .. Private Sub UserForm_Initialize() Dim I As Integer For I = 1 To 24 With cbNumberOfPages .AddItem I End With Next I End Sub Private Sub cmdPrint_Click() If Tx_Copies.Value = "" Then MsgBox "أدخل عدد النسخ المراد طباعتها": Exit Sub If cbNumberOfPages.Value = "" Then MsgBox "أدخل عدد الصفحات المطلوبة للطباعة": Exit Sub On Error Resume Next Sheets("Feuil1").Select ActiveWindow.SelectedSheets.PrintOut From:=1, To:=cbNumberOfPages.Value, Copies:=Tx_Copies.Value, Collate:=True Sheets("Feuil2").Select End Sub Private Sub cmdEnd_Click() End Sheets("Feuil2").Select End Sub تقبل تحياتي Print UserForm Mokhtar.rar 1 رابط هذا التعليق شارك More sharing options...
مختار حسين محمود قام بنشر أبريل 28, 2015 مشاركة قام بنشر أبريل 28, 2015 أخى وحبيبى فى الله وأستاذى ياسر عندك حق ساعات الكسل بيكون أفضل وبعد كده أجيب مخ منين زى مخك أنا مخى طار يا أبو الإأفكار تحياتى 2 رابط هذا التعليق شارك More sharing options...
abdou42 قام بنشر أبريل 28, 2015 الكاتب مشاركة قام بنشر أبريل 28, 2015 بارك الله فيكم جميعا شكرا عمل رائع رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان