Cách chuyển định dạng sang "%"

[KVP]

Xin hỏi

Tôi có một cells(2,3) chứa một số nguyên VD: 20. Trong code để chuyển cells(2,3) này sang thành định dạng % thành 20% thì dùng cách nào?

Trong quá trình tính toán. Tôi gán một biến VD: TyLe as Double = cells(2,4) khác trong sheets hiện hành. Khi muốn Tyle = 20% tôi đành phải viết: Cells(2,4)=Cells(2,3) & "%"

Kết quả: trong qua trình tính toán có lúc cells(2,4) = 20% lúc thành 12:00:00% và báo lỗi. Không hiểu tại sao. Mong được các anh chị chỉ giùm ?

 

[huuthang_bd]

Xin hỏi

Tôi có một cells(2,3) chứa một số nguyên VD: 20. Trong code để chuyển cells(2,3) này sang thành định dạng % thành 20% thì dùng cách nào?

Trong quá trình tính toán. Tôi gán một biến VD: TyLe as Double = cells(2,4) khác trong sheets hiện hành. Khi muốn Tyle = 20% tôi đành phải viết: Cells(2,4)=Cells(2,3) & "%"

Kết quả: trong qua trình tính toán có lúc cells(2,4) = 20% lúc thành 12:00:00% và báo lỗi. Không hiểu tại sao. Mong được các anh chị chỉ giùm ?

Bạn thử cái này xem:

Range("D2").Value = Format(Range("D2") / 100, "#%")

 

[KVP]

Không ổn bạn ạ, Range ("D2") = 0 luôn

 

[huuthang_bd]

Không ổn bạn ạ, Range ("D2") = 0 luôn

Range ("D2") = 0 là sao hả bạn. Bạn thử nhập vào cell D2 = 20. Copy đoạn code đó vào Macro rồi chạy macro thử đc ko. Mình text đc mà.

 

[ndu96081631]

Không ổn bạn ạ, Range ("D2") = 0 luôn

Nếu không D2 thì là C2 hay cái gì đó! Bạn biết xài code đương nhiên phải biết phân biệt chứ!
Còn không thì chỉ có cách đưa file lên thôi bạn à!

 

[KVP]

Cám ơn các bạn

Mình dùng trong code thế này: Range(2,4).Value = range(65000,3).end(xlup) & "%"

range (65000,3).end(xlup) là một số nguyên thay đổi theo biến tạm. Nguyên nhân lỗi là do trong quá trình text code mình để lại một dòng thứ 450 chứa giá trị 00:00:00 mà không phát hiện ra trên màn hình khi thử cứ thấy lúc thì 0 lúc thì 00:00:00 là do vậy. Kiểm tra từng thành phần mới phát hiện ra.
Cách của mình cũng đúng mà cách của huuthang_bd cũng đúng.
Như vậy để chuyển định dạng % hơi khác so với các định dạng khác một chút?

 

[ndu96081631]

Cám ơn các bạn

Mình dùng trong code thế này: Range(2,4).Value....

Nói thiệt, code này tôi chưa gặp bao giờ ---> Hỏng hiểu sao bạn lại xài được mà không báo lổi
Còn số 20 và 20% đương nhiên là khác nhau hoàn toàn vì 20% chỉ = 0.2
Vậy để chuyển số 20 thành 20% mà bạn dùng toán tử & thì kết quả chỉ là dạng TEXT
Phương pháp lấy số 20 chia cho 100 là chính xác nhất
Nói thêm: % chỉ là cách hiển thị (giống như ngày tháng năm) ---> Bản chất của nó không vì thế thay đổi ---> 20% luôn luôn = 0.2

 

[KVP]

Nếu muốn lấy giá trị 0,2 thì đúng là mình lấy luôn 20/100 cho ngắn gọn. Không phải format thành 20% làm gì.
Vấn đề là mình muốn nó hiện trên sheets là 20% chứ không phải 0.2. Có điều là 20% khi thực hiện tính toán mình vẫn chưa thấy có lỗi...?
Và giờ mình mới hiểu được % chỉ là cách hiển thị, nó không giống như các định dạng khác
Cám ơn bạn