dùng hàm nào để bỏ khoảng trắng (2 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

hoasenhong2017

Thành viên thường trực
Tham gia
2/2/17
Bài viết
273
Được thích
28
Mình có một file mong mọi người chỉ giúp, mình muốn bỏ khoảng trắng dư ở hai cột B và C, mình dùm hàm trim mà không được, ai biết chỉ giúp mình với. Mình cảm ơn.
 

File đính kèm

Mình có một file mong mọi người chỉ giúp, mình muốn bỏ khoảng trắng dư ở hai cột B và C, mình dùm hàm trim mà không được, ai biết chỉ giúp mình với. Mình cảm ơn.
Thử dùng code sau:
Mã:
Sub BoKhoangTrang()
  With Intersect(Columns("A:C"), ActiveSheet.UsedRange)
    .Cells = Evaluate("IF(" & .Address & "="""","""",TRIM(SUBSTITUTE(" & _
    .Address & ",CHAR(160),"" "")))")
  End With
End Sub
 
Lần chỉnh sửa cuối:
Thử dùng code sau:
Mã:
Sub BoKhoangTrang()
  With Intersect(Columns("A:C"), ActiveSheet.UsedRange)
    .Cells = Evaluate("IF(" & .Address & "="""","""",TRIM(SUBSTITUTE(" & _
    .Address & ",CHAR(160),"" "")))")
  End With
End Sub
Cảm ơn bạn @be09 đã chỉ mình, nhưng mình không biết về code nên mình dùng hàm theo cách của bạn @HieuCD cho dễ hiểu bạn à.
 
Web KT

Bài viết mới nhất

Back
Top Bottom