Không tính toán được với dữ liệu kiểu ngày trong VBA (1 người xem)

[huy vu]

Em chào các anh/chị trên GPE
Em có 1 file excel, có 1 ô kiểu ngày (không biết nó định dạng kiểu gì) mà:
- Ngoài bảng tính có thể tính toán được (+, -).
- Trong VBA lại không tính toán được. Em có ghi lại các thao tác bằng Record Marco, chỉnh sửa lại chút, code trong Sub Tinh.
Em có mô tả thêm trong File đính kèm.
Vậy làm thế nào để VBA có thể tính toán được với dữ liệu định dạng kiểu này?
Mong anh/chị giúp đỡ!

 

[Kiều Mạnh]

Em chào các anh/chị trên GPE
Em có 1 file excel, có 1 ô kiểu ngày (không biết nó định dạng kiểu gì) mà:
- Ngoài bảng tính có thể tính toán được (+, -).
- Trong VBA lại không tính toán được. Em có ghi lại các thao tác bằng Record Marco, chỉnh sửa lại chút, code trong Sub Tinh.
Em có mô tả thêm trong File đính kèm.
Vậy làm thế nào để VBA có thể tính toán được với dữ liệu định dạng kiểu này?
Mong anh/chị giúp đỡ!

Bạn nghĩ sao ấy chứ F1 là một chuỗi txt mà lại copy qua D1 Format thành Date sau đó cộng với 1 thì lỗi là phải rồi

 

[Hau151978]

Em chào các anh/chị trên GPE
Em có 1 file excel, có 1 ô kiểu ngày (không biết nó định dạng kiểu gì) mà:
- Ngoài bảng tính có thể tính toán được (+, -).
- Trong VBA lại không tính toán được. Em có ghi lại các thao tác bằng Record Marco, chỉnh sửa lại chút, code trong Sub Tinh.
Em có mô tả thêm trong File đính kèm.
Vậy làm thế nào để VBA có thể tính toán được với dữ liệu định dạng kiểu này?
Khi VB không tự chuyển kiểu dữ liệu thì dùng hàm chuyển đổi:
.[D15] = CDate(.[D1]) + 1

 

[huy vu]

Bạn nghĩ sao ấy chứ F1 là một chuỗi txt mà lại copy qua D1 Format thành Date sau đó cộng với 1 thì lỗi là phải rồi

Kể cả dùng ô trống khác F1 cũng không đc anh ạ

 

[huy vu]

Em chào các anh/chị trên GPE
Em có 1 file excel, có 1 ô kiểu ngày (không biết nó định dạng kiểu gì) mà:
- Ngoài bảng tính có thể tính toán được (+, -).
- Trong VBA lại không tính toán được. Em có ghi lại các thao tác bằng Record Marco, chỉnh sửa lại chút, code trong Sub Tinh.
Em có mô tả thêm trong File đính kèm.
Vậy làm thế nào để VBA có thể tính toán được với dữ liệu định dạng kiểu này?
Khi VB không tự chuyển kiểu dữ liệu thì dùng hàm chuyển đổi:
.[D15] = CDate(.[D1]) + 1

Được rồi anh. Có những hàm rất đơn giản mà em không biết. Cảm ơn anh.