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 !

wajih_Excel

XLDnaute Occasionnel
Salut Forum

J'ai besoin d'une petite formule

j'ai des chiffres sous cette forme

10°49'12,71
10°46'2,25
9°46'2,25

Je veux les degrés dans une colonne les minutes dans une autres et le reste dans une troisième colonne à part

l'idéal c'est de trouver une formule qui prend tout les chiffres avant ° et '

J'ai essayé avec la fonction convertir et ça pas donnée une bonne résultat pcq les chiffres ne sont pas de la même format

Merci d'avance
 
Re : petite Formule

Bonjour,

Essaye avec :

avec 10°49'12,71 en A1,

en B1 :

Code:
=GAUCHE(A1;TROUVE("°";A1)-1)*1

en C1 :

Code:
=STXT(A1;TROUVE("°";A1)+1;TROUVE("'";A1)-TROUVE("°";A1)-1)*1

en D1 :

Code:
=STXT(A1;TROUVE("'";A1)+1;99)*1

En fonction du séparateur décimal utilisé, il faudra peut-être ajouter la fonction SUBSTITUE à cette dernière formule pour remplacer la , par un .

Je te laisse tester

@+
 
Re : petite Formule

Bonjour wajih_Excel

Sélectionnez les données et exécutez la procédure :
Code:
[COLOR="DarkSlateGray"][B]Sub toto()
    Selection.TextToColumns Destination:=Selection, DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
        :="°", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True
    Selection.Offset(, 1).TextToColumns Destination:=Selection.Offset(, 1), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
        :="'", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True
End Sub[/B][/COLOR]
ROGER2327
#3254
 
Re : petite Formule

Bonjour à tous
Effectivement, un petit nettoyage raccourcit la chose.
Merci JCGL.

Méfiance tout de même : les paramètres de conversion ne sont pas automatiquement réinitialisés. Si des conversions ont été faites avec des paramètres différents de ceux de la version courte, on peut avoir des surprises. C'est pourquoi je préfère décider du contrôle des paramètres.​
ROGER2327
#3257
 
Re : petite Formule

Bonjour à tous,

Quoique ! Juste pour étoffer la discussion, il est possible pour ce problème d'utiliser la fonction "convertir" avec les options :
- type de fichier : délimité
- séparateurs : autre °
et dans un 2è temps : autre '

A+
 
- 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
7
Affichages
684
  • Question Question
Microsoft 365 Formule
Réponses
3
Affichages
196
Réponses
23
Affichages
668
Réponses
10
Affichages
428
Retour