Hỏi: Tìm hàm điền khoảng trắng vào cell (1 người xem)

[titanic]

chào các anh chị
em cần điền khoản trắng vào ô . với điều kiện cho trước
e khong gửi được fiel đính kèm . không hiểu là tại sao nữa. em sẽ bổ sung ở phần trả lời.
em sẽ nêu ít ví dụ ạ . cảm ơn anh chị đã quan tâm và giúp đỡ
[TABLE="width: 500"]
[TR]
[TD]nhap số điện thoai
[/TD]
[TD]điều kiện. tính từ phải qua
[/TD]
[TD]kêt quả
[/TD]
[TD]ghi chú
[/TD]
[/TR]
[TR]
[TD]1676179379
[/TD]
[TD]33
[/TD]
[TD]01676 179 379
[/TD]
[TD]33 có nghĩa là từ bênh phải đem qua 3 con thì cho 1 khoản trắng. đếm tiếp 3 con nữa thì cho 1 khoản trắng nữa
[/TD]
[/TR]
[TR]
[TD]1679494938
[/TD]
[TD]222
[/TD]
[TD]01679 49 49 38
[/TD]
[TD]222: có nghĩa là từ bênh phải đém qua 2 con thì cho 1 khoản trắng. đếm tiếp 2 con nữa thì cho 1 khoản trắng, đếm tiếp 2 con nữa thì cho 1 khoản trắng
[/TD]
[/TR]
[TR]
[TD]1664585878
[/TD]
[TD]232
[/TD]
[TD]0166 45 858 78
[/TD]
[TD]232: có nghĩa là từ bênh phải đếm qua 2 con thì cho 1 khoản trắng. đếp tiếp 3 con nữa, thì cho 1 khoản trắng, đep tiếp 2 con nữa thì cho 1 khoản trắng nữa
[/TD]
[/TR]
[TR]
[TD]1646110383
[/TD]
[TD]114
[/TD]
[TD]01646 1 1 0383
[/TD]
[TD]114: có nghĩa là từ bênh phải đém qua 4 số thì cho 1 khoản trắng, đép tiếp 1 số nữa cho 1 khoản trắng, đép tiếp 1 số nữa cho 1 khoản trắng
[/TD]
[/TR]
[TR]
[TD]1644295789
[/TD]
[TD]222
[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[/TABLE]

 

[giangleloi]

chào các anh chị
em cần điền khoản trắng vào ô . với điều kiện cho trước
e khong gửi được fiel đính kèm . không hiểu là tại sao nữa. em sẽ bổ sung ở phần trả lời.
em sẽ nêu ít ví dụ ạ . cảm ơn anh chị đã quan tâm và giúp đỡ

Với bài này, viết code thì còn được chứ công thức thì chưa có nghĩ ra.

 

[thangbithu]

chào các anh chị
em cần điền khoản trắng vào ô . với điều kiện cho trước
e khong gửi được fiel đính kèm . không hiểu là tại sao nữa. em sẽ bổ sung ở phần trả lời.
em sẽ nêu ít ví dụ ạ . cảm ơn anh chị đã quan tâm và giúp đỡ
[TABLE="width: 500"]
[TR]
[TD]nhap số điện thoai[/TD]
[TD]điều kiện. tính từ phải qua[/TD]
[TD]kêt quả[/TD]
[TD]ghi chú[/TD]
[/TR]
[TR]
[TD]1676179379[/TD]
[TD]33[/TD]
[TD]01676 179 379[/TD]
[TD]33 có nghĩa là từ bênh phải đem qua 3 con thì cho 1 khoản trắng. đếm tiếp 3 con nữa thì cho 1 khoản trắng nữa[/TD]
[/TR]
[TR]
[TD]1679494938[/TD]
[TD]222[/TD]
[TD]01679 49 49 38[/TD]
[TD]222: có nghĩa là từ bênh phải đém qua 2 con thì cho 1 khoản trắng. đếm tiếp 2 con nữa thì cho 1 khoản trắng, đếm tiếp 2 con nữa thì cho 1 khoản trắng[/TD]
[/TR]
[TR]
[TD]1664585878[/TD]
[TD]232[/TD]
[TD]0166 45 858 78[/TD]
[TD]232: có nghĩa là từ bênh phải đếm qua 2 con thì cho 1 khoản trắng. đếp tiếp 3 con nữa, thì cho 1 khoản trắng, đep tiếp 2 con nữa thì cho 1 khoản trắng nữa[/TD]
[/TR]
[TR]
[TD]1646110383[/TD]
[TD]114[/TD]
[TD]01646 1 1 0383[/TD]
[TD]114: có nghĩa là từ bênh phải đém qua 4 số thì cho 1 khoản trắng, đép tiếp 1 số nữa cho 1 khoản trắng, đép tiếp 1 số nữa cho 1 khoản trắng[/TD]
[/TR]
[TR]
[TD]1644295789[/TD]
[TD]222[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[/TABLE]

Bài này dùng hàm được nhưng rất dài nên bạn chờ các cao thủ giúp bằng VBA sẽ gọn hơn

 

[doveandrose]

Bài này dùng hàm được nhưng rất dài nên bạn chờ các cao thủ giúp bằng VBA sẽ gọn hơn

chắc ý bạn là chờ bạn #2 . mình cũng đang chờ bạn í . hi hi

 

[gtri]

chào các anh chị
em cần điền khoản trắng vào ô . với điều kiện cho trước
e khong gửi được fiel đính kèm . không hiểu là tại sao nữa. em sẽ bổ sung ở phần trả lời.
em sẽ nêu ít ví dụ ạ . cảm ơn anh chị đã quan tâm và giúp đỡ

Hàm tự tạo

Public Function Them(Chuoi, Dk)
Dim Tam(), i, j
ReDim Tam(Len(Dk))

For i = Len(Dk) To 1 Step -1
j = Len(Chuoi) - Mid(Dk, i, 1)
Tam(i) = Mid(Chuoi, j + 1, Mid(Dk, i, 1))
Chuoi = Left(Chuoi, j)
Next i
Tam(0) = "0" & Chuoi

Them = Join(Tam, " ")
End Function

Cú pháp =Them(Chuỗi số, điều kiện )

 

[nghiaphuc]

chào các anh chị
em cần điền khoản trắng vào ô . với điều kiện cho trước
e khong gửi được fiel đính kèm . không hiểu là tại sao nữa. em sẽ bổ sung ở phần trả lời.
em sẽ nêu ít ví dụ ạ . cảm ơn anh chị đã quan tâm và giúp đỡ

Bạn dụng hàm tự tạo này xem sao, chứ công thức thì tôi chịu thua với bài này:
[GPECODE=vb]Function AddSpaces(S As String, Cond As String) As String
Dim i As Long, j As Long
j = Len(S)
For i = Len(Cond) To 1 Step -1
j = j - Val(Mid(Cond, i, 1))
If j < 0 Then Exit For
S = Left(S, j) & " " & Mid(S, j + 1, Len(S))
Next
AddSpaces = S
End Function[/GPECODE]
Cú pháp: =AddSpaces(Chuỗi,Điều kiện)

 

[thangbithu]

Các anh chị vui lòng hướng dẫn giúp, làm thế nào để đưa hàm tự tạo vào trong excel ạ?

 

[nghiaphuc]

Các anh chị vui lòng hướng dẫn giúp, làm thế nào để đưa hàm tự tạo vào trong excel ạ?

Bạn mở cửa sổ VBE ra, chèn vào 1 module rồi dán đoạn code trên vào ở khung soạn thảo. Sau đó ra ngoài Excel sử dụng chúng như bất kỳ hàm nào của Excel thôi.

 

[thangbithu]

Bạn mở cửa sổ VBE ra, chèn vào 1 module rồi dán đoạn code trên vào ở khung soạn thảo. Sau đó ra ngoài Excel sử dụng chúng như bất kỳ hàm nào của Excel thôi.

Dạ, Thắng cảm ơn anh Phúc nhiều

 

[tiendung9911]

chào các anh chị
em cần điền khoản trắng vào ô . với điều kiện cho trước
e khong gửi được fiel đính kèm . không hiểu là tại sao nữa. em sẽ bổ sung ở phần trả lời.
em sẽ nêu ít ví dụ ạ . cảm ơn anh chị đã quan tâm và giúp đỡ
[TABLE="width: 500"]
[TR]
[TD]nhap số điện thoai[/TD]
[TD]điều kiện. tính từ phải qua[/TD]
[TD]kêt quả[/TD]
[TD]ghi chú[/TD]
[/TR]
[TR]
[TD]1676179379[/TD]
[TD]33[/TD]
[TD]01676 179 379[/TD]
[TD]33 có nghĩa là từ bênh phải đem qua 3 con thì cho 1 khoản trắng. đếm tiếp 3 con nữa thì cho 1 khoản trắng nữa[/TD]
[/TR]
[TR]
[TD]1679494938[/TD]
[TD]222[/TD]
[TD]01679 49 49 38[/TD]
[TD]222: có nghĩa là từ bênh phải đém qua 2 con thì cho 1 khoản trắng. đếm tiếp 2 con nữa thì cho 1 khoản trắng, đếm tiếp 2 con nữa thì cho 1 khoản trắng[/TD]
[/TR]
[TR]
[TD]1664585878[/TD]
[TD]232[/TD]
[TD]0166 45 858 78[/TD]
[TD]232: có nghĩa là từ bênh phải đếm qua 2 con thì cho 1 khoản trắng. đếp tiếp 3 con nữa, thì cho 1 khoản trắng, đep tiếp 2 con nữa thì cho 1 khoản trắng nữa[/TD]
[/TR]
[TR]
[TD]1646110383[/TD]
[TD]114[/TD]
[TD]01646 1 1 0383[/TD]
[TD]114: có nghĩa là từ bênh phải đém qua 4 số thì cho 1 khoản trắng, đép tiếp 1 số nữa cho 1 khoản trắng, đép tiếp 1 số nữa cho 1 khoản trắng[/TD]
[/TR]
[TR]
[TD]1644295789[/TD]
[TD]222[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[/TABLE]

Bạn có thể dùng hàm, nhưng rất dài. Tôi lấy ví dụ: Nếu điều kiện tính từ phải qua là 2 thì hàm sẽ như thế này (giả sử cột SỐ ĐIỆN THOẠI LÀ C11, cột ĐIỀU KIỆN TÍNH là D11 thì :
=IF(LEN(D11)=2,CONCATENATE(LEFT(C11,RIGHT(D11)+LEFT(D11))," ",MID(C11,(VALUE(RIGHT(D11))+VALUE(LEFT(D11))),LEFT(D11))," ",RIGHT(C11,VALUE(LEFT(D11)))), điều kiện bằng 3 hoặc 4 thì cũng tương tự)