converting from percent to number with two digits...

[bestox]

i would like to convert a percent, let s say 1,00%, to a number with two digits, 1,00, using vba.

CDbl(cell(1,1))

does not work for converting...

anyone has an indea?

 

[sanrv1f]

try

Sheets("Sheet1").Range("A1").Value = Sheets("Sheet1").Range("A1").Value * 100
Sheets("Sheet1").Range("A1").NumberFormat = "###"

 

[Legacy 68668]

try

With Cells(1, 1)
    .Value = Val(Replace(.Text, "%", ""))
    .NumberFormat = "#.00"
End With

 

[bestox]

works, thank you!

 

[bestox]

try

With Cells(1, 1)
    .Value = Val(Replace(.Text, "%", ""))
    .NumberFormat = "#.00"
End With

jep, that s it!
Thank you!