Tester une plage de cellule sur un format

Hervé

XLDnaute Barbatruc

• 1 Décembre 2005

• #2

Bonjour ludo

J'ai rien compris à ta demande, mais si tu veux retrouver le format d'une cellule, regarde la propriété numberformat.

salut

 

Vote positif 0 Vote négatif

C

Creepy

XLDnaute Accro

• 1 Décembre 2005

• #3

Bonjour le Forum, Ludo

Et voila défi relevé (PAs trop dur ! lol)

Sub Est_Numeric()

For Each Cell In Range('A1:G1')
    If Len(Cell.Value) = 4 And IsNumeric(Cell.Value) Then
        MsgBox Cell
    End If
Next

End Sub

Cliquez pour agrandir...

Kikoo Hervé !!! Ba alors on a un peu de mal aujourd'hui

Allez, @+

Creepy

 

Vote positif 0 Vote négatif

L

Ludo

Guest

• 1 Décembre 2005

• #4

OK merci bien...


J'aurais espérais pouvoir le faire par formule, ne sachant pas me servir des procédures VBA... mais ça va me forcerà apprendre :silly:

Ludo

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 1 Décembre 2005

• #5

re ludo, salut creepy

creepy

comme ludo, parlait de défi, j'ai pensé que c'etait plus compliqué que ca.

Bon creepy, peut etre que je suis pas rapide à la comprenette, mais moi je déclare mes variables :whistle:

Trop facile celle-ci.

salut

 

Vote positif 0 Vote négatif

L

Ludo

Guest

• 1 Décembre 2005

• #6

Merci messieurs,

mais je viens de m'en sortir par un tour de passe passe avec la formule toute bête :

=SI(ESTERREUR(EQUIV('~0???';H9:BO9;0))=VRAI;'';EQUIV('~0???';H9:BO9;0))

Désolé de vous avoir dérangé pour ça !


Ludo

 

Vote positif 0 Vote négatif