Microsoft 365 Problème de zéro dans une TCD

  • Initiateur de la discussion Initiateur de la discussion PORCHER
  • 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 !

PORCHER

XLDnaute Occasionnel
Bonjour et bonne année,
Tableau croisé dynamique Certaines (sommes de) valeurs s'affichent en 0
En faisant ceci ;
VB:
Range("F2:G" & Range("F65536").End(xlUp).Row).Select
For Each c In Selection
        If c.Value <> 0 Then
            c.Value = CDbl(c)
            c.NumberFormat = "#,##0.00"
            c.Replace ",", "."
        End If
    Next c
Certaines sommes de valeurs passe a 1973,00 au lieu de 19.73
pourriez-vous m'aider..... Merci
 
Merci Gégé, cela fait deux jours que je suis dessus et pas de résultat
J'ai normalement des chiffres dans ma colonne Débit, feuille " MesComptes" comme 19.73 € ect..
Dans le TCD crée dans la colonne "F" j'ai le Débit
avec c.NumberFormat = "# ##0.00" me donne 1973
avec c.NumberFormat = "#,##0.00" me donne 1973.00

Étiquettes de lignes Somme de Débit
CARREFOUR NEVERS 1973
CEREA 84
ELECLERC 22578.34
INTERMARCHÉ 4453
LIDL_MARZY 22219
PICARD 1499
(vide)
Total général 52806.34
 
Merci Gégé, cela fait deux jours que je suis dessus et pas de résultat
J'ai normalement des chiffres dans ma colonne Débit, feuille " MesComptes" comme 19.73 € ect..
Dans le TCD crée dans la colonne "F" j'ai le Débit
avec c.NumberFormat = "# ##0.00" me donne 1973
avec c.NumberFormat = "#,##0.00" me donne 1973.00

Étiquettes de lignes Somme de Débit
CARREFOUR NEVERS 1973
CEREA 84
ELECLERC 22578.34
INTERMARCHÉ 4453
LIDL_MARZY 22219
PICARD 1499
(vide)
Total général 52806.34
et en utilisant .NumberFormatLocal ?
 
Bonjour à tous
J'ai enfin trouvé la solution à mon problème
La voici :
VB:
 For X = 2 To Range("F" & Rows.Count).End(xlUp).Row
    Range("F" & X) = Replace(Range("F" & X), ".", ",") * 1
  Next X
J'ai du travailler mes neurones et sa marche.
 
- 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

Discussions similaires

Réponses
10
Affichages
443
Retour