Chuyển dạng Text thành số bằng VBA? (1 người xem)

[nqdn2010]

Tôi Search cả buổi nhưng không thấy đáp ứng yêu cầu.
Mong các Thầy giúp tôi thực hiên công việc trong File đính kèm.
Nếu có bài viết nào liên quan xin cho tôi Link.
Cám ơn nhiều!

 

[phulien1902]

Tôi Search cả buổi nhưng không thấy đáp ứng yêu cầu.
Mong các Thầy giúp tôi thực hiên công việc trong File đính kèm.
Nếu có bài viết nào liên quan xin cho tôi Link.
Cám ơn nhiều!

Bạn thử:

Sub abc()
    With Cells(4, 2).CurrentRegion
    .Replace ",", "."
        .Value = .Value
    End With
End Sub

 

[befaint]

Tôi Search cả buổi nhưng không thấy đáp ứng yêu cầu.
Mong các Thầy giúp tôi thực hiên công việc trong File đính kèm.
Nếu có bài viết nào liên quan xin cho tôi Link.
Cám ơn nhiều!

Trường hợp 1: Nếu dấu phân cách phần thập phân là dấu phẩy

Copy ô A1, chọn vùng B4:H53, click phải chuột, chọn Paste Special...
rồi chọn như hình, nhấn OK.



Trường hợp 2: Nếu dấu phân cách phần thập phân là dấu chấm.

Chọn vùng B4:H53, nhấn Ctrl + H:


mục Find what: nhập vào dấy phẩy
mục Replace with: nhập vào dấu chấm.
Click Replace All, OK, Close

 

[nqdn2010]

Cám ơn 2 bạn, để mình Text thử!

 

[nqdn2010]

Tuyệt vời.
tôi làm theo code của bạn phulien1902

befaint Tại mình muốn dùng VBA