Xin Hướng dãn chuyển sang tỷ số giúp

[kebuidoi]

Mình có nhiều file xuất ra từ chương trình kế toán nhưng bị lỗi về số, ngày tháng không mặc định được. Các bạn xem file đính kèm rồi hiểu

 

[ndu96081631]

1> Bạn mở file Excel của bạn lên, bấm Alt + F11 để vào cửa số VBE
2> Vào menu Insert\Module
3> Copy code dưới đây vào cửa sổ trống bên phải:

Sub Convert()
  For Each Clls In Range("B2:B" & [B65536].End(xlUp).Row)
     If Asc(Clls) <> 32 Then
       With Clls
         .Value = "19" & .Value
         .NumberFormat = "dd/mm/yyyy"
       End With
     Else:
       Clls.ClearContents
     End If
  Next
End Sub

4> Đóng cửa số VBE lại, bấm Alt +F8, chọn chử Convert và bấm lệnh Run
Thử xem
Còn vụ lổi về số thì chưa hiểu! Số là số của cột nào? (tiêu đề tiếng TQ nên không biết nó là cái gì)