Suppression séparateur Millier

Bonjour

Quand je fais le bilan annuel de mon club de pétanque je copie un état de Money vers excel afin de faire des tableaux.....

il se trouve que excel me met un ? comme séparateur de millier lors de la copie. Quand j'en avais +- 20 ligne à corriger je les corrigé manuellement.

Cette année j'ai +- 4000 lignes et je ne veux pas les corriger une / une.

j'ai chercher sur le net une fonction ou du VBA mais je ne trouve rien de concluant.

Serait il possible de faire un bout de BVA pour supprimer le ? .

Ci joint un fichier ou j'ai un exemple.

Merci d'avance pour vos réponses

Philippe

bonjour philippe87,

avec ceci

=SUBSTITUE(SUBSTITUE(A3;"?";"");".";",")+0

oubien

Sub M_Remplacer()
       Dim C   As Range, C1, S

       On Error Resume Next
       Set C = Sheets("Feuil1").Range("A1:A1000").SpecialCells(xlConstants)
       On Error GoTo 0

       If Not C Is Nothing Then
              For Each C1 In C.Cells
                     S = C1.Value2
                     If InStr(1, C1.Value2, "?") > 0 Then
                            C1.Value = Val(Replace(S, "?", ""))
                     End If
              Next
       End If
End Sub

Bonjour

la fonction VALEURNOMBRE est faite pour cela

=VALEURNOMBRE(A2;".";"?")

Sinon avec CTRL+H, "~?" par rien puis "." par ","

le ~ est nécessaire car sinon vous remplacez tous les caractères (? = joker)

image

Stéphane

Salut Philippe87

Quand je fais le bilan annuel de mon club de pétanque je copie un état de Money vers excel afin de faire des tableaux.....

Je me permets d'intervenir pour quelque chose qui m'a choqué
Vous arriver toujours à utiliser "Money" l'application de Microsoft !?

Ou est-ce une autre application...

A+

Rechercher des sujets similaires à "suppression separateur millier"