Super.

Merci vraiment à tous, car en un weekend j'ai fait un pas de géant.
C'est la première fois que je viens sur ce forum et soyez assurés que je reviendrai avec d'autres questions.

Je vous recommande dès aujourd'hui à d'autres.

Très bien.

Effectivement ce qui est évident pour moi ne l'est pas forcément pour autrui !!!!

C'est pour cela que j'ai joins mon fichier "offre-test3.zip" qui contient les différents paramètres éventuels à utiliser.

Ce qui n'est qu'un exemple car la solution est ok, mais le cas de paramètres nombreux peut aussi se rencontrer. Et dans ce cas comment faire ?

Merci par avance si vous avez une idée...

Merci

J'ai donc appliqué cette compréhension....

Donc je souhaite joindre un fichier plus complet avec les zones qui ont un fond en couleur sont celles qui sont ok, les autres sont en développement. Bien Attention la feuille SAISIE en fin de compte se nomme "BP1.".

Imaginons que J'ai plusieurs désignations concernées par la fonction STX, il s'agira d'imbriquer et dans ce cas suis-je limité ??

OK super merci.

J'ai donc appliqué cette compréhension.

Donc je souhaite joindre un fichier plus complet avec les zones qui ont un fond en couleur sont celles qui sont ok, les autres sont en développement. Bien Attention la feuille SAISIE en fin de compte se nomme "BP1.".

Imaginons que J'ai plusieurs désignations concernées par la fonction STX, il s'agira d'imbriquer et dans ce cas suis-je limité ??

Très bien.

Alors en fin de compte ce que je pensais être très compliqué à écrire en code est beaucoup plus simple.

Ta solution me convient bien et m'évite d'aller écrire de VBA.

Mais je souhaite bien comprendre STXT(A2;1;9)

- Poutre IC 40x75 est en STXT(A2;1;9)=> OK
- Mais la position (A2;1;9) c'est où ?
- Et pourquoi 9 caractères alors qu'il y en a plus (A2;1;9)  ?

Là compréhension de cette super fonction m'échappe. D'autres part comment fait-elle pour trouver sa correspondance dans la feuille BD ?

Je suis donc intrigué !!!

Merci Jean-Marie.

Ouais merci pour ta réactivité, je viens juste de tomber sur ce site aujourd'hui et j'avance bien merci encore.

Donc effectivement la fonction SI marche et fait exactement ce que je souhaite.

Ce qui m'ennuie dans cette fonction, c'est qu'apparemment il faut lui indiquer la plage de départ (A2;1;9).

ligne 1 à ligne 9, mais cela peut être très variable.

=SI(STXT(A2;1;9)="Poutre IC";STXT(A2;TROUVE("x";A2;1)+1;10);SAISIE!E2)

je ne sais pas ce qu'est le STX et où ce code va lire ? mais sans cela c'est ça effectivement.

OK Jean-Marie.

La complexité de la tâche j'en conviens, c'est que dans la feuille DEVIS chaque cellule est liée à sa semblable dans SAISIE.

Mon but est comme dans l'exemple du fichier joint, de pouvoir malgré ce lien écrire la condition en macro VBA (ce que j'ai commencé à faire en adaptant un bout de code), un peu comme une forme conditionnelle, mais sans casser la liaison. Alors est-ce que vraiment c'est possible ou pas ?

Est-ce que que je peux faire un worksheet_change sur la feuille saisie qui mettra la valeur dans la feuille devis, et créer une séquence dans worksheet_change de la feuille devis qui remet la valeur de la feuille saisie dans la colonne E, si celle-ci devient vide ?

Et sinon comment faire ?

Il est vrai que c'est un vrai défi et je patine...

Je veux bien te passer plus d"éléments, mais de quoi aurais-tu besoin ?

Merci pour ta réactivité.

Mais je ne vois pas bien comment utiliser dans mon code ta solution.

Parce que la liste de correspondance et d'articles est très longue et je n'ai mis dans mon exemple que peu de lignes.

Si tu m'expliques mieux ta solution, la fonction SI est-elle limité par un certain nombre de cas ?

Bonjour à tous.

Voilà une application de DEVIS.

J’ai 3 feuilles dans mon classeur pour cette situation
‘’BD ‘’
‘’SAISIE’’
‘’DEVIS’’
Dans ma feuille de saisie je vais chercher les articles par une menu déroulant (validation de données liste) => Menu Formule/Définir un nom => fonction DECLALER dans la gestion des noms.
C’a pour la désignation des produits. Pour mon exemple il s’agit d’une poutre. Par la fonction RECHERCHEV j’affiche dans les colonnes suivantes la largeur / la hauteur / le poids etc…
Bon voilà pour le principe.


