Copier mot surligné dans un combobox
Fermé
geogeo75
-
2 nov. 2011 à 11:49
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 15 mars 2023 - 3 nov. 2011 à 15:15
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 15 mars 2023 - 3 nov. 2011 à 15:15
A voir également:
- Copier mot surligné dans un combobox
- Ce programme est écrit en python. il construit un mot secret dans une variable mais il ne l'affiche pas. modifiez-le pour qu'il affiche le mot secret. exécutez-le. quel est ce mot secret ? ✓ - Forum Python
- Dans le texte, un seul mot a réellement été écrit en lettres capitales (majuscules). quel est ce mot ? ✓ - Forum Word
- Mot de passe administrateur freebox ✓ - Forum Freebox
- Piratage facebook changer mot de passe - Guide
- Mettre un mot de passe sur un dossier - Guide
1 réponse
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
15 mars 2023
2 712
Modifié par pijaku le 2/11/2011 à 14:47
Modifié par pijaku le 2/11/2011 à 14:47
Bonjour,
Il me semble que la fonction Val("ma1chin") renvoie un nombre contenu dans une chaîne de caractère...
Essaye sans, comme ceci :
Cordialement,
Franck P
Il me semble que la fonction Val("ma1chin") renvoie un nombre contenu dans une chaîne de caractère...
Essaye sans, comme ceci :
Private Sub liste_produit_vendu_Change()
Sheets("Produits").Range("G4").Value = Me.liste_produit_vendu.Value
End Sub
Cordialement,
Franck P
3 nov. 2011 à 14:48
Du coup j'ai une autre question. J'ai une text box dans laquelle je souhaite taper un nouveau montant de TVA.
Et j'aimerais que ce montant s'affiche en pourcentage (pour ne pas tomber sur un utilisateur qui me mettrait 20 au lieu de 20%...)
As-tu une idée?
J'ai regardé des codes mais ça en marche pas.
Private Sub Nouvelle_TVA_Change()
'affichage'
Nouvelle_TVA.Value = Format(Nouvelle_TVA.Value, "0.00%")
'récupération de la valeur'
Nouvelle_TVA.Value = Replace(Nouvelle_TVA.Value, "%", "")
Nouvelle_TVA.Value = Replace(Nouvelle_TVA.Value, " ", "")
Nouvelle_TVA.Value = Replace(Nouvelle_TVA.Value, ",", ".")
Nouvelle_TVA.Value = Val(Nouvelle_TVA.Value)
End Sub
Avec ce code rien ne s'affiche dans ma text box Nouvelle_TVA. Idem si je mets Nouvelle_TVA.Value= Format (Pourcent)
...
3 nov. 2011 à 14:56
C'est le problème quand tu laisses la saisie à un utilisateur... Tu ne peux rien y faire. Certains vont t'écrire 20, d'autres 20,00% (avec virgule), d'autres 20.00% (avec point), d'autres 20%, et les plus forts écriront : "moi"...
Dans le cas qui nous intéresse, il s'agit de montants de TVA, donc quelque chose de fixe (même s'ils évoluent...) mais que tu souhaites pouvoir modifier...
Pour cela, je te recommande l'utilisation, non pas d'un textbox, mais d'une combobox ou listbox, qui permettront de faire un choix et non pas de saisir.
En gros, c'est toi, par un code qui va leur indiquer les seules valeurs que les utilisateurs peuvent indiquer.
Dis moi...
3 nov. 2011 à 15:14
Merci beaucoup!!
3 nov. 2011 à 15:15
A+