Discussion :

[Apranax]

Bonjour.

J'ai crée une Form via laquelle j'entre des donnéees numérique sur une feuille. Quand on appuie sur le bouton valider :
-ces données sont entrées dans la feuille
-une série de formule est attribuée à des cellule de la feuille (moyenne, min ...) grace à formulalocal pour traitrer ces données;

Tout se passe bien. Mais j'ai écris une fonction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 Function RechercheMaxi(NumeroColonne As Integer)
 Maxi = 0
 For i = 3 To 17 Step 1
  If Cells(i, 3 * NumeroColonne - 1).Value = 1 And Cells(i, 3 * NumeroColonne - 2).Value > Maxi Then
   Maxi = Cells(i, 3 * NumeroColonne - 2).Value
  End If
 Next
 If Maxi = 0 Then
  RechercheMaxi = ""
 Else
  RechercheMaxi = Maxi
 End If
End Function

J'attribue également cette fonction à une cellule via formula local. Mais quand je vais sur la feuille, elle ne s'est pas éxécutée automatiquement. If faut que je fasse F9 ou que je double clique dessu ou que je modifie une valeur pour qu'elle s'éxécute.

J'ai déjà essayer avec calculate à la fois dans ma fonction et dans le code de ma form. Mais ça ne marche pas. 9a marche seulement lorsque j'éxécute la code dans VBA editor et que dans excel, ma feuille est active.

Pourquoi tout marxhe bien avec les fonctions d'excel et pas avec celle que j'ai crée ?

Merci d'avance pour votre aide.

[wilfried_42]

Bonjour

Ajoute la ligne en rouge

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Function RechercheMaxi(NumeroColonne As Integer)
 application.volatile
 Maxi = 0
 For i = 3 To 17 Step 1

[Apranax]

Merci, mais ça ne fonctionne pas. De plus, si j'effectue plusiers sasisie de données, en appuyant entre sur valider, les précédentes fonctions recherchemaxi(1), recherchemaxi(2) ... qui avaient été calculées par F9 ne sont plus évaluées, les cases sont vides. ALors que pour les fonctions excel pas de prob.

[ucfoutu]

Bonjour,

c'est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.Volatile (True)

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.Volatile True

Je crois que par défaut, ce sera false ...

Par ailleurs : si cette fonction doit être utilisée partout, il convient d'en faire une macro complémentaire (xla)

[AlainTech]

expression.Volatile(Volatile)
expression Obligatoire. Expression qui renvoie un objet Application.

Volatile Argument de type Variant facultatif. Affectez-lui la valeur True pour marquer la fonction comme volatile et la valeur False pour la marquer comme non volatile. La valeur par défaut est True.

[ucfoutu]

Ouais, elle est True par défaut ...

Je ne vois alors plus... (sauf peut-être l'enregistrement de la macro) ???

[Apranax]

9a ne marche pas non plus, mais merci. J'ai fait une video avec camstudio pour expliquer, mais eje n'arrive pas la poster .

[Apranax]

J'ai mis dans le code de ma form Feuille.Select (c'est la feuille qui dans laquelle j'entre les données) puis calculate, et là ça marche. Calculate seul, ou Feuille calculate ne marche pas. J'aimarais quan même nbe pas avoir à la sélectionner.

[tirex28]

Bonjour,

Essaye d'utiliser Formula plutot que FormulaLocal

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub Test()
    Range("A1").Value = 2
    Range("B1").Formula = "=DoublerValeur(RC[-1])"
End Sub
 
Public Function DoublerValeur(Valeur As Double) As Double
    DoublerValeur = Valeur * 2
End Function

Cordialment,

Tirex28/

[Apranax]

Avec formula ça ne marche pas mieux.

Si je sélectionne la feuille puis calculate, c bon. Mais si je reviens après, grâce au code, à ma page d'accueil, il faut que je recalcul à lamain.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Feuille.Select
 Calculate
 ActiveWorkbook.Sheets(" Accueil").Select

J'ai excel 2007

Une fois que ma formule est dans la cellule et que la fonction est évaluée, si je vais dans une autre feuill et que je recalcule, ma fonction et à nouveau évaluer mais avec les veleurs de cette feuille.

Il faut pt que je précise la feuille dans laquelle elle doit s'effectuer devant Cells. Où y a t-il un moyen pour qu'elle s'occupe seulement des valeurs de la feuille dans laquelle elle est entrée, comme c'est le cas pour les fpnctions moyenne ...

Merci encore.

[wilfried_42]

re:

Tu as regardé dans tes options excel si tu es en calcul manuel ??

En haut à gauche le rond Office, clique dessus, dans la fenetre en bas : un bouton : Option excel, Choisir ensuite Formule

[Apranax]

Je suis en calcul auto. Mais ça doit venir d ema fonction, à mon avis je dois préciser dans le code, devant cells, la feuille dans laquelle je veux qu'elle s'éxécute. Qu'en pensez-vous ?

[wilfried_42]

Re:

1 - Verifier qu'on est bien en Calcul Automatique (C'est Fait)
2 - La Fonction doit se trouver dans un Module et pas dans un code Feuille
3 - Mettre (en plus) en 1ere ligne Application.volatile ' Relance le calcul à chaque fois
4 - Si pas ca, Mettre Public devant Function (Mais je n'y crois pas)