Suppression du contenu d'une cellule si une autre est remplie
K
Bonjour,
Dans le fichier ci-joint, j'aimerais trouver une VBA qui supprime le contenu de la cellule AY si AW est pleine, et inversément.
J'ai bien trouver ça:
<Sub Macro1()
Range("AY7").Select
Selection.ClearContents
End Sub>
Mais je n'arrive pas à integrer une fonction à condition
Ce fichier doit être exporté via un add-in et lorsque je l'envoie, il me met en disant que la valeur (importée par VBA) est incorrecte en AY. Lorsque je me mets sur la cellule et que j'appuie sur "Suppr", le add-in exporte bien le fichier.
Je vous remercie par avance de l'aide que vous voudrez bien m'apporter.
Cordialement
Dans le fichier ci-joint, j'aimerais trouver une VBA qui supprime le contenu de la cellule AY si AW est pleine, et inversément.
J'ai bien trouver ça:
<Sub Macro1()
Range("AY7").Select
Selection.ClearContents
End Sub>
Mais je n'arrive pas à integrer une fonction à condition
Ce fichier doit être exporté via un add-in et lorsque je l'envoie, il me met en disant que la valeur (importée par VBA) est incorrecte en AY. Lorsque je me mets sur la cellule et que j'appuie sur "Suppr", le add-in exporte bien le fichier.
Je vous remercie par avance de l'aide que vous voudrez bien m'apporter.
Cordialement
Il faut fixer une priorité au cas ou les deux cellules auraient un contenu.
Exemple :
Priorité AY :
If Range("AY7").Value <> "" then
Range("AW7").Value = ""
end ifPriorité AW :
If Range("AW7").Value <> "" then
Range("AY7").Value = ""
end if