Problem with number format

Hello.

I have a problem.

I have set this line of code:

destws.Range("N" & i).Value = sourcews.Range("C" & i).Value
destws.Range("N" & i).NumberFormat = "0"

So far so good. The format numbers are indeed just as i want them, like this: 9999990002637420


Then, i put in another part of my code these:

For i = 2 To LastRow
c4a = destws.Range("N" & i).Value & "&" & destws.Range("J" & i).Value
destws.Range("A" & i).Value = c4a
destws.Range("A" & i).NumberFormat = "0"

Next

At that column i get this result: 9,99999000263742E+15&CRS4958054

Can someone plesae tel me what i'm doing wrong?

Thanks in advance

it goes wrong because your outcome is not a number in the second piece of code, because of the joining of 2 cellvalues. so the first value of N column is put in as unformatted into the c4a-string and turns to scientific notation because of its length

Try:

Please Login or Register  to view this content.

---

please note that all code should be put in code tags(use #-icon on the editorbar)

must be a typo somewhere.. works in my testsheet

but there is always more then one way to get to the same result.

Originally Posted by shg

Excel will only ever display a max of 15 significant digits for numbers. If you want more than that, you need to keep the results as text.

Thamks a lot!