Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Vérification des derniers caractères d'une cellule

Vérification des derniers caractères d'une cellule

22 réponses
Avatar
Nito
Bonjour à tous,

En Excel 2000.
Je demeure au Canada où les numéros de téléphone ont 10 chiffres agrémentés
de
2 traits d'union comme l'exemple ci-dessous:

123-456-7890

J'aurais besoin d'une procédure pour vérifier que le format des douze (12)
derniers caractères
d'une cellule correspond au format de la cellule citée en exemple ci-dessus.

Du genre:

if "le format des 12 derniers caractères de ma cellule" = "le format de la
cellule-témoin" then
bla-bla
end if



Une âme charitable aurait-elle une solution?

Merci à l'avance


Nito
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2 3
Avatar
FxM
:o)
:o))

FxM


Ouinnn, j'veux un lave-vaisselle... ;-)

Pierre

"FxM" a écrit dans le message de news:

M'enfin, c'est vrai çà Pierre ! Tu es nul ou quoi ? :o)
Pour punition, tu feras la vaisselle tout seul !

@+
FxM


Ce n'est pas une formule que j'ai besoin, mais d'une procédure.

Merci quand même,

Nito


Merci pour votre aide,

En fait, ce que j'ai besoin, c'est une procédure qui me permette de
vérifier que les 12 derniers caractères de la cellule active forment un
numéro de téléphone
du format 123-456-7890


Restaurant Cabobobod - 417-600-4013
Rôtisserie Coq - 345-300-5098
Catégorie: Restaurants, traiteurs

Dans la plage de 3 cellules ci-dessus, seules les 12 derniers
caractères des cellules 1 et 2 correspondent
à ma condition.

if "le format des 12 derniers caractères de la cellule active" = "le
format des 12 derniers caractères de la
cellule-témoin" then
bla-bla
end if

Merci

Nito





"dre" a écrit dans le message de news:

Salut,

Une MFC ne suffit-elle pas ?
La formule est :
(STXT(A1;4;1)="-")*(STXT(A1;8;1)="-")*(NBCAR(A1)*(ESTNUM(SUBSTITUE(A1;"-";"")*1)))=0

Â+




Bonjour à tous,

En Excel 2000.
Je demeure au Canada où les numéros de téléphone ont 10 chiffres
agrémentés
de
2 traits d'union comme l'exemple ci-dessous:

123-456-7890

J'aurais besoin d'une procédure pour vérifier que le format des douze
(12)
derniers caractères
d'une cellule correspond au format de la cellule citée en exemple
ci-dessus.

Du genre:

if "le format des 12 derniers caractères de ma cellule" = "le
format de la
cellule-témoin" then
bla-bla
end if



Une âme charitable aurait-elle une solution?

Merci à l'avance


Nito


















Avatar
isabelle
Ouinnn, j'veux un lave-vaisselle... ;-)


si t'es trop difficile on va te mettre au repassage des uniformes de la geôle ;-)

isabelle

Avatar
Youky
Ben moi, vu les réponses d'AV ou de ChrisV je ferais mieux de fermer Excel
et changer de truc....
Peut être vais-je me lancer dans le tricot pour me consoler
Youky
"isabelle" a écrit dans le message de news:



Ouinnn, j'veux un lave-vaisselle... ;-)


si t'es trop difficile on va te mettre au repassage des uniformes de la
geôle ;-)

isabelle



Avatar
Pierre Fauconnier
Ouinnnnn, j'veux MA geôlière...

Pierre

"isabelle" a écrit dans le message de news:



Ouinnn, j'veux un lave-vaisselle... ;-)


si t'es trop difficile on va te mettre au repassage des uniformes de la
geôle ;-)

isabelle



Avatar
ChrisV
Peut être vais-je me lancer dans le tricot...


Voilà qui devrait intéresser Flo... :-)


ChrisV


"Youky" a écrit dans le message de news:
OlVg$
Ben moi, vu les réponses d'AV ou de ChrisV je ferais mieux de fermer Excel
et changer de truc....
Peut être vais-je me lancer dans le tricot pour me consoler
Youky
"isabelle" a écrit dans le message de news:



Ouinnn, j'veux un lave-vaisselle... ;-)


si t'es trop difficile on va te mettre au repassage des uniformes de la
geôle ;-)

isabelle







Avatar
Nito
Super ChrisV,

En plein ce que je voulais.
Pour le bénéfice de tout le monde, quelle serait la macro si
les sept derniers caractères de la cellule étaient alphanumériques
du type:
G3B 3V7

Merci à tous,

Nito





"ChrisV" a écrit dans le message de news:
%
Bonjour Nito,

En supposant que la cellule à tester soit la cellule A1 de l'onglet
actif...

Sub zaza()
If Right([A1], 12) Like "###[-]###[-]####" Then MsgBox "Format OK"
End Sub


ChrisV


"Nito" a écrit dans le message de news:
%
Bonjour à tous,

En Excel 2000.
Je demeure au Canada où les numéros de téléphone ont 10 chiffres
agrémentés de
2 traits d'union comme l'exemple ci-dessous:

123-456-7890

J'aurais besoin d'une procédure pour vérifier que le format des douze
(12) derniers caractères
d'une cellule correspond au format de la cellule citée en exemple
ci-dessus.

Du genre:

if "le format des 12 derniers caractères de ma cellule" = "le format de
la cellule-témoin" then
bla-bla
end if



Une âme charitable aurait-elle une solution?

Merci à l'avance


Nito







Avatar
michdenis
'------------------------
Sub zaza()

'3 Syntaxes possibles... Elles sont sensibles à la casse !
'Peu importe le nombre d'espace entre les parenthèses de [( )],
'cela ne compte que pour un espace. Ceci est vrai que pour la
'ligne suivante:
If Right([A1], 7) Like "[A-Z][0-9][A-Z][( )][0-9][A-Z][0-9]" Then MsgBox "Format OK"

