j'ai une erreure: nbre stocké sous forme de texte

L

L.Patrick

Guest
Bonjour, lorsque je saisie mes informations clients, celles ci sont placées sur ma feuille excel, mais le format des cellules que j'ai utilisé n'est pas pris en compte comme pour les numéro de sécu, j'ai une erreure comme cela: (nombre stocké sous forme de texte), dois je le spécifier dans vba, et si oui comment. Merci d'avance. Patrick

Private Sub CmdCancel_Click()
Unload UserForm1
End Sub

Private Sub CmdOK_Click()
Sheets("Liste").Select
ActiveSheet.[DEB].Select
Selection.End(xlDown).Select
If Selection.Address = "$A$65536" Then
Range("DEB").Offset(1, 0).Select
Else
Selection.Offset(1, 0).Select
End If
ActiveCell.Value = UserForm1.txtNom
ActiveCell.Offset(0, 1).Value = UserForm1.txtPrenom
ActiveCell.Offset(0, 2).Value = UserForm1.TxtTelDom
ActiveCell.Offset(0, 3).Value = UserForm1.Txtnumader
ActiveCell.Offset(0, 4).Value = UserForm1.Txtnumsecu
ActiveCell.Offset(0, 5).Value = UserForm1.Txtprof
ActiveCell.Offset(0, 6).Value = UserForm1.Txtadress
ActiveCell.Offset(0, 7).Value = UserForm1.Txtpostal
ActiveCell.Offset(0, 8).Value = UserForm1.Txtlocal
'Sheets("Client").Select
'Sheets("Client").Copy
Worksheets("Client").Copy after:=Worksheets("Client")

ActiveSheet.Name = UCase(UserForm1.txtNom) & " " & UserForm1.txtPrenom
ActiveSheet.Range("D5") = UserForm1.txtNom
ActiveSheet.Range("D6") = UserForm1.txtPrenom
ActiveSheet.Range("D13") = UserForm1.TxtTelDom
ActiveSheet.Range("D14") = UserForm1.Txtnumsecu
ActiveSheet.Range("D15") = UserForm1.Txtprof
ActiveSheet.Range("D17") = UserForm1.Txtnumader
ActiveSheet.Range("D9") = UserForm1.Txtadress
ActiveSheet.Range("D10") = UserForm1.Txtpostal
ActiveSheet.Range("D11") = UserForm1.Txtlocal
Unload Me
End Sub
 
V

vincent

Guest
bonsoir

je ne suis pas sur de tout avoir compris.Voilà cependant une solution qui me semble convenir partout ou tu as des données qui doivent être des nombre rajoute de val par exemple

ActiveSheet.Range("D10") =val(UserForm1.Txtpostal)

Bonne soirée.

à+Vincent
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 321
Messages
2 087 265
Membres
103 501
dernier inscrit
talebafia