احمد 505

استاذ محمد يوسف ابو يوسف الله يعطيك العافية اشكرك على سرعة الرد واشكرك على الاجابة المطلوبة نفعك الله بعلمك وزادك علما

السلام عليكم ورحمة الله وبركاته اساتذتي الكرام ارجوا الاطلاع على المرفق وعمل اخفاء لكلمة DUE اخفاء كلمة DUE.xlsx

الاستاذ عبدالله الصاري اشكرك شكر جزيل على ردك ومجهودك الكريم فمنذ ان رديت علي وانا اطبق على الشيتات التي لدي عشان لو فيه حاجة طلعت ليه ابلغك بيها ولكن الحمد لله الاجابة كانت فعلا ممتازة اشكرك من كل قلبي

السلام عليكم ورحمة الله وبركاته الأساتذة الكرام قمت بإضافة أكواد على module 3 وعند الإنتهاء ظهرت لي رسالة انه فيه كمية كبيرة من الأكواد ارجوا من الله ثم منكم النظر يا احبايبي في هذه المشكلة. اشكركم NEW 1.rar

أشكرك أستاذ علي فعلا هي المطلوب

السلام عليكم ورحمة الله وبركاته فضلا اريد تعديل على المعادلة هذة لحساب عدد الأيام بين تاريخين المطلوب في حال حذفت تاريخ احد العمودين (A) او (B) أريد يكون العمود (C) فارغاً المشكلة اذا حذفت تاريخ العمود (A) النتيجة (ارقام غريبة) في العمود (C) واذا حذفت تاريخ العمود (B) النتيجة (!NUM#) في العمود (C) وشكرا .... تـــم تعديل رفع الملف بدون ضغط , من فضلك ممنوع رفع الملف مضغوط طالما حجمه صغير وذلك تجنباً لإهدار وقت الأساتذة ‫معادلة حساب تاريخين - نسخة.xls

الاستاذ سليم الملف كبير جدا ولو اردت رفعة يجب احذ شيتات كيرة ومربوطة بأكواد ممكن ما عاد تشتغل المطلوب النسخ السطر السادس الي يبدا بـ (ورقة 60) ارجوا يبدا النسخ من a وليس من e تم ينسخ من e الى amr واللصق السطر السابع الي يبدا بـ (ALLINFO) يبدا اللصق من a ويترك d + c تم يلصق من e الى amr شكرا لتجاوبكم أستاذي الكريم Private Sub CommandButton2_Click() ir = TextBox1.Text yr = TextBox2.Text Application.ScreenUpdating = False ALLINFO.Unprotect "0" .Range("e" & ir & ":amr" & ir).Copyورقة 60 ALLINFO.Range("e" & yr & ":amr" & yr).PasteSpecial Application.CutCopyMode = False .Range("a" & ir & ":amr" & ir).Deleteورقة 60 Application.ScreenUpdating = True ALLINFO.Protect "0" 64 "تم الاسترجاع", MsgBox UserForm2.Hide end sub

السلام عليكم أرجوا التعديل على الكود هذا يا كرام الكود الان يلصق من العمود e الى amr المطلوب يبدا اللصق من a ويترك d + c تم يلصق من e الى amr Private Sub CommandButton2_Click() ir = TextBox1.Text yr = TextBox2.Text Application.ScreenUpdating = False ALLINFO.Unprotect "0" æÑÞÉ60.Range("e" & ir & ":amr" & ir).Copy ALLINFO.Range("e" & yr & ":amr" & yr).PasteSpecial Application.CutCopyMode = False æÑÞÉ60.Range("a" & ir & ":amr" & ir).Delete Application.ScreenUpdating = True ALLINFO.Protect "0" MsgBox "Êã ÇáÇÓÊÑÌÇÚ", 64 UserForm2.Hide End Sub

احسنت أخي الكريم اشكرك اخ عبدالله فعلا هذا هو المطلوب

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

السلام عليكم ورحمة الله وبركاته الرجاء منكم احبتي نقل يوزر فورم بالكود تبعه من ورقة تفريغ واسترجاع الى ورقة نسخة المطلوب من ورقة تفريغ واسترجاع 1- نذهب الى ALL-INFO ثم ننقل ايقونة تفريغ بكودها الى ALLINFO في ورقة نسخة بجانب ايقونة تحديث 2- نذهب الى REMOVED ثم ننقل ايقونة استرجاع البيانات بكودها الى إزالة في ورقة نسخة وشكرا تفريغ واسترجاع 1.rar نسخة.rar

السلام عليكم ورحمة الله وبركاته اواني الاعزاء عندي ورقة اكسل ويوجد بها زر يوزر فورم وشغال تمام وارغب بنقل اليوزر فورم الى ورقة اخرى ارجوا تشرحولي الطريقة سواء كتابة او صور ولكم جزيل الشكر اعذروني لا استطيغ رفع الملف الي فيه اليوزر فورم لانه يحتوي على بيانات خاصة طبعا انا استخدم اوفس 2007 عربي ارجوا تفيدوني بارك الله فيكم

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

الاستاذ الكريم بن علية وعليكم السلام ورحمة الله وبركلاته الله يعطيك العافية واشكرك على الرد ولكن يبدوا انني لم اوصل الفكرة بالطريقة الصحيحة الفكرة انم العمل في ورقة ALLINFO تكون المعلومات على امتداد الصف (الاسم + العمر + المهنة) ولكن في الورقة الثانية يكون العمل يسحب من ALLINFO ولكن تكون معلومات الشخص في صقين المطلوب معادلة في الورقة الثانية وتسمحلي بالسحب نزولا وتترتب المعلومات بالطريقة الصحيحة ولكن بدون اضافة اعمدة جديدة انطر المرفق ترتيب سحب الصفوف.xlsx

السلام عليكم ورحمة الله وبركاته اساتذتي الكرام تم سحب المعادلة IF(ALLINFO!A2=0;"";ALLINFO!A2) من الصف الثاني الى الأخير وأثناء العمل والتعديلات تم حذف محمد + عمر مصطفى 29 + مهنة علي بوهجي المطلوب هل من طريقة أو معادلة بحيث أعيد ترتيب المعادلات من دون ان اسحب الصفوف من جديد لان الجدول متداخل ترقيم معادلة.xlsx

اشكرك استاذ سليم على التوضيح تم التطبيق General"";[=0] ونجحت المهمة اشكرك

استاذ سليم الله يعطيك العافية هذا هو المطلوب ولن ارغب بتعديل المعادلات في اكثر من ورقة ولكن ما عرفت التعديل الي انت عدلته على المعادلة قارنت بين معادلة الصفحة القديمة ومعادلتك الجديدة وطلعوا سوا ما فيه تغيير اخبرني يا ساحر المعادلات

السلام عليكم ورحمة الله وبركاته اساتذتي الكرام المطلوب التعديل على المعادلة في هذه الصفحة المرققة بحيث في حال عدم وجود معلومات في خلية ما في الصفحة (اصل) تبقى الخلية في صفحة (الصورة) بيضاء والا تظهر (علامة الصفر) مثل الخانات الملونة بالاصفر اشكركم ازالت علامة 0.xlsx

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

هل من اجابة لسؤالي

السلام عليكم لدي تعليق في خلية ولا استطيع اعدل عليه لان العلامة الحمراء الخاصة بالتعليق اختفت ملاحظة أنا استخدم اوفيس 2007 عربي اشكركم تعديل على تعليق.zip

جزيتم خيرا جميعا حصل المطلوب بارك الله فيكم

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

الملف مرفوع ويظهر لي بجانب كلمة السلام عليكم if.zip

السلام عليكم ورحمة الله وبركاته المطلوب عمل معادلة في العمود B بحيث اذا كان الصنف في العمود A مثلا 1 فيظهر مقابله في العمود B كلمة الاول وهكذا جميع المتطلبات في العمود A وفي حال كانت الخلية في العمود A فارغة فتكون الخلية التي امامة في العمود B فارغة تماما