Sujet Précédent Sujet Suivant

Problème de séparateur des milliers vba

Résolu/Fermé
LANGAZOU Messages postés 95 Date d'inscription vendredi 16 janvier 2015 Statut Membre Dernière intervention 8 novembre 2015 - 26 janv. 2015 à 21:37
LANGAZOU Messages postés 95 Date d'inscription vendredi 16 janvier 2015 Statut Membre Dernière intervention 8 novembre 2015 - 28 janv. 2015 à 12:45
Bonjour,

je veux que lorsque je tape des montants dans mes textbox, ils affichent le séparateur des milliers au fur et à mesure.

Merci pour votre réponse

2 réponses

Réponse 1 / 2
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
27 janv. 2015 à 13:40
Bonjour,

Voici un exemple à adapter: 

Option Explicit
Private Sub TextBox1_Change()
Dim Valeur As Byte
TextBox1.MaxLength = 10 'nb caracteres maxi dans textbox
Valeur = Len(TextBox1)
If Valeur = 3 Or Valeur = 7 Then TextBox1 = TextBox1 & "," 'a adapter "," ou "."
End Sub
'valeurs numériques uniquement
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Not IsNumeric(Chr(KeyAscii)) And Not Chr(KeyAscii) = ":" Then KeyAscii = 0
End Sub





 

 

                
                

    
        

    
            
        0
                                
                
    

            



    

        
        
    


        

        

                    

    

        

                    

            

        

        
        
        

                        Réponse 2 / 2
        


                    
                    

                

        

                    

        
            
    
    

            

    


            

                

        
                    LANGAZOU
    
        
                    Messages postés
            
                
            95
                
                            Date d'inscription
            vendredi 16 janvier 2015
                            Statut
            Membre
                            Dernière intervention
             8 novembre 2015
            

                    

                    28 janv. 2015 à 12:45
                        

    


    

                        

                    Merci beaucoup ;)
                
                

    
        

    
            
        0
                                
                
    

            



    

        
        
    


        

        

                    

    

        

                    

            

        

    



    
Discussions similaires

                                                    

                
                    WORD Séparateur de milliers champs fusionné
                    

                        
    
    

            

    


                        

                                                                                    bibike -  

                            
                                                                                    Shaaa - 
                        

                    

                    

                    

                        13 réponses
                    

                
            

                                                        

                
                    "L'indice n'appartient à la sélection" + VBA
                    

                        
    
    

            

    


                        

                                                                                    fleur.31 -  

                            
                                                                                    geosevda - 
                        

                    

                    

                    

                        2 réponses
                    

                
            

                                                        

                
                    Erreur d'exécution 13 Incompatibilité de type
                    

                        
    
    

            

    


                        

                                                                                    grace -  

                            
                                                                                    pijaku - 
                        

                    

                    

                    

                        5 réponses
                    

                
            

                                                        

                
                    VBA : Range avec références variables..
                    

                        
    
    

            

    


                        

                                                                                    Antoine -  

                            
                                                                                    MIKE59 - 
                        

                    

                    

                    

                        7 réponses
                    

                
            

                                                        

                
                    VBA erreur 1004
                    

                        
    
    

            

    


                        

                                                                                    séverine -  

                            
                                                                                    Floroan - 
                        

                    

                    

                    

                        9 réponses