If Right([A1], 7) Like "[A-Z][0-9][A-Z]" & " " & "[0-9][A-Z][0-9]" Then MsgBox "Format OK"
If Right([A1], 7) Like "[A-Z][0-9][A-Z]["" ""][0-9][A-Z][0-9]" Then MsgBox "Format OK"

'Pour les rendre insensible à la casse...
If UCase(Right([A1], 7)) Like "[A-Z][0-9][A-Z][( )][0-9][A-Z][0-9]" Then MsgBox "Format OK"
If UCase(Right([A1], 7)) Like "[A-Z][0-9][A-Z]" & " " & "[0-9][A-Z][0-9]" Then MsgBox "Format OK"
If UCase(Right([A1], 7)) Like "[A-Z][0-9][A-Z]["" ""][0-9][A-Z][0-9]" Then MsgBox "Format OK"

End Sub
'------------------------




"Nito" a écrit dans le message de news:

Super ChrisV,

En plein ce que je voulais.
Pour le bénéfice de tout le monde, quelle serait la macro si
les sept derniers caractères de la cellule étaient alphanumériques
du type:
G3B 3V7

Merci à tous,

Nito





"ChrisV" a écrit dans le message de news:
%
Bonjour Nito,

En supposant que la cellule à tester soit la cellule A1 de l'onglet
actif...

Sub zaza()
If Right([A1], 12) Like "###[-]###[-]####" Then MsgBox "Format OK"
End Sub


ChrisV


"Nito" a écrit dans le message de news:
%
Bonjour à tous,

En Excel 2000.
Je demeure au Canada où les numéros de téléphone ont 10 chiffres
agrémentés de
2 traits d'union comme l'exemple ci-dessous:

123-456-7890

J'aurais besoin d'une procédure pour vérifier que le format des douze
(12) derniers caractères
d'une cellule correspond au format de la cellule citée en exemple
ci-dessus.

Du genre:

if "le format des 12 derniers caractères de ma cellule" = "le format de
la cellule-témoin" then
bla-bla
end if



Une âme charitable aurait-elle une solution?

Merci à l'avance


Nito







Avatar
Nito
Rebonjour,

Vous êtes super

Merci


Nito





"michdenis" a écrit dans le message de news:
%
'------------------------
Sub zaza()

'3 Syntaxes possibles... Elles sont sensibles à la casse !
'Peu importe le nombre d'espace entre les parenthèses de [( )],
'cela ne compte que pour un espace. Ceci est vrai que pour la
'ligne suivante:
If Right([A1], 7) Like "[A-Z][0-9][A-Z][( )][0-9][A-Z][0-9]" Then MsgBox
"Format OK"

If Right([A1], 7) Like "[A-Z][0-9][A-Z]" & " " & "[0-9][A-Z][0-9]" Then
MsgBox "Format OK"
If Right([A1], 7) Like "[A-Z][0-9][A-Z]["" ""][0-9][A-Z][0-9]" Then MsgBox
"Format OK"

'Pour les rendre insensible à la casse...
If UCase(Right([A1], 7)) Like "[A-Z][0-9][A-Z][( )][0-9][A-Z][0-9]" Then
MsgBox "Format OK"
If UCase(Right([A1], 7)) Like "[A-Z][0-9][A-Z]" & " " & "[0-9][A-Z][0-9]"
Then MsgBox "Format OK"
If UCase(Right([A1], 7)) Like "[A-Z][0-9][A-Z]["" ""][0-9][A-Z][0-9]" Then
MsgBox "Format OK"

End Sub
'------------------------




"Nito" a écrit dans le message de news:

Super ChrisV,

En plein ce que je voulais.
Pour le bénéfice de tout le monde, quelle serait la macro si
les sept derniers caractères de la cellule étaient alphanumériques
du type:
G3B 3V7

Merci à tous,

Nito





"ChrisV" a écrit dans le message de news:
%
Bonjour Nito,

En supposant que la cellule à tester soit la cellule A1 de l'onglet
actif...

Sub zaza()
If Right([A1], 12) Like "###[-]###[-]####" Then MsgBox "Format OK"
End Sub


ChrisV


"Nito" a écrit dans le message de news:
%
Bonjour à tous,

En Excel 2000.
Je demeure au Canada où les numéros de téléphone ont 10 chiffres
agrémentés de
2 traits d'union comme l'exemple ci-dessous:

123-456-7890

J'aurais besoin d'une procédure pour vérifier que le format des douze
(12) derniers caractères
d'une cellule correspond au format de la cellule citée en exemple
ci-dessus.

Du genre:

if "le format des 12 derniers caractères de ma cellule" = "le format
de
la cellule-témoin" then
bla-bla
end if



Une âme charitable aurait-elle une solution?

Merci à l'avance


Nito












Avatar
AV
Y a pas de quoi

Pfff....
AV
Avatar
michdenis
Il y avait aussi :

Le dièse étant un substitut pour n'importe quel chiffre
If Right([A1], 7) Like "[A-Z]#[A-Z]" & " " & "#[A-Z]#" Then MsgBox "Format OK"

Les crochets permettent de limiter un usage restrictif des caractères énumérés entre ceux-ci.
dans l'exemple, seules les chiffres 1,2,8,9 sont acceptables comme
troisième caractère dans la chaîne de caractère.
If Right([A1], 7) Like "[A-Z][1-2,8-9][A-Z]" & " " & "[0-9][A-Z][0-9]" Then MsgBox "Format OK"





"AV" a écrit dans le message de news:
%
Y a pas de quoi

Pfff....
AV
1 2 3