أيسم إبراهيم

السلام عليكم شكرا أستاذ عادل على الكود هو بالفعل ما أريد جزاك الله كل خير أما بالنسبة للأستاذ خالد أعتقد أن كود الرأس المخصص سيكون مش كده ولا إيه يا أستاذ عادل؟؟؟؟ دمتم بكل خير

السلام عليكم جميعا السادة الأعزاء ............... دمتم بكل خير لي استفسار وهو : هل يمكن ربط تذييل مخصص عند طباعة ورقة عمل بخلية في ورقة العمل مثال بلا من كتابة "" بيانات الموظف : أحمد محمد محمود "" نكتب بيانات الموظف : =Sheet 1!A1 هل هذا ممكن؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ جزاكم الله كل خير

السلام عليكم أستاذ عادل جزاك الله كل خير و جعله في ميزان حسناتك مثاقيل كثيرة جاري التجربة و إخبارك بالنتيجة شكرا مرة أخرى

aysam1.rar السلام عليكم أستاذ عادل جزاك الله كل خير على تعبك معانا و سعة صدرك جعله الله في ميزان حسناتك مرفق الملف الذي أمرت به وبه عدد الأعمدة المطلوب ترحيلها و البيانات أرجوا المحافظة على الشروط السابقة ( بداية الترحيل و اللصق من الصف العاشر) شكرا جزيلا

