Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

intégrer macrocommande

J

jean-yves

Guest
j'ai créé en vba une macro commande qui fait appel à la valeur cible;
je voudrais intégrer cette macro commande dans une foncion écrite en vba;
je n'y arrive pas, est ce possible?, comment faire ? Merci d'avance
 
J

jy

Guest
j'ai une fonction itérative un peu compliquée ; pour simplifier:
Function diff(y) diff = 5*y^4 + 3y^3 -5y^2 End Function
cette valeur diff est située en i13 et y en k14;et je veux résoudre diff=0
Pour cela je fais appel à la valeur cible : la macro est la suivante:
Sub.diffnul()
Sheets("feuil1").Range("I13").Goalseek Goal:=0,ChangingCell:=Sheets("Feuil1").Range(K14")
End Sub
Tout cela fonctionne ,mais l'inconvénient c'est d'appeler la sub diffnul par un bouton ou la barre de macro .Est il possible que la macro s'execute automatiquement dans la foulée de la fonction diff(y)? J'ai essayé de réecrire la macro à l'intérieur de la fonction , ou par Call ; mais cela ne fonctionne pas.
Merci
 
Z

Zon

Guest
Salut,

Pas sûr d'avoir tout compris, mais je pense que tu veux changer les valeurs de ta fonction diffnul, tu modifies donc la cellule I13:
On passe donc par une macro évènementielleà mettre dans le module de ta feuille "Feuil1")
private sub worksheet_change(byval Target as range)
if target.address="$i$13 then diffnul
end sub

A+++
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…