Cho em hỏi về cách thêm khoảng trắng hoặc kí tự đặc biệt giữa các chữ trong excel ?

[tannguyen0305]

Hello mọi người,
em có 1 vấn đề cần giải quyết là làm sao để thêm khoảng trắng và ký tự đặc biệt vào chữ trong excel ạ,
mong mọi người giúp em với
ví du:

tannguyen ---> t a n n g u y e n

và

tannguyen ---> t-a-n-n-g-u-y-e-n



Em cảm ơn mọi người nhiều ạ

 

[vanthinh3101]

Hello mọi người,
em có 1 vấn đề cần giải quyết là làm sao để thêm khoảng trắng và ký tự đặc biệt vào chữ trong excel ạ,
mong mọi người giúp em với
ví du:

tannguyen ---> t a n n g u y e n

và

tannguyen ---> t-a-n-n-g-u-y-e-n



Em cảm ơn mọi người nhiều ạ

Bạn thử dùng hàm tự tạo này xem sao

Function Themkytu(Rng As Range, Seperator As String)
    Dim Str As String, Tmp
    Dim I As Long
    Str = Rng.Value
    ReDim Tmp(Len(Str) - 1)
    
    For I = 1 To Len(Rng)
        Tmp(I - 1) = Mid(Rng, I, 1)
    Next I
    
    Themkytu = Join(Tmp, Seperator)
    
End Function

Cách dùng: Giả sử ô A1 chứa chuỗi cần thêm ký tự --> công thức cho ô B1

B1=Themkytu(A1,"-")

Enter; Ký tự trong "" có thể thay đổi tùy bạn

 

[Phuocam]

Góp vui.

Public Function ChenKT(s As String, Optional d As String = " ") As String
Dim i As Long
For i = Len(s) - 1 To 1 Step -1
        s = Replace(s, Mid(s, i, 1), Mid(s, i, 1) & d, 1, 1)
Next
ChenKT = s
End Function

 

[ndu96081631]

Góp vui.

Public Function ChenKT(s As String, Optional d As String = " ") As String
Dim i As Long
For i = Len(s) - 1 To 1 Step -1
        s = Replace(s, Mid(s, i, 1), Mid(s, i, 1) & d, 1, 1)
Next
ChenKT = s
End Function

Thí nghiệm cái xem sao: =ChenKT("anhtuan","-")

 

[Phuocam]

Thí nghiệm cái xem sao: =ChenKT("anhtuan","-")

Kiếm đường tà đạo đi mà thất bại, lúc test các ký tự không trùng, thôi quay về đường cũ.

Public Function ChenKT(s As String, Optional d As String = " ") As String
Dim i As Long, ss As String
For i = 1 To Len(s)
    ss = ss & d & Mid(s, i, 1)
Next
If Len(ss) > 0 Then ChenKT = Mid(ss, Len(d)+1)
End Function

 

[tannguyen0305]

em cảm ơn anh/chị nhiều lắm ạ
các anh chị chơi với excel như chơi game ấy, e ngưỡng mộ quá

 

[saobekhonglac]

Thí nghiệm cái xem sao: =ChenKT("anhtuan","-")

Từ chữ "a-n-h-t-u-a-n" hay "a n h t u a n" mình có tách ra được chữ "anh tuan" không vậy anh

 

[ndu96081631]

em cảm ơn anh/chị nhiều lắm ạ
các anh chị chơi với excel như chơi game ấy, e ngưỡng mộ quá

Chính xác là chơi vờ ba như chơi game, rất đinkout