convertion d´un texte en valeur numerique

convertion d´un texte en valeur numerique - VB/VBA/VBS - Programmation

Marsh Posté le 23-05-2006 à 13:37:50    

je lance une userform avec deux zones de texte et un bouton OK.
 
lorsque je clic sur ok, J´inscit les valeurs dans deux cellules de ma feuille graph, voivi la programmation.
 
Private Sub CommandButton1_Click()
 
Sheets("GRAPHS" ).Select
 Range("C3" ).Select
    ActiveCell.FormulaR1C1 = TextBox1
        Range("D3" ).Select
    ActiveCell.FormulaR1C1 = TextBox3
        Range("D3" ).Select
Module3.Macro1
UserForm6.Hide
 
End Sub
 
 
le probleme est que ces cellules sont des reference pour des graphiques, donc il me faut des valeurs numeriques, et par default mes textbox ont un format texte, incomrehensible par mes graphiques, j´ai vu que dans VBA je pouvais utiliser une fonction VAL, qui consiste à convertir le texte en valeur numérique, mais le est problème que je n´ai pas compri comment le mettre en forme dans mon programme.  
 

Reply

Marsh Posté le 23-05-2006 à 13:37:50   

Reply

Marsh Posté le 26-05-2006 à 16:51:03    

As-tu essayé tout simplement :
ActiveCell.Value = Val(TextBox1.Text)
?

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed