أبو علياء عاطف

لو هناك تعديل في الكود كله اتفضل عدل عليه حتي نستفيد .

لما أكون محتاج أزود أعمدة يشتغل عليها الكود أعمل ايه هنا With Range("C3:C" & LR)

جزاك الله خيرا تمام الكود شغال وحذف المسافة ما هو الغلط فيها "ي" , "ى" Replace

السلام عليكم لو تكرمتم محتاج تكملة الكود الموجود في الصورة بحيث عند الضغط علي الزر يحذف المسافة بين عبد الرحمن أو عبد الرحيم وغيرهم ... أرجوا أنا أكون وضحت المطلوب إليكم الكود للتكملة عليه جزاكم الله خيرا Dim ch LR = Cells(Rows.Count, 3).End(xlUp).Row With Range("B3:B" & LR) For Each ch In Array("إ", "أ", "آ") .Replace CStr(ch), "ا" Next .Replace "ة", "ه" .Replace "ى", "ي" End With المشكلة الحروف العربية معكوسة بس أكيد مفهومة لأهل الخبرة والعلم

هذه هي إمكانيات جهازي

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

نفس المشكلة بــ F4 أنا كده أبدأ بتغيير نسخة الويندوز وأشوف إن شاء الله شكرا لحضرتك

أتمني حل لهذه المشكلة جزاكم الله خيرا جميعا وحد متخصص يساعدني

فتح معايا علي جهاز أخر يأ فندم Database1.accdb

أرجوا حل مشكلة ورقة الخصائص غير شغالة نهائي علما بأني حذفت الأوفيس وثبته مرة اخري

الملف كما هو لا يوجد عليه أية تعديلات غير إضافة مديول فقط ولم يتم الجمع كما أردت . ممكن حضرتك ترسل صورة للجمع لو أمكن ! كتر خيرك تعبت حضرتك

ما سبب شقلبة الأرقام كده ؟ مع ذلك عملت الحقل ترقيم تلقائي نفس المشكلة عملت الحقل رقم نفس المشكلة عملت الحقل نص مختصر نفس المشكلة هل لها من حل ؟

رقم 1 بعتذر

أنا عايز التطبيق علي الملف المرفق لأن ملف حضرتك لا يفي بالغرض المطلوب تحياتي !!!

https://www.mediafire.com/file/ootyfo0085au5xk/%D8%AD%D8%A7%D9%81%D8%B2_%D8%A7%D9%84%D8%B5%D9%81%D9%88%D9%81_%D8%A7%D9%84%D8%A3%D9%88%D9%84%D9%8A.rar/file مرفق الملف بالرابط عشان حجمه 2 ميجا شكرا لحضرتك يفضل التعديل يكون علي هذا الشكل الموجود بالملف المرفق