Discussion :

[4Adjax]

Bonjour,

je cherche à créer un ensemble de macros, et à un moment, j'ai besoin d'ajouter un Long à une valeur qui est entrée via une TextBox.

Le tout simple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cyf = JourD + Me.DurationBox

ne fonctionne pas, ni

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cyf = JourD + Me.DurationBox.Value

Il y a incompatibilité de type. De quel type sont UserForm.TextBox et UserForm.TextBox.Value ?

Comment puis-je faire pour les convertir en Long ?

Merci d'avance pour votre aide,

4A

[tototiti2008]

Bonjour 4Adjax,

UserForm.TextBox.Value est du type texte (String)


Peut-être :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cyf = JourD + CLng(Me.DurationBox)

à condition que le contenu de la Textbox soit interprétable en Long

[4Adjax]

Ca marche bien, sauf quand la boîte est vide, auquel cas, la macro rend une erreur, mais je devrais pouvoir résoudre cela par un test préalable.

Merci beaucoup tototiti2008 !