Appliquer formule en modifiant une autre celulle

[Chrys]

Bonjour à tous,

Tout d'abord désolé pour ce titre qui ne veut rien dire, mais impossible d'expliquer ce que je veux faire en quelques mots.

(Et tout de suite je me rend compte que ce n'est pas plus simple avec plus de mot ^^ )

Alors,

Je souhaiterais que lorsque je modifie la valeur d'une cellule dans la colonne A, une formule s'adapte en colonne I.

Je m'explique, cette formule est deja mise dans mes cellules en colonne I, mais l'utilisation de ce tableur implique de temps en temps l'apparition d'une liste déroulante en I, de ce fait ma formule "saute" pour laisser place au choix de la liste.
Mais après effacage d'une cellule en colonne A, la I reste sur ce choix et je perd donc la formule que j'y avais mise.
Je pense que ça doit etre assez simple en VBA, mais je ne maitrise pas du tout.

A noter que celà doit etre effectif à partir de la ligne 23, disons A23:A50000.

Merci d'avance pour votre aide

Chrys

 

[Kevin B]

Re : Appliquer formule en modifiant une autre celulle

Bonjour,

Est ce que tu as un fichier d'exemple stp

Merci

Kevin

 

[Chrys]

Re : Appliquer formule en modifiant une autre celulle

Bonjour Kévin,

Merci de prendre le temps de te pencher sur mon problème.

Voici un petit fichier mal fini mais juste pour essayer d'etre plus clair.

Sur ce fichier ma ref "789" est en doublon, donc ca me cale une liste deroulante. (Dans mon fichier original tout se cale bien une fois le fournisseur choisis, pas sur l'exemple).
Une fois le fournisseur choisis, la formule s'efface, normal.
Je voudrais que si je remodifie la ref en A9, la formule en C9 redeviennent comme ses soeurs du dessus, recherchev.....

Merci encore

Chrys

 

[Kevin B]

Re : Appliquer formule en modifiant une autre celulle

Bonjour Chrys,

J'ai essayé de regarder, je ne trouve pas de solution à votre problème pour le moment.
Je prendrais plus de temps ce soir afin de trouver une solution.

Peut-être peux tu me donner plus d'informations concernant le besoin afin de faire autrement?

Cdt

Kevin

 

[Chrys]

Re : Appliquer formule en modifiant une autre celulle

Hello Kévin,
Bonjour le forum,

En fait j'ai tourné le probleme avec beaucoup de complexité.

Pour faire plus simple, peut on ecrire un code qui :

Lorsque je rentre une donnée en A23, calcule l'equivalent de "" SI(N23=1;S23;R23) "" en I23 en VBA, sans entre de formule en I

Cela doit toujours etre effectif de A23 à A50000, ou toute colonne A si c'est plus simple.

Merci encore

 

[Kevin B]

Re : Appliquer formule en modifiant une autre celulle

Chrys,

Essaye de copier ceci dans l'éditeur VBA :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

For x = 23 To 50000

If Cells(x, 14) = 1 Then

Cells(x, 9) = Cells(x, 19)

Else

Cells(x, 9) = Cells(x, 17)

End If

Next x


End Sub

Dit moi si sa fonctionne.

Kevin

 

[Chrys]

Re : Appliquer formule en modifiant une autre celulle

Bonjour Kevin,

Aucune réaction

(Je me suis permis de remplacer le 17 par 18 (pour R) mais pas plus de reaction.

Merci pour ton aide en tout cas.