X
xavier
Guest
salut @ tous
j'utilise 2 textbox pour calculer à l'aide de formule (dont je ne suis pas très sur) un pourcentage qui devrait s'afficher dans un 3ème textbox.
Private Sub TextBox15_Exit(ByVal cancel As MSForms.ReturnBoolean)
Worksheets("capacité").Select
If Range("E19").Value = "" And Range("F19").Value = "" Then
GoTo fin
Else
TextBox17.Value = (Range("F19").Value - Range("E19").Value) / Range("E19").Value
End If
fin:
End Sub
Private Sub TextBox16_exit(ByVal cancel As MSForms.ReturnBoolean)
Worksheets("capacité").Select
If Range("E19").Value = "" And Range("F19").Value = "" Then
GoTo fin
Else
TextBox17.Value = (Range("F19").Value - Range("E19").Value) / Range("E19").Value
End If
fin:
End Sub
Private Sub UserForm_Activate()
TextBox17.Value = (Worksheets("capacité").Range("F19").Value - Worksheets("capacité").Range("E19")) / Worksheets("capacité").Range("E19")
end sub
mais voila mon problème! le résultat s'affiche bien sur ma feuille excel mais pas correctement dans le 3ème textbox. il affiche un résultat mais pas au format %.
question 1 commen faire pour que le résultat s'affiche correctement et
question 2 comment afficher le format % dans un textbox (par exemple je veux définir une quotité de travail ainsi dans mon textbox je veux noter 100%).
merci d'avance
xavier
j'utilise 2 textbox pour calculer à l'aide de formule (dont je ne suis pas très sur) un pourcentage qui devrait s'afficher dans un 3ème textbox.
Private Sub TextBox15_Exit(ByVal cancel As MSForms.ReturnBoolean)
Worksheets("capacité").Select
If Range("E19").Value = "" And Range("F19").Value = "" Then
GoTo fin
Else
TextBox17.Value = (Range("F19").Value - Range("E19").Value) / Range("E19").Value
End If
fin:
End Sub
Private Sub TextBox16_exit(ByVal cancel As MSForms.ReturnBoolean)
Worksheets("capacité").Select
If Range("E19").Value = "" And Range("F19").Value = "" Then
GoTo fin
Else
TextBox17.Value = (Range("F19").Value - Range("E19").Value) / Range("E19").Value
End If
fin:
End Sub
Private Sub UserForm_Activate()
TextBox17.Value = (Worksheets("capacité").Range("F19").Value - Worksheets("capacité").Range("E19")) / Worksheets("capacité").Range("E19")
end sub
mais voila mon problème! le résultat s'affiche bien sur ma feuille excel mais pas correctement dans le 3ème textbox. il affiche un résultat mais pas au format %.
question 1 commen faire pour que le résultat s'affiche correctement et
question 2 comment afficher le format % dans un textbox (par exemple je veux définir une quotité de travail ainsi dans mon textbox je veux noter 100%).
merci d'avance
xavier