بارك الله وجعله الله في ميزان حسناتك..اخوك من الجزائر
@hassanassadi47172 жыл бұрын
احسنت شرح مميز
@ibrahimmoawadibrahim73325 жыл бұрын
الف شكر بارك الله لك اللهم امين
@shadyabdo67955 жыл бұрын
فتح الله عليك وزادك علم
@bravecoeur35078 жыл бұрын
بارك الله فيك با أستاد
@سمرسامي-ل5ب10 жыл бұрын
اكثر من رائعة و شرح ممتاز
@ihhamdi464310 жыл бұрын
عاش يا غالى ... بارك الله فيك انت و استاذنا جاد الله ... رجاء استكمال الطباعة باوامر المحاذاة و احتواء الاعمدة و الصفوف فى صفحة واحدة ...لانها مهمة جدا فى اخراج صفحة الطباعة بالمستوى المطلوب ... ايضا من المهم شرح كود البحث و اظهار النتائج اذا كانت اكثر من سطر ....و كذلك عمال الفلترة المتقدمة و اظهار النتائج ... لانها كما تعلمون تغنى عن عمل دفتر الاستاذ المساعد .... اخيرا نحن نتوسع فى الطلب طمعا فى علمكم و كرمكم ....و الرسول صلى الله علية و سلم يقول " منهومان لا يشبعان طالب علم و طالب دنيا " و رجاء اخير الطباعة فعليا و اظهار النتيجه لانها _و عن تجربة _ بتعاكسنا كتير و جزاكم الله خيرا
@sm1art778 жыл бұрын
السلام عليكم إذا بالامكان تشرح كيفية طباعة الفورم بشكل أفقي
@ذكرىشيخ-ه9غ2 ай бұрын
شكرا ...كيف اطبع الفورم عرضيا مل A4
@محمدبهاءالدينالقبانى7 жыл бұрын
شرح جميل جدا مشاء الله بس فى مشكلة فى الصوت
@bahramkhoshnaw95208 жыл бұрын
بارك الله استاذ. اذا كان يوزر فورم في sheet1 والطباعة في sheet2 ?
@bishoyalkomos44548 жыл бұрын
ا محمد ممكن اعرف ازاى اطبع اليوز فورم بالعرض وليس بالطول
@mohamedaladaash19676 жыл бұрын
جزاك الله خيرا عايز اطبق الكود بقى على اربع شيتات اعمل ايه يعنى يكون أمر طباعه لاربع صفحات
@abdalahpr6 жыл бұрын
السلام عليكم ورحمة الله وبركاته انا عبدالله من السودان لدي ملف اكسل في شكل برنامج قمت باخفاء برنامج الاكسل وعرض اليوزر فورم ولكن واجهتني مشكلة وهي اني قمت بعمل CommandButton اظهار فورم معاينة الطباعة باستخدام الأمر Me.Hide Sheets(1).Range("A1:E" & Cells(Rows.Count, "e").End(xlUp).Row).Print Preview Application.Visible = True UserForm1.Show ولكن ال Print Preview لا تظهر لأنها مرتبطة بالبرنامج وهو مخفي هل يمكن أن يظهر اليوزر فورم دون اظهار البرنامج ولكم مني كل الشكر
@hishamsoliman983810 жыл бұрын
يا استاذ محمد لو سمحت ممكن تفيدني بحاجة لتعليم الفيجوال بيسك عالاكسيل من الالف للياء لاني دورت عالقناة عندك لقيت بعض لفيديوهات ومش عارف ارتبها بايهما ابدأ ارجوك ممكن تبعت لي اللينكات ولكم جزيل الشكر
@mhamadghazal81016 жыл бұрын
السلام عليكم الرجاء المساعدة في تصحيح هذا الكود Range("c2:i" & Cells((Rows.Count, "h+1").End(xlUp).Row): Cells(Rows.Count, "c").End(xlUp).Row).PrintPreview المطلوب هو: مدى الطباعة من c2 الىi البداية هو اخر خلية مكتوبة في h +1 النهاية هو اخر خلية مكتوبة في c وشكرا