Values Unrecognizable After Update Userform

[mucah!t]

Hi all,

The following code edits/adds the value of textbox2 to its corresponding cell.
The problem with it is that after updating, the values are unrecognizable and can't be used for further calculations.

    With LB
        LI = .ListIndex
        Range(.ListFillRange).Cells(LI + 1, 2).Value = TextBox2.Value
        .ListFillRange = .ListFillRange
        .ListIndex = LI
    End With

- Texttocolumns solves the problem, but recording it results in an error.
- Google offered the following solution:

Worksheets("Database").Columns("J").TextToColumns Destination:=Range("J1"), FieldInfo:=Array(1, 1)

Although it does not gives an error it makes even more values in the column unrecognizable.

Perhaps the problem can be solved in the way the value is updated in the first place instead of fixing it afterwards.

Any ideas?

 

[mucah!t]

Anyone?

 

[mucah!t]

All help is welcome

 

[mucah!t]

I will give it one more try.
Can anyone help me with this?

 

[Norie]

You are putting a value from a textbox into the range.

If you actually want a number then use Val(Textbox2.Value)

 

[mucah!t]

Thanks for replying Norie, That almost worked.
It saved the value indeed as a number, but for some reason all other numbers in the column became unrecognizable

 

[mucah!t]

Perhaps someone else.
Any suggestions?

 

[Cindy Ellis]

What do you mean by unrecognizable?
Does it show hash-marks? #VAL? #N/A?
A little more detail may help someone help you...
Cindy

 

[Norie]

mucah!t

Cindy's right, more detail would help.

Are the 'unrecognizable' values the results from formatting?

Is it only caused by placing this one value on the worksheet?

 

[mucah!t]

Hello,

There are no errors but it seems to be a formatting thing.
All values are aligned to the right, but after using your proposed code some of them are aligned to the left.
re-aligning, reformatting nor Texttocolumns can't get them "recognizable" again