hiénlinh197
Thành viên tiêu biểu
- Tham gia
- 26/5/09
- Bài viết
- 491
- Được thích
- 113
Dùng code của thầy @ndu96081631 nhéQuên, mình không giải thích
Tức là tách lấy ký tự đầu tiên của các chuỗi ký tự đứng sau dấu "," hoặc dấu ";"
Xin trân trọng cảm ơn!
=JoinText(",",LEFT(TRIM(MID(SUBSTITUTE(SUBSTITUTE(","&B3,";",","),",",REPT(" ",LEN(B3))),ROW(INDIRECT("1:"&1+LEN(B3)-LEN(SUBSTITUTE(SUBSTITUTE(B3,";",","),",",""))))*LEN(B3),LEN(B3)))))
Trật bài roài Kết quả là k,1,3,q,6,n,1,1 cơ màDùng code của thầy @ndu96081631 nhé
Công thức
Mã:=JoinText(",",LEFT(TRIM(MID(SUBSTITUTE(SUBSTITUTE(","&B3,";",","),",",REPT(" ",LEN(B3))),ROW(INDIRECT("1:"&1+LEN(B3)-LEN(SUBSTITUTE(SUBSTITUTE(B3,";",","),",",""))))*LEN(B3),LEN(B3)))))
Tại sao vị trí kết quả ở gần cuối 2020 là 2 sao là 1 vậy bạn?Nhờ các bạn viết giúp hàm như file đính kèm
Xin trân thành cảm ơn các bạn!
Public Function JoinTxt(txt As String) As String
Dim v As Variant, temp As String
txt = Replace(txt, " ", "")
For Each v In Split(txt, ",")
If Len(v) > 0 Then temp = temp & "," & Left(v, 1)
Next
JoinTxt = Mid(temp, 2)
End Function
Tại vì:Tại sao vị trí kết quả ở gần cuối 2020 là 2 sao là 1 vậy bạn?
Em nhìn thấy hơi kỳ kỳ nên em hỏi lại đó Bác.Tại vì:
1. thay vì copy nguyên chuỗi rồi xoá bớt thì thớt lại gõ.
2. hễ sơ xuất thì có người nhắc giùm rồi. Đâu có cần phải tự kiểm.
Tin nhắn mấy ông đánh đề y chan kiểu như vậy. tách ra rồi mới đem đi dò với kết quả trên trang sổ xốTheo tôi thấy thì công thức bài #4, #5, và #8 đều không ra đúng yêu cầu.
Thiếu phần LCase !!!
Chắc bạn chưa biết thớt.Tin nhắn mấy ông đánh đề y chan kiểu như vậy. tách ra rồi mới đem đi dò với kết quả trên trang sổ xố
Cảm ơn bạn đã nhắcTrật bài roài Kết quả là k,1,3,q,6,n,1,1 cơ mà
Bạn nói sai quan điểm rồiTin nhắn mấy ông đánh đề y chan kiểu như vậy. tách ra rồi mới đem đi dò với kết quả trên trang sổ xố
Sai quan điểm rồi @VetMiniChắc bạn chưa biết thớt.
Mấy cái bài toán thuộc loại may rủi này vẫn hỏi thường xuyên.
Cảm ơn bạnDùng code của thầy @ndu96081631 nhé
Công thức
Mã:=JoinText(",",LEFT(TRIM(MID(SUBSTITUTE(SUBSTITUTE(","&B3,";",","),",",REPT(" ",LEN(B3))),ROW(INDIRECT("1:"&1+LEN(B3)-LEN(SUBSTITUTE(SUBSTITUTE(B3,";",","),",",""))))*LEN(B3),LEN(B3)))))
Cảm ơn bạn đã nhắc
Nó là số 2
Bài đã được tự động gộp:
Bạn nói sai quan điểm rồi
Bài đã được tự động gộp:
Sai quan điểm rồi @VetMini
Bài đã được tự động gộp:
Cảm ơn bạn
Chúc bạn mạnh khỏe
Bạn khỏi cần cảnh báo. Mọi người biết lâu rồi. Họ chỉ theo quan điểm "giúp được thì giúp, mục đích/mục tiêu của người hỏi không phải là chuyện của mình".sau khi kiểm tra hết các nội dung các bài viết của bạn này. Có khả năng đang làm 1 dự án phần mềm vế vấn đề cờ bạc hoặc số đề. đề nghị mọi người cảnh giác thành viên này.
Đề nghị BQT xem xét lại các bai viết của thành viên@hiénlinh197
Bạn đã có lời lẽ xúc phạm đến thành viên khác, điều này bạn đã vi phạm nội quy của diễn đàn, nên tôi đình chỉ hoạt động của bạn đến ngày 26-04-2020.
HLMT