Boite de dialogue, réduire visuellement le champ de saisie

Bonjour,

Dans le vba ci-dessous, le champs de saisie pour introduire la variable TAUXANNUEL est visuellement trop grand ; y a t il moyen de réduire sa taille ?

Sub exemple()
Dim tauxannuel As Variant
Dim valeurintro As Variant
valeurintro = InputBox("Taux mensuel ?", "Conversion taux mensuel vers taux annuel") '
If Cancel = True Then
ElseIf valeurintro <> "" Then
tauxannuel = ((1 + valeurintro / 100) ^ 12 - 1) * 100
MsgBox "Taux mensuel : " & Round(valeurintro, 2) & " % => taux annuel : " & Round(tauxannuel, 3) & " %"
End If
End Sub

Merci d'avance,

Philippe

Bonjour Philippe, bonjour le forum,

Au pire en passant par une UserForm au lieu de l'Inputbox. Là, tu pourras gérer les tailles... Ou alors je n'ai pas tout compris...