cstr functie in VBA excel

[reneemettrie]

Gegeven: kolom waarin tekst en getallen door elkaar staan
Bv
1920 (geïnterpreteerd als getal)
prod1
50 (geïnterpreteerd als getal)
prod2

Ik wil van alle getallen tekst maken (om correct te sorteren) en gebruik met een lus de cstr functie

Resultaat: alles staat op einde rit rechts, en 1920 en 50 hebben als gegevenstype "double" ipv "string"

Wat is hier aan de hand?

 

[edmoor]

Zet er in de loop een enkele quote voor:
Cel.Value = "'" & Cel.Value

Hou er wel rekening mee dat getallen dan tekstueel gesorteerd worden en niet numeriek.

 

[Enigmasmurf]

Hoi,

Als ik het probleem juist inschat, dan is er helemaal geen lus nodig.
Eén regeltje code volstaat (als de bestaande kolom mag omgezet worden naar tekst, anders eerst een copy-instructie)

Columns(1).NumberFormat = "@"

Groetjes,
Enigmasmurf

 

[reneemettrie]

Zet er in de loop een enkele quote voor:
Cel.Value = "'" & Cel.Value

Hou er wel rekening mee dat getallen dan tekstueel gesorteerd worden en niet numeriek.

Mooie oplossing! Moet idd tekstueel worden gesorteerd

 

[reneemettrie]

Hoi,

Als ik het probleem juist inschat, dan is er helemaal geen lus nodig.
Eén regeltje code volstaat (als de bestaande kolom mag omgezet worden naar tekst, anders eerst een copy-instructie)

Columns(1).NumberFormat = "@"

Groetjes,
Enigmasmurf

Geniaal! Zit op het werk, weinig tijd. Vind niet direct waarvoor die "@" staat?

 

[edmoor]

Tekst

 

[Enigmasmurf]

Geniaal!

Té veel eer m.i.

"@" is hier noch meer noch minder dan het equivalent van de lint-actie "Start / Getal / Getalnotatie / Tekst"

Groetjes,
F.