السلام عليكم أستاذ : عادل جزاك الله كل خير و جعله في ميزان حسناتك لي استفسار مالمقصود بهذا السطر من الكود With Sheets("ناجح"Columns(1).Rows(300).End(xlUp) و مالعمل إذا كان عدد الأعمدة المطلوب ترحيلها كبير( يزيد على 50 عمود ) هل أقوم بإضافة رقم العمود للدالة offset حتى أصل إلى آخر عمود كما بالمثال التالي: .Offset(1, 1) = Cells(i, 2) .Offset(1, 2) = Cells(i, 3) .Offset(1, 3) = Cells(i, 4) .Offset(1, 4) = Cells(i, 5) .Offset(1, 5) = Cells(i, 6) .Offset(1, 6) = Cells(i, 7) أم أن هناك طريقة أخرى أكثر جدوى و فاعلية ؟؟ أخيرا هل لابد لهذا الكود أن يكون في الحدث التلقائي للصفحة أم من الممكن أن ينقل إلى موديول و يتم ربطه بزر بالطريقة المعتادة للمبتدئين أمثالي جزاك الله كل خير و جعلك عونا لعمل الخير

السلام عليكم جميعا أريد التفضل من أساتذة المنتدى الكرام بعمل تعديل على الكود المرفق و هو للأستاذ عادل حنفي بحيث يبدأ الكود في الترحيل من السطر العاشر من صفحة البيانات و يلصق في الصفحات الأخري بداية من الصف العاشر أيضا لأن هناك عناوين ستكتب في السطورaysam.rar العشر العلوية جزاكم الله كل خير مرفق ملف

السلام عليكم جميعا مرور الأستاذ الكبير أكرم شرف لا تدانيه مكرمة شكرا أستاذنا . إنما هذا العمل من فيض تعليمكم لنا جزاكم الله كل خير

السلام عليكم جميعا كل عام و انتم بخير الأخت الفاضلة إليك الملف به ما طلبت أي استفسار أنا حاضر تحياتي: أيسم ____.rar

السلام عليكم الأخ أبو رحيم شكرا على كلماتك الرقيقة جاري العمل في ملف الترم الثاني و سأرفعه قبل الإمتحان بفترة كافية للتجريب و المراجعة إن شاء الله تحياتي : أيسم

السلام عليكم يا أختاه : صممي الشهادة علي ورقة اكسيل بالشكل الذي يحلو لكي ثم ارفعيها هنا أقوم بعمل الكود المسئول عن طباعة شهادة واحدة و أيضا طباعة كل الشهادات دفعة واحدة انتظر ملفك أيسم إبراهيم

السلام عليكم أخي أبو هاجر جزاك الله كل خير و جعله في ميزان حسناتك شكرا لاستجابتك السريعة نحن منتظرين شروحاتك المنظمة و السهلة و السلسة

السلام عليكم أخي أبو هاجر جزاك الله كل خير و جعله في ميزان حسناتك لكن لنا طلب و هو تجميع كل درس تشرحه فى ملف وورد أو اكسيل في نهاية الدرس حتى يكون مرجعا لنا لأني حاولت طباعة الشرح فوجدت اني سأقوم بطباعة الككثير مما لا فائدة منه من ردود و شكر وخلافه. ضع طلبي في عين الاعتبار جزاك الله كل خير

السلام عليكم الأستاذ الفاضل amoudi للأسف لم أرى مشاركتك إلا بعد أن انتهيت من العمل على الملف أرجو المعذرة لكن زيادة في الخير تحياتي: أيسم

السلام عليكم الأخت الفاضلة تفضلي المرفق مضبوط وتمام به ميزة بسيطة وهي عدم إدراج التاريخ المذكور داخل الدالة حتى تتمكني من الاستفادة منه في أعوام قادمة تحياتي: أيسم 1_.rar

السلام عليكم جميعا الأستاذ: أحمد الأستاذ : amoudi ......جزاكم الله كل خير و جعله في ميزان حسناتكم أيسم إبراهيم

السلام عليكم جميعا الأساتذة الكرام يرجى التكرم بعمل دالة لجمع من تحقق لهم شرطين في عدد 2 مدى متجاورين المطلوب أكثر وضوحا في الملف المرفق جزاكم الله كل خير و جعله في ميزان حسناتكم _________________.rar

السلام عليكم ورحمة الله وبركاته أدرجت طلباتك مع طلبات الإخوة و سأعمل على تنفيذها في الترم الثاني إن شاء الله نحياتي: أيسم إبراهيم

السلام عليكم تفضلي المرفق لو هناك ملاحظات أنا موجود أيسم إبراهيم Copy_of_2_.rar

جزاك الله كل خير

السلام عليكم جميعا أرجوا التعديل على الكود التالي بحيث يقوم بعمل تصفية تلقائية للبند ( مسلم و أيضا مسلمة ) أقصد كل المسلمين Range("A5:O6").Select Selection.AutoFilter Selection.AutoFilter Field:=5, Criteria1:="مسلم" End Sub

السلام عليكم أستاذ : عادل جزاك الله كل خير و سلمت يداك أستاذ هشام جميل ما أرسلت هدية مقبولة

السلام عليكم أخي أبو هاجر جزاك الله خيرا على الرد و لكني أريد كود VBA ( يكوم قابل للإضافة )لأن الموجود بالرفق ما هو إلا مثال أما ما أرسلت من ماكرو مسجل فشكرا لك عليه و جزاك الله كل خير على سعيك لمساعدتي أيسم إبراهيم

السلام عليكم جميعا مطلوب ( فضلا لا أمرا ) من أساتذة المنتدى الكرام شرح أو عمل كود لترحيل البيانات بعد عمل تصفية تلقائية للبيانات في ملف جزاكم الله كل خير وجعله في ميزان حسناتكم المطلوب في المرفق aysam01.rar

السلام عليكم أستاذ أشرف يشرفني التعرف عليك إيميلي هو : aysam01@yahoo.com ضفني عندك و أنتظر محادثتك أيسم إبراهيم

السلام عليكم أخي أبو صبري شكرا على الدعاء لأخي و عقبال عندك الطريقة التي تتعامل بها مع السري و الكتشنة هي نفي الطريقة التي نعمل بها في كنترول مدرستي( طريقة محترفين ) المهم من فترة كنت قد صممت ملف بسيط يقوم بما تطلب ( سأبحث لك عنه ) لكن وهو المهم لم أستطع لضيق الوقت أن أربطه بالكود الجميل الذي بالملف الكنترول خاصتي سأرسله لك بعد أن أجده في ملفاتي القديمة وتقوللي رأيك و نطور فيه مع بعض تحياتي: أيسم إبراهيم