MFC selon le format de la cellule Résolu

Question

Bonjour à tous, 
Sous Excel 2010,
avec toute la colonne B,
qui contient des coordonnées GPS au format DMS (Degrés Minutes Secondes),
de la forme : 000°? 00'00" - 00°? 00'00"
> "0" pour n'importe quel chiffre
> "?" pour N, S, E ou W
> espace après chaque "?"
> espace avant et après le tiret "-"
J'aimerais faire une mise en forme conditionnelle,
sans vba,
pour faire ressortir toutes les cellules qui ne correspondent pas à ce 'masque de saisi'.
Est-ce possible ?
merci
Configuration: Windows / Firefox 51.0

gbinforme · Answer

Bonjour,
Je ne pense pas qu'il existe un contrôle natif de cet ordre et donc il me semble qu'il te faut contrôler toute ta cellule par formule.
Je t'ai commencé la formule pour les 5 premiers caractères, à toi de continuer.
=ET(A1<>"";NON(ET(ESTNUM(CNUM(STXT(A1;1;3)));STXT(A1;4;1)="°";NON(ESTERR(TROUVE(STXT(A1;5;1);"NSEW"))))))
Saisi ta formule sur une cellule cela sera plus facile et ensuite tu la colles dans la MFC.

Ipalgo · Answer

Rappel du format : 000°? 00'00" - 00°? 00'00"

Aide n° position : 12345678901234567890123456

STXT -> permet d’extraire une chaîne de caractères d’une longueur donnée (cellule ; n° caractère de départ en partant de la gauche ; nombre de caractère(s) à prélever)

CNUM -> convertis en nombre une chaine de caractères

ESTNUM -> renvoie VRAI si c’est un numéro, FAUX autrement

ET -> détermine si toutes les conditions dans un test ont la valeur VRAI

NON -> permet d’inverser la valeur logique NON(VRAI)=FAUX

TROUVE -> renvoie la position de départ d’une chaîne de caractère

ESTERR -> renvoie VRAI si l’argument valeur fait référence à une valeur d’erreur, à l’exception de #N/A

Merci @gbinforme pour cette bonne piste.

Voici comment je pensais compléter pour faire ce que je recherche :

=ET(A1<>"";NON(ET(ESTNUM(CNUM(STXT(A1;1;3)));STXT(A1;4;1)="°";NON(ESTERR(TROUVE(STXT(A1;5;1);"NSEW")));ESTNUM(CNUM(STXT(A1;7;2)));STXT(A1;9;1)="’";ESTNUM(CNUM(STXT(A1;10;2)));STXT(A1;12;1)="”";STXT(A1;14;1)="-";ESTNUM(CNUM(STXT(A1;16;2)));STXT(A1;18;1)="°";NON(ESTERR(TROUVE(STXT(A1;19;1);"NSEW")));ESTNUM(CNUM(STXT(A1;21;2)));STXT(A1;23;1)="’";ESTNUM(CNUM(STXT(A1;24;2)));STXT(A1;26;1)="”")))

mais ça ne marche pas..

Modif n°1 avec correction des guillemets Word (minutes secondes) en guillemets Excel :

=ET(A1<>"";NON(ET(ESTNUM(CNUM(STXT(A1;1;3)));STXT(A1;4;1)="°";NON(ESTERR(TROUVE(STXT(A1;5;1);"NSEW")));ESTNUM(CNUM(STXT(A1;7;2)));STXT(A1;9;1)="'";ESTNUM(CNUM(STXT(A1;10;2)));STXT(A1;12;1)=""";STXT(A1;14;1)="-";ESTNUM(CNUM(STXT(A1;16;2)));STXT(A1;18;1)="°";NON(ESTERR(TROUVE(STXT(A1;19;1);"NSEW")));ESTNUM(CNUM(STXT(A1;21;2)));STXT(A1;23;1)="'";ESTNUM(CNUM(STXT(A1;24;2)));STXT(A1;26;1)=""")))

Toujours pas.. Hum..

Ipalgo · Answer

j'ajoute l'image word que j'ai utilisé pour comprendre :

Vaucluse · Answer

Bonjour
et salut GB
peut être un peu plus simple, mais de toutes façons, c'est assez longuet
1°) pour alléger un peu entrez dans une cellule le type tel qu'il est écrit dans votre 1° message
soit pour l'exemple en H1:

000°? 00'00" - 00°? 00'00

la formule de MFC:
=$H$1<>SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;1;"0");2;"0");3;"0");4;"0");5;"0");6;"0");7;"0");8;"0");9;"0");"N";"?");"E";"?");"S";"?");"O";"?")

(avec les 0 entre guillemets)

si vous ne voulez pas entrer en H1 remplacer le dans la formule par:

"000°? 00'00" - 00°? 00'00"<>SUBSTITUE(.....)

crdlmnt

Ps: voila ce que ça donne avec quelques exemples de A1 à A10
https://mon-partage.fr/f/KMXRFnVL/

La qualité de la réponse dépend surtout de la clarté de la question, merci!

Ipalgo · Answer

[Résolu]
MERCI à vous deux pour la solution.
Tout fonctionne parfaitement !
J'ai aussi besoin que la cellule soit coloriée en rouge si elle est vide alors j'ai enlevé le premier test :
A1<>"";
et c'est OK.
Bonne soirée, et merci à CCM aussi.

MFC selon le format de la cellule

5 réponses

Discussions similaires

Newsletters