Somme toujours = à 0

Bonjour,

J'ai passé pas mal de temps en regardant les forums mais je n'arrive toujours pas à additionner les chiffres

dans le fichier joint. ( j'ai essayé ctrl H, changé le format, changé option international, convertir, mais je ne dois

oublier quelque chose).

Quelqu'un pourrait-il m'indiquer si il y arrive et comment il a fait,

En vous remerciant d'avance,

Yuyo

Bonjour

Une idée dans le fichier

Bonjour,

Merci pour le retour rapide,

J' avais déjà essayé cette solution mais, sauf erreur de ma part, la somme continue à 0,

J'ai réessayé cette fois-ci mais rien à faire, somme = 0,

Cordialement,

Yuyo

Bonjour

J'ai une valeur quand je fais la somme

Vérifies si tu n'es pas en calcul manuel dans ton fichier

Sinon plus d'idée en stock

Bonne soirée

Bonjour

En ce qui me concerne, en plus de la manip de Banzai, j'ai remplacé la virgule par le point :

Amicalement

Nad

Bonjour.

Dans ton fichier, la formule suivante donne comme valeur FAUX. Ta valeur n'est donc pas numérique

=ESTNUM(A13)

Une autre formule donne 9 caractères pour ta cellule A13 alors qu'elle devrait en compter seulement 8:

=NBCAR(A13)

Après ces vérification, je me suis aperçu que tu as du mettre un espace pour séparer les milliers:

Au lieu d'écrire 65960,94 ta cellule met 65 960,94

Tu ne peux donc pas faire de somme car tes valeurs ne sont pas numériques. Tu as en théorie juste à enlever tes espaces pour que tes sommes fonctionnent.

Re

Pass-pass a raison également.

Tu as donc 2 ou 3 choses à faire

- Remplacer l'espace par rien

Attention ! Il s'agit d'un espace insécable - Dans RECHERCHER, taper ALT+0160, ne rien mettre dans REMPLACER ==> Remplacer tout.

- Rendre les valeurs numériques en faisant le COLLAGE ==> Spécial ==> Multiplication

- Si besoin, remplacer la virgule par le point.

Nas

Merci à tous,

Malheureusement toujours 0, Banzai quel est la manip pour savoir si je suis en calcul manuel,

peut-être que cela bloque à ce niveau,

Est-ce que sur mon fichier vous avez tous un résultat sur les sommes ?

Dans ce cas il y a un paramètre différent chez moi,

Juste pour comprendre Nad, alt + 0160 est le raccourci de quoi ( caractère spéciaux ? )?

Yuyo

Re

Oui, c'est le code pour l'espace que tu as dans ta colonne. Tu maintiens ALT appuyé et tu tapes 0160

Nad

Bonsoir à tous,

Bonsoir Nad,

pense-tu qu'on puisse mettre ce "alt + 0160" dans une macro ?

et sous quelle forme ?, je pensais à ce type de code (qui ne marche pas dans le cas présent)

Cel = WorksheetFunction.Substitute(Cel, " ", "")

Amicalement

Claude

Bonsoir

Pour savoir si tu es en calcul manuel

Menu Outils ---> Options --> Onglet Calcul

A vérifier si Automatique est sélectionné

Bonne soirée

Bonsoir Claude

Cel = WorksheetFunction.Substitute(Cel, Chr(160), "")

Amicalement

Nad

Bonjour,

Voici un petit fichier avec le tuto dedans... Laisse moi savoir si ça marche !

Bonne soirée

Salut le forum

A supprimer : Erreur

Mytå

re,

Merci Nad,

çà pourrait donc donner

Sub Nombre()
Dim Lg%, Cel As Range
    Lg = Range("a65536").End(xlUp).Row
    Application.ScreenUpdating = False
    Application.CutCopyMode = False
    Columns("b").Insert
        For Each Cel In Range("a12:a" & Lg)
            If Cel <> "" Then
                Cel = Application.Substitute(Cel, Chr(160), "")
                Cel.Offset(0, 1) = "=VALUE(RC[-1])"
                Cel = Cel.Offset(0, 1).Value
            End If
        Next Cel
    Columns("b").Delete
    Range("a11") = "=Sum(a12:a" & Lg & ")"
End Sub

Amicalement

Claude

édit: Bien vu Mytå, je me disais aussi ..!

Salut le forum

Compliquer ton remplacement Claude.

J'aurais plutôt fait

Sub RemplacerCaracteres()
Dim Cell As Range

For Each Cell In Range("A12:A" & Range("A65536").End(xlUp).Row)
  With Cell
    .Value = Replace(.Value, Chr(160), "")
    .Value = .Value * 1
  End With
Next Cell

End Sub

Ou encore on peut utiliser CDec

For Each Cell In Range("A12:A" & Range("A65536").End(xlUp).Row)
  With Cell
    .Value = IIf(.Value <> "", CDec(.Value), "")
  End With

Mytå

Bonjour,

Après vérification et application de tous vos conseils, je suis toujours à 0.

Est-ce que quelqu'un aurait des pistes sur le faite que vous arrivez à faire la somme avec mon fichier

et que chez moi cela ne fonctionne pas?

Pour info, ce tableau est tiré d'une extraction d'une application professionnelle.

En complément : si je saisis des chiffres dans d'autres cellules, aucun problème, si je fais un copier-coller de chaque

cellule dans une autre cellule, la somme fonctionne, parcontre si je fais un copier collé de l'ensemble des cellules dans d'autres cellules, la somme est toujours égale à 0.

Merci d'avance,

Yuyo

Bonjour

Les 2 macros (Claude et Mytå) fonctionnent. Les as-tu essayées?

Dans le fichier

Cordialement

Bonjour,

Sans rentrer dans des considérations informatiques, personnellement ce problème m'arrive quelques fois au travail... je mets ça sous le compte du "délire excellien"... je redémarre mon PC et ça fonctionne ensuite !

A tenter...

Carole

Bonjour,

J'ai tenté le rebootage mais ça n'a jamais fonctionné,

J'ai finalement importé mon fichier en .csv et avec les manips de conversion, et cela a fonctionné,

Je ne sais pas si je trouverais une explication un jour, mais la solution de rechange m'a permis d'avancer,

Merci pour votre aide en tout cas,

Yuyo