الحضرمي2017

جزاك الله خير الجزاء والله شاكر لك ولا يحرمك ربي أجر هذه الايام وحفظك الله وبارك الله لك في علمك

السلام عليكم ورحمة الله وبركاته ووالله بدلت الجهد في المحاولة والبحث لكن ما هديت إلى شيء لذا لجأت إلى طلب المساعدة من اخواني : أريد دالة شرطية واحدة تقوم بالبحث في خلايا العمود المقابل فإذا وجدت جميع الخلايا فارغة تكتب تحت أو فوق العمود فارغ ، وإذا وجدت بعض الخلايا فيها بيانات تكتب غير مكتمل ، وإذا وجدت جميع الخلايا فيها بيانات تكتب مكتمل وجزاكم الله خير الجزاء بحث-خلايا.xlsx

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

جزاك الله خير الجزاء والعفو منك يالغالي

ما ضبطت معي أخي الحبيب حيث أني لما انسخ الكود كأنه شيء يتغير فيه لأني قبل النسخ في شريط الصيغة الاحظ أقواس مثل هذه {} وأول ما احط المؤشر تختفي مباشرة ولما انسخ لا تضبط يطلع الترتيب كله الأول الأول ثم لا زال هناك شيء لا اريد أن يظهر وهو النقطتين فوق بعضهما بين الترتيب وكلمة مكرر الأول : مكرر لا اريد النقطتين وجزاك الله خيرا

آسف أخي الحبيب سليم والله ماكان قصدي الإساءة إليك بشيء أو أخذ ما ليس لي يمكن والله وقسما بالله عفوية والكل يعرفني هنا لذا ارجوا مسامحتي ومعذرتي على التطاول على حقوقكم وأسأل الله أن يعفو عني هذه الزلة أخي الحبيب لو تكرمت أبغا الترتيب يطلع بالشكل التالي 99 الأول 98 الثاني مكرر 98 الثاني مكرر 97 الثالث 94 الرابع 92 السادس 93 الخامس يكون بدون مكرر 1 أو مكرر 2 واكرر اعتذاري مرة أخرى والله ويعلم الله أن لم اقصد الاساءة لأنها ليست من طباعي الله يحفظك ويبارك في علمك ويزيدك من فضله

السلام عليكم ورحمة الله وبركاته كيف حالكم اخواني الاحبه اريد التكرم والمساعدة في التعديل على الملف بحيث يواصل الترتيب كما في الملف المرفق الأول الثاني مكرر الثاني مكرر الثالث الرابع الخامس وجزاكم الله خير الجزاء الترتيب.xlsm

جزاك الله خير الجزاء أخي سليم كأن الملف والله اعلم فيه خطأ لما تفتحه يطلب تحديث وقد حاولت ووجدت كأنه في ربط لملف على القرص D وقد حذفت وتقريبا انحلت المشكلة ولا أدري هل صحيح ما فعلته أم لا ؟ Choose_grade.xlsm

تفضل أخي الحبيب المصنف100.xlsm

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

تسطيع ذلك أخي الحبيب هذا الملف الخامس معدل.xlsm

المشكلة في الملف السابق كانت هنا فقط عدلت الرقم بدل 11 الى 1 فضبطت ولله الحمد والمنة

تم التعديل الخامس.xlsm

الاشكالية الوحيدة الان والتي آمل أن أجد من يسعفني في حلها الكود اللي في المشاركة سليم ويعمل تمام التمام الاشكالية في الاتي : 1- ان الملف الناتج يكون في الغالب بجانب الملف اللي اعمل به وهذا لا اريدة اريدة دائما وابدا ينشأ لي المجلد على سطح المكتب 2- ليس بتلك الاهمية وهو هل بامكاني أن أحدد النطاق الذي سيتم حفظه في الملف الجديد اذا أمكن

جزاك الله خير أخي الحبيب طارق نادر تم حل الاشكالية ووالله مدري هل طريقة صحيحة أم لا المهم أني حذفت بعض الكلمات وضبط معي الأمر ولا أدري كيف Sub Macro1() Dim strFilename, strDirname, strPathname, strDefpath As String On Error Resume Next ' If directory exist goto next line strDirname = Range("a1").Value ' New directory name strFilename = Range("a2").Value 'New file name strDefpath = Application.ActiveWorkbook.Path 'Default path name If IsEmpty(strDirname) Then Exit Sub If IsEmpty(strFilename) Then Exit Sub MkDir strDefpath & "\" & strDirname strPathname = strDefpath & "\" & strDirname & "\" & strFilename 'create total string ActiveWorkbook.SaveCopyAs Filename:=strPathname & ".xlsm" End Sub الكود بعد التعديل عليه صار يسوي لي ملجد اسمه من البيانات الموجودة في A1 ويضع ملف بداخلة بصيغة xlsm اسمه وفق البيانات الموجودة في A2 وهو ما اردته بالضبط فالله الحمد والمنة