Bonjour le forum,
Dans le cadre de mon projet, j'ai besoin d'avoir des données chiffrées utilisables. L'utilisateur à l'aide d'une InputBox saisit le montant lié au contrat.
Vous pourrez voir dans le code que je me suis assuré que la variable TTC soit bien un nombre.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Private Sub T_Add_TBM_Change() If T_Add_TBM.Text <> "" Then T_Add_TBTTC.Visible = True T_Add_LBTTC.Visible = True Do TTC = InputBox("Veuillez saisir le montant TTC associé - Syntaxe : 23,23") Loop While Not IsNumeric(TTC) T_Add_TBTTC.Text = TTC End If End Sub
Le problème survient ici, ou du moins lors de l'affichage Excel. En effet, dans la cellule cette dernière est inscrite en tant que Texte.
Code : Sélectionner tout - Visualiser dans une fenêtre à part .Cells(LR, 23) = Format(T_Add_TBTTC.Value, " #,##0.00")
Sauriez-vous m'expliquer d'où vient le problème ? Me serai-je trompé dans la syntaxe ?
Bonne journée à vous,
Révèr
Partager