Waardes in textbox wordt als tekst geplaatst

Status
Niet open voor verdere reacties.
snb,

Wat ik probeer te zeggen is dat ik door op een naam te klikken in de namenlijst in de onderstaande textboxen
de getallen kan aanpassen cq aanvullen en dan door op aanpassen te klikken dat deze getallen dan naar het data blad worden weggeschreven
en ze daar als getal plaatst en niet als tekst.

De cmd button nieuw gebruik ik om een nieuwe naam toe te voegen met eventueel al bekende waarden voor de textboxen.
Ook deze waarden worden als tekst weggeschreven wat dus niet wenselijk is.

Hoop dat ik hiermee iets duidelijker ben geweest.

ps. taal fouten zullen wel vaker voorkomen en ik hoop dat het je niet te veel stoort.

Presentatie1.jpg
 
Al je cellen in je tabel hebben ooit op tekst gestaan in de eigenschappen.

Zet ergens in een cel een 1.
Kopieer die 1.
Selecteer je tabel en kies met de rechtermuisknop voor plakken speciaal.
Kies voor vermenigvuldigen.
Ga terug naar de cel met de 1 en druk delete.

Druk Ctrl+H en zet in het vak 'zoeken naar' een 0 (nul)
Het vak 'vervangen door' laat je leeg en druk op 'Alles vervangen'.
 
Beste HSV,

Uw oplossing werkt voor zover ik geen nieuwe waardes toevoeg.
Op het moment dat ik na uw oplossing heb toegepast opnieuw waardes toevoeg door middel van een textbox en dan op aanpassen klik veranderd de vorige waardes op de zelfde rij weer in tekst.
 
Wat er in een Textbox staat is exact wat het object type al aangeeft, Tekst.
De inhoud ervan zal je moeten converteren naar het gewenste datatype.
Dus, die "1234,55" is tekst en moet bij het schrijven naar een cel worden geconverteerd naar een getal met cijfers achter de komma.
Een Double dus: Range("A1") = CDbl(Textbox1.Text)

Afhankelijk van instellingen moet eventueel de komma eerst worden vervangen door een punt:
Range("A1") = CDbl(Replace(Textbox1.Text, ",", "."))
 
Laatst bewerkt:
Dank aan allen die mij hier met raad hebben gesteund.
Probleem opgelost.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan