Met een user form data wegschrijven als numeriek

[zwans]

Hoi,

Ik heb een probleem met het wegschrijven van data via een userform als numeriek.

Via een userform voer ik ordernummers in (in kolom A) en daarbij (in kolom B) het aantal meters. Ik kan echter niet rekenen in formules met dit aantal meters. Ik denk dat dit komt doordat de data als text wordt weggeschreven en niet als numeriek.

De code die ik hiervoor gebruik is:

Private Sub CommandButton1_Click()

    With Sheets("hulpblad3")
    .Range("A1") = order1
    .Range("A2") = order2
    .Range("A3") = order3
    .Range("A4") = order4
    .Range("A5") = order5
    .Range("A6") = order6
    .Range("A7") = order7
    .Range("A8") = order8
    .Range("B1") = meter1
    .Range("B2") = meter2
    .Range("B3") = meter3
    .Range("B4") = meter4
    .Range("B5") = meter5
    .Range("B6") = meter6
    .Range("B7") = meter7
    .Range("B8") = meter8
    Unload Me

End With

End Sub

Alles wat naar kolom B wordt weggeschreven zou dus numeriek moeten zijn.

Weet iemand hoe ik dit kan doen?

M.V.G.

Ronald Buikema

 

[Cobbe]

Test eens met deze:

.Range("A1") = VAL(meter1)

Gr.,Cobbe

 

[zwans]

Ontzettend bedankt!

werkt perfect!