maval XLDnaute Barbatruc 5 Mai 2013 #1 Bonjour, Je suis à la recherche du code pour mettre le résultat entre parenthèse dans un label. J'ai mis mon comme ceci : Code: Public Sub TextBox5_change() Label24.Caption = Trim(TextBox5.Text) Label24.Caption = Format(Label24.Value, "()") End Sub Message d'erreur? Je vous remercie d'avance et vous souhaite une bonne journée Cordialement Max Dernière édition: 5 Mai 2013
Bonjour, Je suis à la recherche du code pour mettre le résultat entre parenthèse dans un label. J'ai mis mon comme ceci : Code: Public Sub TextBox5_change() Label24.Caption = Trim(TextBox5.Text) Label24.Caption = Format(Label24.Value, "()") End Sub Message d'erreur? Je vous remercie d'avance et vous souhaite une bonne journée Cordialement Max
JCGL XLDnaute Barbatruc 5 Mai 2013 #2 Re : Format Label Bonjour à tous, Peux-tu essayer : Label24.Caption = "(" & Label24.Value & ")" Cliquez pour agrandir... A+ à tous Vote positif 0 Vote négatif
Re : Format Label Bonjour à tous, Peux-tu essayer : Label24.Caption = "(" & Label24.Value & ")" Cliquez pour agrandir... A+ à tous
maval XLDnaute Barbatruc 5 Mai 2013 #3 Re : Format Label Bonjour JC, Merci d'avoir répondu. J'ai un message d'erreur "Membre de méthode ou de données introuvable" Je joint mon fichier Bonne journée @+ Max Pièces jointes Format label.xlsm 17.8 KB · Affichages: 33 Format label.xlsm 17.8 KB · Affichages: 39 Format label.xlsm 17.8 KB · Affichages: 38 Vote positif 0 Vote négatif
Re : Format Label Bonjour JC, Merci d'avoir répondu. J'ai un message d'erreur "Membre de méthode ou de données introuvable" Je joint mon fichier Bonne journée @+ Max
maval XLDnaute Barbatruc 5 Mai 2013 #4 Re : Format Label Re, C'est bon j'ai trouvé j'ai changer "Value par Caption" Code: Label24.Caption = "(" & Label24.Caption & ")" Merci bonne journée Max Vote positif 0 Vote négatif
Re : Format Label Re, C'est bon j'ai trouvé j'ai changer "Value par Caption" Code: Label24.Caption = "(" & Label24.Caption & ")" Merci bonne journée Max
maval XLDnaute Barbatruc 5 Mai 2013 #5 Re : Format Label Bonjour Jean-Marcel, Oui sa fonctionne et le code et plus court que le mien ! Bonne journée @+ Max Vote positif 0 Vote négatif
Re : Format Label Bonjour Jean-Marcel, Oui sa fonctionne et le code et plus court que le mien ! Bonne journée @+ Max
G Guest Guest 5 Mai 2013 #6 Re : Format Label Bonjour, Hello mon JC, Salut Jean-Marcel Si ton textBox ne contient QUE des chiffres ou un nombre décimal tu peux le faire avec FORMAT: Code: Label24.Caption = Format(Replace(Trim(TextBox5.Text), ",", "."), "(#)") La fonction Replace, remplace la Virgule décimale par un Point (séparateur décimal de VBA) A+ Vote positif 0 Vote négatif
Re : Format Label Bonjour, Hello mon JC, Salut Jean-Marcel Si ton textBox ne contient QUE des chiffres ou un nombre décimal tu peux le faire avec FORMAT: Code: Label24.Caption = Format(Replace(Trim(TextBox5.Text), ",", "."), "(#)") La fonction Replace, remplace la Virgule décimale par un Point (séparateur décimal de VBA) A+
maval XLDnaute Barbatruc 5 Mai 2013 #7 Re : Format Label Bonjour Hasco, Je confirme mon label & TextBox ne contient que des chiffres. Je te remercie et te souhaite une bonne journée. @+ Max Vote positif 0 Vote négatif
Re : Format Label Bonjour Hasco, Je confirme mon label & TextBox ne contient que des chiffres. Je te remercie et te souhaite une bonne journée. @+ Max