جداسازی حروف لاتین از حروف فارسی

**كامران** · 2018/02/05, 19:33

نوشته اصلی توسط rjfri

با سلام
در لیست پیوست میخوام حروف لاتین آخر اسامی رو تفکیک کنم. در هر ردیف جانمایی این حروف لاتین متفاوته. از چه تابع ای میشه استفاده کرد

عددها جزو فارسی باشه یا لاتین ???

**كامران** · 2018/02/05, 20:39

نوشته اصلی توسط كامران

عددها جزو فارسی باشه یا لاتین ???

اگه قراره جزو لاتین باشه این تابع رو به برنامه اضافه کنید

کد:

Function lat(intext)    
    f2 = ""
    sel = intext
        For b = 1 To Len(sel)
            sc = Mid(sel, b, 1)
            For c = 48 To 90
                If c = 58 Then c = 65
                fc = Chr(c)
                    If sc = fc Then f2 = f2 & fc
            Next c
            sc = Mid(sel, b, 1)
            fc = " "
                If sc = " " Then f2 = f2 & " "
        Next b
    lat = f2
            
End Function

**rjfri** · 2018/02/07, 09:44

راه حل دیگه ای هم هست . البته با استفاده از توابع
ممنون

- - - Updated - - -

در فایل پیوست جواب مورد نیاز مشخص شده لطفا اساتید راهنمایی بفرمایند
سپاس

فایل های پیوست شده

961114.xlsx (8.9 کیلو بایت, مشاهدات 13)

**admin** · 2018/02/07, 09:48

نوشته اصلی توسط rjfri

راه حل دیگه ای هم هست . البته با استفاده از توابع
ممنون

- - - Updated - - -

در فایل پیوست جواب مورد نیاز مشخص شده لطفا اساتید راهنمایی بفرمایند
سپاس

درود
توی همین فایلی که ارسال کردید در سلول c3 بنویسید mnt
سپس از تب home بخش editing گزینه fill و در آخر flash fill رو بزنید طبق الگو تا انتها براتون درگ میشه