Autres comment actualiser une fonction sur mon code VBA

intibeh · 26 Avril 2021

Salut le forum,

J'ai fait un fichier de calcul avec plusieurs feuilles. Toutes mes formules sont sous vba.
Le problème c'est que quand je modifie une valeur de la feuilles excel , les cellules en dépendant ne se modifie pas malheureusement Il faut que je clique sur la cellule et que revalide la formule avec l'icone "entrer"

J'ai essayer d'utiliser la fonction .volatile mais malheureusement ca affiche des erreurs .de même pour les fonction .calculate et refresh all
aidez moi svp

A bientôt,

sylvanu · 26 Avril 2021

Bonjour Intibeh,
Auriez vous un fichier test ?
Car habituellement "Application.volatile" ne provoque pas d'erreur.

soan · 26 Avril 2021

Bonjour intibeh, sylvanu,

bienvenue sur le site XLD !

regarde cette option :

soan

Dranreb · 26 Avril 2021

Bonjour.
La seule manière correcte de concevoir une fonction personnalisée c'est de lui transmettre en arguments tous ses antécédents sans exception !

intibeh · 27 Avril 2021

Merci beaucoup pour votre aide .mais malheureusement ca marche pas . Voici un fichier test (j'ai pas mis aucune des fonctions d'actualisation . vous pouvez les mettre pour mieux comprendre le fichier )
Bien Amicalement

sylvanu · 27 Avril 2021

Bonjour Intibeh, le fil,
Dans la PJ j'ai mis une liste déroulante et votre fonction, et ça marche.
On choisit l'acte et la fonction se recalcule.

Je n'ai pas essayé de comprendre votre fichier, mais uniquement tester votre fonction sans rien modifier.

Ceci dit votre fonction se simplifierais beaucoup par l'utilisation de Select Case.

intibeh · 27 Avril 2021

Bonjour , merci Sylvan , mais ma fonction est ="nv_val_cl" Normalement lorsque je modifie la cellule D7 de "formulaire " , la cellule U 7 de ANPE change directement ,. mais ce n'est pas le cas .

Dranreb · 27 Avril 2021

Bonjour.
Votre Function nv_val_cl n'a pas d'argument prévu. Donc rien ne peut permettre à Excel de détecter la nécessité de la réévaluer.

sylvanu · 27 Avril 2021

Celle là m'avait échappé.

@intibeh,
Remplacez par : Function nv_val_cl(ligne%) As Variant
et supprimer la ligne ligne = ActiveCell.Row
et vous passez en formule : =nv_val_cl(Ligne())

Autres comment actualiser une fonction sur mon code VBA

intibeh

XLDnaute Nouveau

sylvanu

XLDnaute Barbatruc

soan

XLDnaute Barbatruc

Dranreb

XLDnaute Barbatruc

intibeh

XLDnaute Nouveau

Pièces jointes

sylvanu

XLDnaute Barbatruc

Pièces jointes

intibeh

XLDnaute Nouveau

Dranreb

XLDnaute Barbatruc

sylvanu

XLDnaute Barbatruc

Discussions similaires