Extraction de donnée dans Excel

Degrenoble Messages postés 37 Statut Membre -  
Mike-31 Messages postés 19571 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
j'ai récu des données d'un logiciel. L'extraction étant faite dans excel, je n'arrive pas à effectuer de calcul avec ces données ( #valeur!).
donc impossible de faire des calculs avec ces donnée)
A voir également:

8 réponses

Réponse 1 / 8
Mike-31 Messages postés 19571 Date d'inscription   Statut Contributeur Dernière intervention   5 139
 
Salut,

Ce rapport ( #valeur!) indique qu'il y a une erreur ou qu'une cellule rentrant dans le calcul d'une formule est vide ou contient du texte en t’autre.

Pour pouvoir te répondre, il serait bien que l’on puisse avoir ton fichier s’il ne contient pas de données confidentielles avec ce lien

https://www.cjoint.com/

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)
0
Réponse 2 / 8
Degrenoble Messages postés 37 Statut Membre
 
j'ai crée le lien
https://www.cjoint.com/?gdp5e7ice4
0
Réponse 3 / 8
Mike-31 Messages postés 19571 Date d'inscription   Statut Contributeur Dernière intervention   5 139
 
Re,

Regardes tes formules, =+B2+C2 retires le + entre le = et B2

Ensuite supprimes les intervalles devant et entre les séries de chiffres ----29--735 ici symbolisé par les tirets de sorte à avoir 29735

Pour avoir les séparateurs de milliers mets ta plage de chiffre en surbrillance et Format/Cellule/Nombre/Nombre coches utiliser les séparateurs de milliers, si tu soutes avoir des décimales sélectionnes 2 ou 0 si tu souhaites avoir des chiffres sans décimales

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)
0
Réponse 4 / 8
Degrenoble Messages postés 37 Statut Membre
 
merci bcp.
mais je cherche une astuce qui permettrait d'appliqué sur les chiffre de sorte a ce que ces chiffres puissent être facilement utilisable dans excel, a ce qu'on puisse effectuer des calculs avec ses chiffre
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 8
Mike-31 Messages postés 19571 Date d'inscription   Statut Contributeur Dernière intervention   5 139
 
Re,

Je ne comprends pas ta question,
pour commencer ton problème initial ( #valeur!) est il résolu ! parce qu'avec les séparateurs comme ils étaient, Excel les considérait comme du texte donc inutilisable pour des calcul.

Que veux tu dire par cherche une astuce qui permettrait d'appliqué sur les chiffre
A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)
0
Réponse 6 / 8
Degrenoble Messages postés 37 Statut Membre
 
nous savons que les separateurs sont à la base du probléme.
puisque je dispose d'une centaine de ligne dont les chiffres sont séparé. quelle astuce ou procedure pouvons nous appliquée à l'ensemble de la plage qui contient les chiffre a probléme.
Ta méthode que tu ma transmise, jpense qu'il faut le fait au cas pas sur chanque ligne ??
0
Réponse 7 / 8
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
Bonjour Degrenoble, mike

Sélectionnes les cellules litigieuses (et que les cellules litigieuses) puis déclenche cette macro qui enlèvera tout ce qui n'est pas un chiffre ou une virgule dans les cellules sélectionnées;

nota: les cellules sélectionnées ne sont pas oligatoirement jointives(laisser la touche Ctrl enfoncée pendant la sélection) 

Sub extraire()
    Application.ScreenUpdating = False
    For Each cellule In Selection
        lieu = cellule.Address
        Range(lieu) = extrait_nbre(cellule.Value)
    Next
End Sub


Function extrait_nbre(ByRef texto As String) As Double
    Dim reg As Object
    Dim extraction As Object
    
    Set reg = CreateObject("vbscript.regexp")
    '  travaille sur toute la cellule
    reg.Global = True
    '  définit le modèle (caractères "digitaux" à N chiffres)
    reg.Pattern = "(\d?\d?\d)|(,)"
    ' éxécute l'extraction svt modèle (collection des digits...)
    Set extraction = reg.Execute(texto)
    ' concaténète les membres de la collection "extraction"
    For Each digit In extraction
        extrait_nbre = extrait_nbre & (digit.Value)
    Next digit
    Set extraction = Nothing
    Set reg = Nothing
End Function
0
Réponse 8 / 8
Mike-31 Messages postés 19571 Date d'inscription   Statut Contributeur Dernière intervention   5 139
 
Coucou me revoilà,

Merci Michej_m d'avoir pris le relai, belle macro.

une proposition avec des formules en pièces jointes

https://www.cjoint.com/?gdwqBBG4ma

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)
0