Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Problème de . et , en version française

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion stabilo2
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
S

stabilo2

Guest
Bonjour,

Je tourne une version française d'Excel.
Les décimales sont donc affichée après le caractère "," (virgule).
J'utilise une fenêtre pop-up dans lesquelles j'ai un TextBox et je copie la valeur trouvée dans le TextBox dans une cellule de la feuille de calcul.

Je suis obligé d'utiliser le caractère "." (point) pour entrer des nombres décimaux dans la TextBox, et ceux-ci sont écrits avec le caractère "," (virgule) lorsque je les copie dans la feuille Excel.
Si j'utilise le caratère "," dans la TextBox, seuls la composante entière de ma valeur est considérée.

Je copie les valeurs ainsi:
ActiveSheet.Cells(1,1) = val(MyForm.MyTextBox.Value)

Je voudrais modifier ma TextBox ou mon code pour rester consistent et pouvoir utiliser le caractère "," (virgule) dans les nombres décimaux de ma TextBox.

Je ne vois pas comment faire.
Merci d'avance.
 
Trier par date Trier par votes
Re : Problème de . et , en version française

Bonjour stabilo2,

Je te propose ceci, si j'ai bien compris ta demande :

Code: 
Range("A1") = CDbl(TextBox2)
Pour l'enregistrement dans ta feuille.
Et

Code: 
Private Sub TextBox2_Change()
TextBox2 = Replace(TextBox2, ".", ",")
End Sub
Cela te permet de continuer à utiliser le point quand tu saisis tes chiffres. Mais c'est la virgule qui sera affichée dans le TextBox.

A+
 
Vote positif 0 Vote négatif
Re : Problème de . et , en version française

Bonjour Stabilo, Bqtr et le forum,
Voilà un bout de code merveilleux c'est pas de moi c'est de Robert ou Chti160 je ne sais plus mais, en tout état de cause c'est la solution à ton problème
bonne soirée à Tous
Papou


Private Sub TxtB_textbox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 46 Then KeyAscii = 44 'remplace le point par la virgule
End Sub
 
Vote positif 0 Vote négatif
Re : Problème de . et , en version française

Bonsoir Bqtr,

Utiliser CDbl(TextBox) à la place de val(TextBox) résoud un des deux problèmes.

La substitution de "." par "," va poser problème si la macro est exécutée sur un Excel Anglais.
Dans ce cas la susbstitution ne devrait pas être exécutée.

Problème seulement partiellement résolu, donc.
Merci quand même.
 
Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Re : Problème de . et , en version française

Problème résolu:

Il suffit simplement de faire:
MyForm.MyTextBox.Value= ActiveSheet.Cells(1,1)

au lieu de
MyForm.MyTextBox.Value= str(ActiveSheet.Cells(1,1))
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

D
  • Résolu(e)
XL 2019 Problème de décimales
Réponses
9
Affichages
361
Danyk01
D
P
  • Résolu(e)
XL 2021 commission sur vente pour Excel version française
Réponses
6
Affichages
378
Plans24
P
E
  • Résolu(e)
XL 2019 Problème de somme en vba
Réponses
7
Affichages
392
Electronull
E
  • Résolu(e)
XL 2019 Problème de copie de plages non contiguës vers une autre feuille en VBA
Réponses
9
Affichages
448
flc13090
G
  • Question Question
XL 2016 Extraire des données d'un pdf et les copier dans excel
2
Réponses
19
Affichages
3 K
kiki29
S
  • Résolu(e)
Microsoft 365 Mailing mise en forme HTML : revenir à la ligne automatique si trop de texte saisie
2
Réponses
17
Affichages
1 K
spike29
S
  • Résolu(e)
XL 2010 Masque de saisie textbox Téléphone Public
Réponses
8
Affichages
1 K
cathodique
A
  • Question Question
Autres Problème de compatibilité Excel 97-2003
Réponses
4
Affichages
580
crocrocro
C
  • Résolu(e)
Autres Tests de diverses solution pour lister dans un dialog perso des fichiers en filtrant par expression et extension
10 11 12
Réponses
175
Affichages
23 K
patricktoulon
G
  • Question Question
XL 2016 VBA - Gestion de l'affichage et des rafraîchissement avec l'instruction Freezepanes = false
Réponses
4
Affichages
693
Greedyyy3317
G
G
  • Question Question
XL 2013 Problème de priorité dans une formule de SI et STXT imbriquée
Réponses
8
Affichages
586
Gmndrt
G
L
  • Résolu(e)
Microsoft 365 Problèmes dates et calcul de CA
Réponses
8
Affichages
613
Louloulou4
L
F
  • Question Question
Microsoft 365 Concaténation et mise en forme de données
Réponses
3
Affichages
751
Fab117
F
A
  • Question Question
Microsoft 365 Fichier de statistique et roulement
Réponses
0
Affichages
595
Aurel’Byylieve
A
R
  • Résolu(e)
XL 2016 Somme par année en fonction d'une date de début et de fin
Réponses
4
Affichages
936
remyexcel
R
K
  • Question Question
XL 2010 Résolu - Problème avec la fonction "Remplacer" XL2010
2
Réponses
25
Affichages
2 K
Krishnaya
K
E
  • Résolu(e)
Microsoft 365 Problème d'organisation des colonnes dans une ListBox en VBA Excel
Réponses
2
Affichages
1 K
eCHO
E
M
  • Question Question
XL 2013 Macros avec prise en compte décimal
Réponses
2
Affichages
642
michigan
M
Z
  • Résolu(e)
Microsoft 365 Problème de combinaison entre fonctions "If Then Else" et "SelectCase"
Réponses
11
Affichages
932
Zonmé
Z
L
  • Question Question
XL 2019 Conserver la mise en forme texte (couleur /remplissage) lors de la saisie en userform
Réponses
4
Affichages
2 K
lusert
L
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…