safwan911 قام بنشر أبريل 8, 2019 مشاركة قام بنشر أبريل 8, 2019 السلام عليكم هل هناك طريقة لتحديد كلمة ضمن الخلية في الاكسل عندما احدد يحدد على الخلية بالكامل وانا اريد تحديد رمز معين فيها ونقل ما بعده لسطر جديد ضمن الخلية وجزاكم الله عنا كل خير.. رابط هذا التعليق شارك More sharing options...
Hamdi Edlbi-khalf قام بنشر أبريل 15, 2019 مشاركة قام بنشر أبريل 15, 2019 السلام عليكم لعلك تريد شيئاً كهذا Private Sub Worksheet_selectionChange (ByVal Target As Range) On Error Resume Next If Activecell.WrapText = False then Dim X As Integer X = Application.WorksheetFunction.Find("PutYourCharOrYourCritetiaRange",Activecell,1) If X > 0 then Activecell = Mid (Activecell.value,1,X) & chr(10) & Mid (Activecell.value, X+1,Len(Activecell)) End If End If End Sub رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.