Ma feuille DEVIS contient par liaison relative une copie conforme de ma feuille de SAISIE. Pourquoi parce que dans la feuille DEVIS il s’y trouve des calculs complexes et dans la feuille DEVIS les derniers calculs commerciaux. Bon c’est comme cela que bosse la boîte dans laquelle je viens d’arriver.

Mon but je prends un exemple
Col A Col B Col C Col D Col E
Désignation   Type    Largeur   x    Hauteur
  Poutre IC      40x75     IC 40    x     75

Bon et bien dans ma feuille SAISIE la hauteur qui sert à calculer le volume du produit est une valeur du fait de sa géométrie.
Poutre IC 40x75 IC 40 x 45.4 (ce sera la valeur à changer dans la feuille DEVIS)

Et c’est dans ma feuille de DEVIS que je dois faire la conversion

Poutre IC 40x75 IC 40 x 75

Mais sans casser le lien relatif pour des questions de manipulations des opérateurs car sans cela il faudrait refaire toute la structure de ce soft et ce n’est pas au programme, donc je souhaite l’améliorer et le rendre plus souple.

Voici un code que j'ai adapté:

 
Private Sub Worksheet_Change(ByVal Target As Range)
'Dim Note As Integer 'on va s'en passer, on fera directement appelle a Target.value il est la pour ça
Dim Mention As String
 
'On vérifie que target correspond bien a une des cellules que l'on souhaite contrôler
'Je suppose que tout les nom des élèves sont en colonne A et les note en B, ca donne donc
If Not Intersect(Target, Range("A:A")) Is Nothing Then    'rempalce le B par la colonne qui contient les notes
    'B:B represente toute la colonne
    'Note = Target
 
    Select Case Target.Value

        Case "Poutre IC 40x75": Mention = "75"
        Case "Poutre IC 40x80": Mention = "80"
        Case "Poutre IC 40x95": Mention = "95"
        Case "Poutre IC 40x100": Mention = "100"
        Case "Poutre IC 40x105": Mention = "105"
        Case "Poutre IC 40x110": Mention = "110"
        Case "Poutre IC 40x115": Mention = "115"
        Case "Poutre IC 40x120": Mention = "120"
        Case "Poutre IC 40x125": Mention = "125"
        Case "Poutre IC 40x130": Mention = "130"
        Case "Poutre IC 40x145": Mention = "145"
        Case "Poutre IC 40x150": Mention = "150"
 
        
    End Select
 
    'Cells(Target.Row, 3) = Mention  'remplace le 3 par le numéro de colonne que tu veux
    'ici on va utiliser la notion d'offset, qui permet de décaler la celui "pointé" de y lignes et de x colonne,
    'y positif on descend, négatif... on remonte dans le tableau
    'x >0 on va vers la droite, x<0 on va vers la gauche
    'dans les 2 cas attention de ne pas sortir du tableau excel ;)
    
    'On va également éviter de re-déclencher Change (vu que l'on modifie une cellule OnChange se déclenche
    'Il ne faudra pas le faire si la modif de la cellule en colonne B doit exécuter du code dans l'événement Change
    
    On Error Resume Next 'si une erreur survient on passe qd même a la ligne suivante, jefais ca pour eviter de rester avec EnableEvent a false
    Application.EnableEvents = False 'Excel ne déclenchera plus de code événementiel
    Target.Offset(0, 5).Value = Mention 'la cellule immédiatement a coté de la notre prend la valeur contenu dans Mention
    Application.EnableEvents = True 'Excel recommence a gerer l'événementiel
    On Error GoTo 0 ' si des erreur surviennent a partir de maintenant excel nous avertira (comme avant le resume next - c'est par défaut)
    
End If
End Sub
 

En d'autres termes....

Ce que je veux après qu'il y ait eu les saisies dans la feuille SAISIE, c'est que dans la feuille DEVIS (qui est en quelque sorte une feuille de mise en forme devant servir à être imprimée et envoyée au client) si la colonne E trouve en colonne A la désignation Poutre IC 40x75 donc que sur la même ligne en colonne E (malgré qu'il y ait une liaison relative à la feuille de SAISIE) qu'elle prenne la main et indique la valeur 75 et non 45.4 résultant de la liaison donc la véritable hauteur de la poutre. Et cela bien sûr sans intervention manuelle.

En quelque sorte c'est une condition que je veux écrire derrière la liaison et la recopie vers le bas des liaisons.

Ouf, pas facile à expliquer comme cela... je vous joins un fichier exemple.

Est-ce la bonne méthode ?? Merci vous serez super....

Lagratte