Không hiện số 0 trước những số có 1 chữ số trong VBA tạo số ngẫu nhiên không trùng.

[huybuonvp]

Em có áp dụng VBA trên GPE để áp dụng vào nhưng bị hiện tượng không hiện số 0 phía trước với những số có 1 chữ số. Xin các ace giúp đỡ!

 

[CHAOQUAY]

Em có áp dụng VBA trên GPE để áp dụng vào nhưng bị hiện tượng không hiện số 0 phía trước với những số có 1 chữ số. Xin các ace giúp đỡ!

Trong hàm UniqueRandomNum(), tìm dòng trên thay = dòng dưới

'.Add Int(Rnd() * (Top - Bottom + 1)) + Bottom, ""
.Add Right(100 + Int(Rnd() * (Top - Bottom + 1)) + Bottom, 2), ""

 

[Phuocam]

Em có áp dụng VBA trên GPE để áp dụng vào nhưng bị hiện tượng không hiện số 0 phía trước với những số có 1 chữ số. Xin các ace giúp đỡ!

Bạn thử dùng công thức mảng sau:

=TEXTJOIN(",",TRUE,TEXT(C2:CR2,"00"))

Nhớ kết thúc bằng Ctrl+Shift+Enter.

 

[huybuonvp]

Trong hàm UniqueRandomNum(), tìm dòng trên thay = dòng dưới

'.Add Int(Rnd() * (Top - Bottom + 1)) + Bottom, ""
.Add Right(100 + Int(Rnd() * (Top - Bottom + 1)) + Bottom, 2), ""

Cảm ơn bác đúng điều em mong muốn!