Tạo 2 Hàm công thức bằng Vba

[lenolim]

Nhờ mọi người viết 2 hàm: Ngày và tháng bằng Vba, Với mong muốn như sau:
1. Tạo hàm NGÀY. Với yêu cầu:
- Nếu số của NGÀY trong tháng < 10. Thì thêm số 0 đằng trước.
- Còn nếu số của NGÀY trong tháng >=10 thì giữ nguyên
2. Tạo hàm THÁNG. Với yêu cầu:
- Nếu số của THÁNG trong năm < 10. Thì thêm số 0 đằng trước.
- Còn nếu số của THÁNG trong năm >=10 thì giữ nguyên
* Ví dụ: - Nếu là ngày: 1 trong tháng thì sẽ chuyển thành: 01
- Nếu là ngày: 10 trong tháng thì giữ nguyên

 

[giaiphap]

Nhờ mọi người viết 2 hàm: Ngày và tháng bằng Vba, Với mong muốn như sau:
1. Tạo hàm NGÀY. Với yêu cầu:
- Nếu số của NGÀY trong tháng < 10. Thì thêm số 0 đằng trước.
- Còn nếu số của NGÀY trong tháng >=10 thì giữ nguyên
2. Tạo hàm THÁNG. Với yêu cầu:
- Nếu số của THÁNG trong năm < 10. Thì thêm số 0 đằng trước.
- Còn nếu số của THÁNG trong năm >=10 thì giữ nguyên
* Ví dụ: - Nếu là ngày: 1 trong tháng thì sẽ chuyển thành: 01
- Nếu là ngày: 10 trong tháng thì giữ nguyên

Thử thế này.

Public Function HamGPE(so As Byte) As String
    HamGPE = Format(so, "00")
End Function

 

[lenolim]

Thử thế này.

Public Function HamGPE(so As Byte) As String
    HamGPE = Format(so, "00")
End Function

Cảm ơn anh đã quan tâm.
Do em truyền đạt ý tưởng chưa đúng nên nhận được kết quả chưa ưng ý.
Nhờ anh xem lại bài toán trên với file đính kèm
Cảm ơn anh lần nữa !

 

[giaiphap]

Cảm ơn anh đã quan tâm.
Do em truyền đạt ý tưởng chưa đúng nên nhận được kết quả chưa ưng ý.
Nhờ anh xem lại bài toán trên với file đính kèm
Cảm ơn anh lần nữa !

Lúc đầu đưa file mẫu là được rồi.

 

[be_09]

Cảm ơn anh đã quan tâm.
Do em truyền đạt ý tưởng chưa đúng nên nhận được kết quả chưa ưng ý.
Nhờ anh xem lại bài toán trên với file đính kèm
Cảm ơn anh lần nữa !

Chỉ định dạng lại thôi (không dùng VBA).

 

[phulien1902]

Cảm ơn anh đã quan tâm.
Do em truyền đạt ý tưởng chưa đúng nên nhận được kết quả chưa ưng ý.
Nhờ anh xem lại bài toán trên với file đính kèm
Cảm ơn anh lần nữa !

Áp dụng cách của giaiphap

 

[lenolim]

Lúc đầu đưa file mẫu là được rồi.

Vâng cảm ơn anh rất nhiều.
Tại em nghĩ chưa hết khả năng xảy ra nên mới thành ra như thế.
Bây giờ thì ổn rồi.
./. !

Bài đã được tự động gộp: 7/9/18

Chỉ định dạng lại thôi (không dùng VBA).

Cảm ơn sự giúp đỡ của anh !