محب لله ورسوله قام بنشر أغسطس 10, 2020 مشاركة قام بنشر أغسطس 10, 2020 السلام عليكم برجاء المساعده فى الملف المرفق حيث انه المطلوب فصل كل اسم عن الآخر ووضع كل اسم فى خليه حيث رأسى New Microsoft Excel Worksheet (2).xlsx او ياريت حد يفيدنا فى طريقة مجربة لتحويل ملف pdf عربى لاكسيل او ورد ولكم جزيل الشكر رابط هذا التعليق شارك More sharing options...
أفضل إجابة سليم حاصبيا قام بنشر أغسطس 10, 2020 أفضل إجابة مشاركة قام بنشر أغسطس 10, 2020 جرب هذا الكود وترى النتيجة في Sheet2 Option Explicit Sub Split_names() Dim rg As Range Dim i%, Str Sheets("sheet2").Range("B2").CurrentRegion.Clear Set rg = Sheets("sheet1").Range("B2").CurrentRegion For i = 1 To rg.Cells.Count Str = rg.Columns(1).Cells(i) Str = Split(Str, "|") Sheets("sheet2").Cells(i + 1, 2) _ .Resize(, UBound(Str) + 1) = Str Next Sheets("sheet2").Range("B2"). _ CurrentRegion.Columns.AutoFit End Sub الملف مرفق Split_names.xlsm 5 رابط هذا التعليق شارك More sharing options...
abouelhassan قام بنشر أغسطس 11, 2020 مشاركة قام بنشر أغسطس 11, 2020 والله العظيم ما فى كود لحضرتك استاذ سليم الا وباخد منه نسخة فى مكتبة الاكواد الخاصة بى لان هذه الاكواد كنوز فتح الله عليك وبارك لك احترام وتقدير من اخيك 1 رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أغسطس 11, 2020 مشاركة قام بنشر أغسطس 11, 2020 تسلم اخي أبو الحسن و شكراً لك على هذا العمل بس يا ريت ترفع نسخة عن مكتبتك لاني لا أحتفط بالأكواد التي أضعها (الا القليل منها) حتى يستفيد منها الأخرون 1 رابط هذا التعليق شارك More sharing options...
abouelhassan قام بنشر أغسطس 11, 2020 مشاركة قام بنشر أغسطس 11, 2020 حاضر استاذى سأقوم برفع كل الاكواد بارك الله فيك رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أغسطس 11, 2020 مشاركة قام بنشر أغسطس 11, 2020 بارك الله بك الرحاء ان تضع في بداية كل كود ما هي مهمته و بذلك تسهل عملية البحث عن كود معين 1 رابط هذا التعليق شارك More sharing options...
abouelhassan قام بنشر أغسطس 11, 2020 مشاركة قام بنشر أغسطس 11, 2020 انا هارسل لحضرتك رابط به كل الملفات التى قمت بتحميلها وهى كلها لحضرتك لو حضرتك حابب انى اجمع الاكواد فى محفظة اكواد تحت امرك بس انا كاتب على كل ملف وظيفة الكود عموما هبعت لحضرتك الرابط واى شئ تأمرنى به سافعله اخيك باحترام 2 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان