خالدو

جزاك الله خيراً أخي الحبيب عبد الله

تسلم يداك أخي عبد الله ... جزاك الله خيراً.

السلام عليكم ورحمة الله وبركاته وكل عام وانتم بخير أرجو منكم التكرم والمساعدة حسب ما هو موضح بالملف المرفق وجزاكم الله خيراً SendingMail.rar

جرب برنامج : Solid Converter أو AABBYY transformer

بارك الله فيكم وجزاكم الله خيراً الحمد لله تم إنجاز المطلوب بفضل الله ثم مساعدتكم ... باذن الله تجدوها في ميزان حسناتكم

جزاكم الله خيراً ومرفق لكم ملف للتوضيح Search.rar

مشكور أخي أحمد لكن لو تكرمت ممكن تكتب لي المعادلة ........ جزاك الله خيراً لاني حاولت باستخدام Or ولكن فشلت أيضاً مع عدد قوسين داخلها للدالة Search

السلام عليكم ورحمة الله وبركاته اخواني في المعادلة التالية أنا ابحث عن كلمتين ضمن دالة شرطية ولكن للآسف الدالة تعمل في حالة وجود النص الأول وتعطيني خطأ في حالة النص الثاني أو في حالة عدم وجود أي منهما: IF(Search({"WTA","Ratl",A1}),"P-ltaa1355812",600223) أرجو التكرم والمساعدة وجزاكم الله خيراً

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

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

بارك الله فيك أخي محمد ونفع بك وبعلمك. جزاك الله خيراً . لي استفسارات بخصوص نفس الملف سأسألك فيها لاحقاً باذن الله..... سلمت يداك.

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

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

ممكن تلقي نظرة على المرفق Form-3.rar

أخي الكبير علماً عبد الله ..............جزاك الله خيراً وتقبل منا ومنك الصيام وصالح الأعمال

السلام عليكم ورحمة الله وبركاته جرب التالي: Sub DeleteAllNames() Dim x% For x = ActiveWorkbook.Names.Count To 1 Step -1 Range(ActiveWorkbook.Names(x).Name).Name.Delete Next End Sub

ألف مبروك أخي العزيز على الترقية

أنقر يمين على الخلية أو الخلايا المطلوبة واختار "تنسيق الخلايا" وفي الصفحة الاولى "الارقام" غير من عام إلى رقم ثم ضع علامة صح على استخدام فاصلة الألآف ومن مربع الكسور اختر عدد خانات الكسور التي ترغب بها ثم اضغط زر موافق.

ارجو من الأخوة: طارق ومحمد صالح والحسامي وعباقرة المنتدى المساعدة للأهمية القصور والضرورة. وجزاكم الله خيراً

السلام عليكم ورحمة الله وبركاته وجدت كود جيد في أحد المواقع لمسح رسالة واحدة من مجلد الملفات المرسلة ولكنه: 1- يظهر مربع حوار للتأكيد 2-المسح غير نهائي بل يذهب إلى مجلد المحذوفات إليكم الكود: Public Sub Delete_By_Subject() Dim itm As Object Dim mFldr As Object Dim OutApp As Object Set OutApp = CreateObject("Outlook.Application") OutApp.Session.Logon Set mFldr = OutApp.Session.PickFolder If mFldr Is Nothing Then Exit Sub For Each itm In mFldr.Items If itm.Subject = "This One Silly" Then itm.Delete End If Next itm Set OutApp = Nothing Set mFldr = Nothing Set itm = Nothing End Sub هناك أسئلة أرجو من عباقرة منتدانا العظيم ولله الحمد هم كثير: 1- هل من الممكن أن أمسح رسالة معينة مرسلة نهائياً وبدون مربع حوار للتأكيد؟ 2-هل يمكنني مسح مجلد الرسائل المرسلة كاملاً وبشكل نهائي من خلال الكود؟ 3-عند استلام رسالة معينة من أحد العملاء بموضوع معين.هل من الممكن كود اكسيل يرد على نفس الرسالة "Reply" ؟ أرجو التكرم والمساعدة وجزاكم الله خيراً.

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

السلام عليكم ورحمة الله وبركاته كل ملفاتي والاكواد تم تصميمها على اكسيل 2003 ولكن الشركة حولت النظام إلى اكسيل 2007. أي ملف به كود افتحه على اكسيل 2007 يعطيني رسالة: ُ"Excel was able to open the file by repairing or removing the unreadable contents." وتحت في اسفل البوكس: "This workbook has lost its VBA project, ActiveX controls and any other programmability-related features" أرجو المساعدة مع اني عملت تمكين للماكرو وجزاكم الله خيراً

إن لله ما أعطى وله ما أخذ وكل شيء عنده بمقدار اصبر واحتسب ........... أعظم الله أجرك. إن لله وإنا إليه راجعون

جزاك الله خيراً أخي الفاضل

جزاك الله خيراً أخي الكريم.