ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Not rounding numbers in VBA (https://www.excelbanter.com/excel-programming/345070-not-rounding-numbers-vba.html)

serdar

Not rounding numbers in VBA
 

Cells(1, 1) = "3.514"

This gives 4 in A1. Is it possible to pass the actual value without
preformatting the cell?



Ron de Bruin

Not rounding numbers in VBA
 
You can use this

With Cells(1, 1)
.NumberFormat = "General"
.Value = "3.514"
End With


--
Regards Ron de Bruin
http://www.rondebruin.nl


"serdar" wrote in message ...

Cells(1, 1) = "3.514"

This gives 4 in A1. Is it possible to pass the actual value without preformatting the cell?





serdar

Not rounding numbers in VBA
 
thats ok. my solution was funny:

....=3+0.514


"Ron de Bruin" , haber iletisinde şunları
...
You can use this

With Cells(1, 1)
.NumberFormat = "General"
.Value = "3.514"
End With


--
Regards Ron de Bruin
http://www.rondebruin.nl


"serdar" wrote in message
...

Cells(1, 1) = "3.514"

This gives 4 in A1. Is it possible to pass the actual value without
preformatting the cell?







serdar

Not rounding numbers in VBA
 
sorry im not sure but:

i call smt like:

MoveItem("x", 3.514) or MoveItem("x", "3.514")

and in the moveItem:

With Worksheets("y").Cells(1, 1)
.NumberFormat = "General"
.Value = myValue
End With

....makes it 4 again. It works when i don pass a variable.What happens?
(variable is a Long)



"Ron de Bruin" , haber iletisinde şunları
...
You can use this

With Cells(1, 1)
.NumberFormat = "General"
.Value = "3.514"
End With


--
Regards Ron de Bruin
http://www.rondebruin.nl


"serdar" wrote in message
...

Cells(1, 1) = "3.514"

This gives 4 in A1. Is it possible to pass the actual value without
preformatting the cell?







Rowan Drummond[_3_]

Not rounding numbers in VBA
 
Long is short for "long integer" so it will store whole numbers only
which is why this is getting rounded up to 4. Change you data type to
Single or Double.

Hope this helps
Rowan

serdar wrote:
sorry im not sure but:

i call smt like:

MoveItem("x", 3.514) or MoveItem("x", "3.514")

and in the moveItem:

With Worksheets("y").Cells(1, 1)
.NumberFormat = "General"
.Value = myValue
End With

...makes it 4 again. It works when i don pass a variable.What happens?
(variable is a Long)



"Ron de Bruin" , haber iletisinde şunları
...

You can use this

With Cells(1, 1)
.NumberFormat = "General"
.Value = "3.514"
End With


--
Regards Ron de Bruin
http://www.rondebruin.nl


"serdar" wrote in message
...

Cells(1, 1) = "3.514"

This gives 4 in A1. Is it possible to pass the actual value without
preformatting the cell?







serdar

Not rounding numbers in VBA
 
ahhh..sorry i knew it from C. thanks very much.

"Rowan Drummond" , haber iletisinde sunlari
...
Long is short for "long integer" so it will store whole numbers only which
is why this is getting rounded up to 4. Change you data type to Single or
Double.

Hope this helps
Rowan

serdar wrote:
sorry im not sure but:

i call smt like:

MoveItem("x", 3.514) or MoveItem("x", "3.514")

and in the moveItem:

With Worksheets("y").Cells(1, 1)
.NumberFormat = "General"
.Value = myValue
End With

...makes it 4 again. It works when i don pass a variable.What happens?
(variable is a Long)



"Ron de Bruin" , haber iletisinde şunları
...

You can use this

With Cells(1, 1)
.NumberFormat = "General"
.Value = "3.514"
End With


--
Regards Ron de Bruin
http://www.rondebruin.nl


"serdar" wrote in message
...

Cells(1, 1) = "3.514"

This gives 4 in A1. Is it possible to pass the actual value without
preformatting the cell?







Rowan Drummond[_3_]

Not rounding numbers in VBA
 
You're welcome.

serdar wrote:
ahhh..sorry i knew it from C. thanks very much.

"Rowan Drummond" , haber iletisinde sunlari
...

Long is short for "long integer" so it will store whole numbers only which
is why this is getting rounded up to 4. Change you data type to Single or
Double.

Hope this helps
Rowan



All times are GMT +1. The time now is 08:17 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com