Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

[KyFranRD]

Bonjour

Je voudrais savoir s'il existe un moyen de déclencher un événement quelconque si une cellule contient le texte
255 + 254 en sachant que normalement cet événement se déclenche si 255 y est présent.

Merci

 

[Misange]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Bonjour,

"en sachant que normalement cet événement se déclenche si 255 y est présent"
ca je ne comprends pas ce que tu veux dire
sinon une macro événementielle lorsque tu remplis la cellule (disons A1 ici)

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("$A$1")) = "truc" Then
        MsgBox "La cellule A1 contient truc !"
    End If
End Sub

 

[frangy]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Bonjour KyFranRD, Misange, le forum,

D’après ce que je crois comprendre, ça pourrait être

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("$A$1")) Like "*255*" Then
        MsgBox "La cellule A1 contient 255 !"
    End If
End Sub

Cordialement.

 

[hoerwind]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Bonjour, salut Misange et frangy,

Ce que je comprends :
Une cellule contient la formule (somme) : =255+254 et affiche donc 509
Comment savoir si la formule contient la valeur 255 (uniquement visible dans la barre de formule) ?

LIRE.CELLULE (macro XL4) permet de lire une formule.
Si un NBCAR de la formule - un NBCAR(SUBSTITUE ... est >0, la formule contient la valeur cherchée.

 

[Misange]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Salut Hoerwind
tu as probablement interprété la question de la bonne façon !

 

[KyFranRD]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Merci à vous tous

En fait je crois m'être mal expliqué. IL n'y a pas de = avant 255 + 254

Ceux sont simplement des n° qui selon leur valeur déclenche un ou plusieurs événements.

Le n° 255 déclenche l'événement nommé BG. Si 2 produits 255 et 254 se trouvent cumulés dans la même saisie; comment faire pour que cet événement se déclenche, malgré ce 254 présent. En sachant que je ne peux pas faire 2 saisies. Une pour 255 et une pour 254.

Voilà j'espère avoir été plus clair.

Je fais un fichier et le joint dès que possible. Demain sans doute.

Merci encore

 

[Jocelyn]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Bonjour le Forum,
Bonjour kyfranRD, Misange, hoerwind,

une formule simple de type :

=SI(ESTNUM(TROUVE(255;A1));ton évènement;"")

devrait aller

Cordialement

Oup's dans les bonjour j'ai oublié Frangy alors bonjour à lui

 

[job75]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Bonjour à tous,

Pas bien clair ce mot "événement", ce n'est pas un terme utilisé pour des formules !

Par ailleurs il faut pouvoir distinguer 255 de 1255 ou 2553, et pour cela il faut qu'il y ait toujours un même séparateur quand il y a plusieurs nombres.

Si par exemple le séparateur est le signe + on utilisera cette formule :

=REPT("PRESENT";ESTNUM(TROUVE("+255+";"+"&SUBSTITUE(A1;" ";)&"+")))

A+

 

[job75]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Re,

La méthode précédente transposée en VBA :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
Dim v
v = 255 'paramétrable
If InStr("+" & Replace(Target, " ", "") & "+", "+" & v & "+") _
  Then MsgBox "Valeur " & v & " présente..."
End Sub

A placer dans le code de la feuille (clic droit sur l'onglet et Visualiser le code).

A+

 

[hoerwind]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Re, salut à ceux que je n'avais pas encore croisé,

Et Misange qui croyait que j'étais plus fin limier que lui !
C'est toujours agréable à entendre, ... mais c'est faux !

Une fois de plus, un petit exemple en pièce jointe est recommandé par la charte, alors pourquoi en faire l’économie ?

Je déduis de la dernière explication que la chaine de caractère est nécessairement du texte.
Donc je partage l'approche de job75 et conseillerai à Jocelyn de revoir sa formule.
Mais je ne suis pas convaincu que le séparateur entre les deux valeurs soit toujours un signe +, pourquoi pas un signe -, ou autre ?

Je préfère ajouter un espace en début en fin de chaine pour en faire : " "&A1&" " et y rechercher " 255 ".
Quant à une éventuelle formule, il faudra d'abord avoir l'explication de "évènement", peut-être est-ce le déclenchement d'une macro ?

 

[Misange]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Re, salut à ceux que je n'avais pas encore croisé,

Et Misange qui croyait que j'étais plus fin limier que lui !
C'est toujours agréable à entendre, ... mais c'est faux !

qu'elle pas que lui 🙂

et sur ce coup là, ni ta boule de cristal ni la mienne n'ont été très performantes...

Une fois de plus, un petit exemple en pièce jointe est recommandé par la charte, alors pourquoi en faire l’économie ?

Je déduis de la dernière explication que la chaine de caractère est nécessairement du texte.
Donc je partage l'approche de job75 et conseillerai à Jocelyn de revoir sa formule.
Mais je ne suis pas convaincu que le séparateur entre les deux valeurs soit toujours un signe +, pourquoi pas un signe -, ou autre ?

Je préfère ajouter un espace en début en fin de chaine pour en faire : " "&A1&" " et y rechercher " 255 ".
Quant à une éventuelle formule, il faudra d'abord avoir l'explication de "évènement", peut-être est-ce le déclenchement d'une macro ?

+1 !

 

[hoerwind]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Re,

Pour Misange : avec toutes mes excuses !
J'avais oublié que tu étais une : =SUBSTITUE("lumière";"u";"i")

 

[Modeste geedee]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Bonsour®

Bonjour à tous,

Pas bien clair ce mot "événement", ce n'est pas un terme utilisé pour des formules !

🙁 il existait via Excel 4 la possibilité de déclencher une action via la formulation :

=SI(a1="255";FONCTION.APPELANTE("winmm.dll";"sndPlaySoundA";"JCJ";"C:temptada.wav";1);"pas de son")
Emettre un son si une cellule contient une valeur : Forum Excel

cette possibilité à depuis été bloquée par microsoft afin d'éviter la possibilité de déclenchement de code malicieux !!!


autre variante de ta proposition :
=SIERREUR(0<>TROUVE("255";A1);FAUX)

 

[hoerwind]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Salut Modeste geedee,

Il me semble que pour 1255 en A1 ta formule en variante renvoie VRAI.
Je lui préfère : =SIERREUR(TROUVE(" 255 ";" "&A1&" ")>0;FAUX)
et uniquement >0, car il n'est pas possible que la fonction TROUVE renvoie une valeur négative.

 

[job75]

Re : Reconnaître par ex:255 dans une cellule si valeur = 255 + 254

Re,

L'intérêt d'utiliser SIERREUR (qui n'existe qu'à partir d'Excel 2007) n'est pas évident...

=ESTNUM(TROUVE(" 255 ";" "&A1&" "))

A+