fonction SI: rien faire si faux

[CAPUCIN]

Salut a tous, je me demande s'il est possible avec la fonction SI de ne rien faire si la condition est fausse (ne pas alterer le contenu de la cellule sur laquel on applique la formule).
Voici un petit fichier.

[Banzai64]

Bonjour

Oui et non
Si le résultat vient d'une autre cellule Oui

Code: Tout sélectionner

=SI(LC(1)="";"";LC(8))

Si le résultat est la même cellule Non

Code: Tout sélectionner

=SI(LC(1)="";"";LC)

référence circulaire

Sinon il faut passer par VBA

[CAPUCIN]

Salut Banzai , juste un petit mot pour dire que mon application fonctionne maintenant au complet. J'ai donc ajouter ton code VBA a mes macro et ca fonctionne tres bien, 8 secondes pour traiter 1200 lignes de code assembleur. Il me reste qu'a faire un menage et mettre le tout plus "clean" a l'ecran.

Pour ma question, il semblerais que c'est une formule circulaire, car j'ai essaye et j'ai un message d'erreur. Est-ce que mettre cette formule dans la cellule par VBA fera en sorte que ce ne soit pas circulaire?
Et si par vba, je sauvegarde temporairement le contenu de la cellule, je pourrais prendre sont contenu pour mettre dans la cellule si c'est faux ?

[Banzai64]

Bonjour

Est-ce que mettre cette formule dans la cellule par VBA fera en sorte que ce ne soit pas circulaire?

Même chose que tu l'écrives manuellement ou par VBA tu auras toujours ta référence circulaire

Et si par vba, je sauvegarde temporairement le contenu de la cellule, je pourrais prendre sont contenu pour mettre dans la cellule si c'est faux ?

C'est la réponse que je t'avais donnée

Si le résultat vient d'une autre cellule Oui

Alors que tu sauves la colonne B par VBA et que t'en serve pour ta formule est une possibilité
donc ta formule en colonne B serait 'exemple)

Code: Tout sélectionner

=SI(LC(1)="";"";LC(8))

[CAPUCIN]

j'ai fabrique la formule suivante:

Code: Tout sélectionner

Range("B2:B" & Z).Formula = "=IF(RC3="","",RC11)"

mais j'ai une erreur de syntaxe car dans mes cellules la formule qui apparait est :IF(LC3="";LC11) . Les virgules et les guillemets sont-il bons?

[Banzai64]

Bonsoir

Manque des guillemets

Code: Tout sélectionner

Range("B2:B" & Z).Formula = "=IF(RC3="""","""",RC11)"

Pour mettre 1 guillemet dans une formule (chaîne) il faut doubler ce guillemet

[CAPUCIN]

Ca fonctionne tres bien!

Crois-tu qu'on pourrais modifier la macro de l'autre jour pour qu'elle puisse s'affecter a la ligne active au lieu de toutes les lignes du tableau. Cette option me permettrais de voir si j'ai une erreur de syntaxe en ecrivant du code dans la colonne 9 de la ligne active.

Note que la macro de l'autre jour reste la principale de mon application, simplement que cette nouvelle macro permettrais une option pratique pour mon application.

Clique sur mon bouton rouge pour voir le resultat de ta macro de l'autre jour!

[Banzai64]

Bonsoir

A voir

[CAPUCIN]

Je ne vois pas de difference avec la macro precedente, mise a part la MFC. Lorsque je clique sur le bouton ce n'est pas que la ligne active qui est mise a jour mais tout le tableau. A moins que la procedure soit differente?

[Banzai64]

Bonsoir
Si tu ne vois pas de différence c'est que je n'ai pas compris ce que tu veux faire

Crois-tu qu'on pourrais modifier la macro de l'autre jour pour qu'elle puisse s'affecter a la ligne active au lieu de toutes les lignes du tableau. Cette option me permettrais de voir si j'ai une erreur de syntaxe en ecrivant du code dans la colonne 9 de la ligne active.

Pour moi j'avais compris que tu cherchais un moyen de signaler le fait qu'une instruction n'avait pu être décodée (la raison de la MEFC)

Donc il faut que tu m'expliques (1 ou 2 exemples seraient les bienvenus)