Sujet Précédent Sujet Suivant

Extraire nombre de cellules

Résolu/Fermé
lopaq90 Messages postés 7 Date d'inscription mardi 16 février 2016 Statut Membre Dernière intervention 18 février 2016 - 16 févr. 2016 à 15:18
Heas Messages postés 71 Date d'inscription samedi 21 novembre 2015 Statut Membre Dernière intervention 3 juillet 2018 - 19 févr. 2016 à 18:20
Bonjour,
Voici un exemple de donnée que j'ai:

8,50 euros par heure
10-15€
12€/h
10€/heure
9-10€/h
Cela depend du service, en moyenne 12€/h
15euros de l'heure
15 de l'heure
11euro/heure
13/h + frais déplacement
15€/heure
8h de l'heure

Comment pourrais-je extraire seulement les montant pour en faire des stats??

Merci
A voir également:

6 réponses

Réponse 1 / 6
Gouril Messages postés 3697 Date d'inscription samedi 29 octobre 2005 Statut Contributeur Dernière intervention 2 février 2017 539
16 févr. 2016 à 15:27
Bonjour,
Avec des formules et des heures au format [h]
0
lopaq90 Messages postés 7 Date d'inscription mardi 16 février 2016 Statut Membre Dernière intervention 18 février 2016
16 févr. 2016 à 18:17
Merci de ta réponse mais je ne comprend pas ce que tu veux dire...
0
Réponse 2 / 6
Heas Messages postés 71 Date d'inscription samedi 21 novembre 2015 Statut Membre Dernière intervention 3 juillet 2018 5
16 févr. 2016 à 18:20
Bonjour,
les données sont comme dans l'exemple?
C'est-à-dire ce sont des phrases contenant des nombres?
0
lopaq90 Messages postés 7 Date d'inscription mardi 16 février 2016 Statut Membre Dernière intervention 18 février 2016
16 févr. 2016 à 18:23
oui oui exactement comme dans l'exemple
0
Réponse 3 / 6
Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 31
16 févr. 2016 à 18:30
Le code suivant extrait tous les caractères numériques et les met à la suite en B : 

Sub test()

Dim DernLigne As Long
DernLigne = Range("A" & Rows.Count).End(xlUp).Row

For i = 1 To DernLigne

Dim DernCar As Long
DernCar = Len(Range("A" & i).Value)

For j = 1 To DernCar

If IsNumeric(Mid(Range("A" & i).Value, j, 1)) Then
Range("B" & i).Value = Range("B" & i).Value & Mid(Range("A" & i).Value, j, 1)
End If

Next j
Next i

End Sub
0
lopaq90 Messages postés 7 Date d'inscription mardi 16 février 2016 Statut Membre Dernière intervention 18 février 2016
16 févr. 2016 à 18:37
Merci, j'essaye ca demain à la première heure
0
Réponse 4 / 6
Heas Messages postés 71 Date d'inscription samedi 21 novembre 2015 Statut Membre Dernière intervention 3 juillet 2018 5
16 févr. 2016 à 18:32
Alors deux remarques :
1) Pour faire des stats, il est conseillé d'organiser l'information. Dans cet exemple, il n'y a pas d'organisation...
2) Comme l'information n'est pas organisée, cela va devenir rapidement compliqué.

Alors il est possible d'utiliser "Rechercher" Pour trouver un chiffre
A partir du moment où un chiffre est trouvé, de rechercher un nombre, mais ce ne sera pas simple.....

Plus de détails?
0
lopaq90 Messages postés 7 Date d'inscription mardi 16 février 2016 Statut Membre Dernière intervention 18 février 2016
16 févr. 2016 à 18:36
Ce n'est pas organisé parce que ce sont des réponses à un sondage.
J'aimerai donc extraire tous les chiffres pour voir le max, la moyennes,... que les gens sont prêt à payer. Je n'ai pas besoin de chercher un chiffre en particulier mais bien tous.
0
Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 31
16 févr. 2016 à 18:37
Essayez mon code, il marchera pourvu que vous n'ayez pas plusieurs nombres dans une même cellule de la colonne A
0
lopaq90 Messages postés 7 Date d'inscription mardi 16 février 2016 Statut Membre Dernière intervention 18 février 2016 > Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016
18 févr. 2016 à 11:25
Merci pour ton code mais malheureusement les données sont dans la colonne B... désolé, j'aurais du préciser
0
Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 31
16 févr. 2016 à 18:41
Autre solution : passez par plusieurs Recherche/Remplacer pour uniformiser les parties texte d'une part et les parties numériques d'autre part.
Par exemple remplacez tous les "heures" "heure" et autres par "h", idem pour euros
Ensuite, vous remplacez par un vide les mots de liaison ("et", "de", "-", "en moyenne", etc.)
Bref vous y allez à tatons, c'est le prix à payer quand on a des données sources non cadrées (pour avoir fait bcp de questionnaires quantitatifs je sais à quel point il est important de restreindre la forme des réponses possibles :s)

bonne continuation
0

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

Posez votre question
Réponse 5 / 6
Heas Messages postés 71 Date d'inscription samedi 21 novembre 2015 Statut Membre Dernière intervention 3 juillet 2018 5
16 févr. 2016 à 19:03
Bonjour,
je parlais d'un chiffre parce que dans les exemples cités il y a des nombres à un ou plusieurs chiffres.

D'autre part, un post parle d'un code; Cela a-t-il résolu le problème?
Sinon, je peux vous proposer une méthode...
0
lopaq90 Messages postés 7 Date d'inscription mardi 16 février 2016 Statut Membre Dernière intervention 18 février 2016
18 févr. 2016 à 11:27
Je veux bien ta méthode s'il te plait car je ne suis pas expert en excel et j'ai du mal avec vba.

Merci
0
Réponse 6 / 6
Heas Messages postés 71 Date d'inscription samedi 21 novembre 2015 Statut Membre Dernière intervention 3 juillet 2018 5
19 févr. 2016 à 18:20
Bonjour,
tu as essayé la méthode décrite dans la macro?
0

Discussions similaires

Snapchat locked : mon compte snapchat est bloqué
amelie-2 -
Beratilhan -

51 réponses
Cellules en surbrillance selon une TextBox
Wyrgle -
jordane45 -

1 réponse
Accès a Snapchat temporairement désactivé
Nz0_5123 -
Yeboua -

4 réponses
Extraire le contenu de plusieurs fichiers
politicus -
Syl_tls1 -

11 réponses