decimaal getal in textvak

[Doohan]

Geachte Helper,

Ik wil graag mijn nummerieke toetsenbord gebruiken voor het invullen van een textvak op een formulier waar dus een decimaal getal in komt te staan. Echter word het decimaal getal ingevoerd vanaf het nummerieke bord, gescheiden door een punt.

Als je je nummerieke bord in een cel op een sheet gebruikt word de punt een komma (dit zou ook in het tekstvak moeten gebeuren)

de decimale waarde die ik in het tekstvak invul word na het klikken op een knopje doorgestuurd naar een cel.
Mijn vraag is dus is het mogelijk om met je nummerieke bord in een tekstvak een komma te genereren.

Alvast bedankt.

gr. Martin

 

[gast0660]

Hoi,
Probeer deze

TextBox1 = Replace(TextBox1, ".". ",")

 

[Doohan]

ik dank u

 

[Doohan]

Label vullen op formulier dmv caption

Beste Helper,

ik heb een formulier met meerdere labels waarop dmv caption de labels gevuld worden met info vanuit een cel op een sheet.

dit gebeurt op deze manier

Me.lblO30.Caption = Round(Worksheets("AIRFLOW 1 SET").Range("O30").Value, 0)

Deze code werkt perfect. Er staat ook werkelijk een waarde in cel O30.

echter de code

Me.lblKOU.Caption = Round(Worksheets("AIRFLOW 1 SET").Range("E73").Value, 0)

Werkt niet. Het enige verschil met bovenstaande is dat cel E73 gevuld word dmv vert.zoeken

=VERT.ZOEKEN(koelzoek;koelissendata;2)

in dit geval krijg ik (FOUT 13 , TYPEN KOMEN NIET MET ELKAAR OVEREEN)

Hoe zou ik dit wel werkend kunnen krijgen

 

[Doohan]

oops foutje ff nieuw lijntje maken sorry

 

[gast0660]

Hoi,
Maakt niets uit

FOUT 13 , TYPEN KOMEN NIET MET ELKAAR OVEREEN

zonder vb bestandje is het gewoon koffiedik kijken
Probeer

Me.lblKOU.Caption = Round(Worksheets("AIRFLOW 1 SET").Range("E73").[COLOR="#FF0000"]Text[/COLOR], 0)

Text neemt gewoon de celwaarde, Value kijkt iets dieper.