OVH Cloud OVH Cloud

PB fonction

4 réponses
Avatar
François
Bonjour à tous,

J'utilise la fonction suivante :

Function Variation(Cellule_Debut As Range, Cellule_Fin As Range)
Dim Fin, Debut

Application.Volatile
Fin = Cellule_Fin.Value
Debut = Cellule_Debut.Value

If Fin >= 0 And Debut > 0 Then

Variation = (Fin - Debut) / Debut
ElseIf Fin = 0 And Debut = 0 Then
Variation = 0
Else: Variation = "ns"

End If
End Function

PB N°1 : j'ai une colonne qui utilise cette fct en faisant référence à un
TcD
mais les rafraichissement ne se font pas toujours.

PB N°2 : lorsque je lance une macro, ça déclenche systématiquement cette fct
et la macro s'arrête avant d'avoir fini..

Auriez vous des conseils ???
Merci par avence,
Bonne journée
François

4 réponses

Avatar
Philippe.R
Bonsoir François,
Sur le problème n°2, n'y aurait il pas ailleurs une variable du nom de variation ?
Ceci pourrait expliquer cela
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"François" a écrit dans le message de news:%
Bonjour à tous,

J'utilise la fonction suivante :

Function Variation(Cellule_Debut As Range, Cellule_Fin As Range)
Dim Fin, Debut

Application.Volatile
Fin = Cellule_Fin.Value
Debut = Cellule_Debut.Value

If Fin >= 0 And Debut > 0 Then

Variation = (Fin - Debut) / Debut
ElseIf Fin = 0 And Debut = 0 Then
Variation = 0
Else: Variation = "ns"

End If
End Function

PB N°1 : j'ai une colonne qui utilise cette fct en faisant référence à un
TcD
mais les rafraichissement ne se font pas toujours.

PB N°2 : lorsque je lance une macro, ça déclenche systématiquement cette fct
et la macro s'arrête avant d'avoir fini..

Auriez vous des conseils ???
Merci par avence,
Bonne journée
François





Avatar
François
Bonjour Philippe,

Merci pour cette suggestion,
j'ai enfin trouvé ce WE. Ma fonction ne gère pas les cas où une cellule
est non numérique.
Il y a donc plantage sans que ça fasse le moindre bruit ..
Je reste néanmoins à l'écoute s'il y a des conseils avisés pour
l'utilisation
des fonctions personnalisés (contexte d'utilisation de Application.Volatile
par ex.).

Merci encore et très bonne journée,
François
----------------------------------------------------
"Philippe.R" a écrit dans le message news:
#
Bonsoir François,
Sur le problème n°2, n'y aurait il pas ailleurs une variable du nom de
variation ?

Ceci pourrait expliquer cela
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"François" a écrit dans le message de
news:%

Bonjour à tous,

J'utilise la fonction suivante :

Function Variation(Cellule_Debut As Range, Cellule_Fin As Range)
Dim Fin, Debut

Application.Volatile
Fin = Cellule_Fin.Value
Debut = Cellule_Debut.Value

If Fin >= 0 And Debut > 0 Then

Variation = (Fin - Debut) / Debut
ElseIf Fin = 0 And Debut = 0 Then
Variation = 0
Else: Variation = "ns"

End If
End Function

PB N°1 : j'ai une colonne qui utilise cette fct en faisant référence à
un


TcD
mais les rafraichissement ne se font pas toujours.

PB N°2 : lorsque je lance une macro, ça déclenche systématiquement cette
fct


et la macro s'arrête avant d'avoir fini..

Auriez vous des conseils ???
Merci par avence,
Bonne journée
François









Avatar
Philippe.R
C'était avec plaisir François !

Application.Volatile est une instruction qui permet à ta fonction d'être recalculée à chaque changement
dans le classeur, comme les fonctions du type maintenant() ou aujourdhui() par exemple.
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"François" a écrit dans le message de news:%23Cc3QC%
Bonjour Philippe,

Merci pour cette suggestion,
j'ai enfin trouvé ce WE. Ma fonction ne gère pas les cas où une cellule
est non numérique.
Il y a donc plantage sans que ça fasse le moindre bruit ..
Je reste néanmoins à l'écoute s'il y a des conseils avisés pour
l'utilisation
des fonctions personnalisés (contexte d'utilisation de Application.Volatile
par ex.).

Merci encore et très bonne journée,
François
----------------------------------------------------
"Philippe.R" a écrit dans le message news:
#
Bonsoir François,
Sur le problème n°2, n'y aurait il pas ailleurs une variable du nom de
variation ?

Ceci pourrait expliquer cela
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"François" a écrit dans le message de
news:%

Bonjour à tous,

J'utilise la fonction suivante :

Function Variation(Cellule_Debut As Range, Cellule_Fin As Range)
Dim Fin, Debut

Application.Volatile
Fin = Cellule_Fin.Value
Debut = Cellule_Debut.Value

If Fin >= 0 And Debut > 0 Then

Variation = (Fin - Debut) / Debut
ElseIf Fin = 0 And Debut = 0 Then
Variation = 0
Else: Variation = "ns"

End If
End Function

PB N°1 : j'ai une colonne qui utilise cette fct en faisant référence à
un


TcD
mais les rafraichissement ne se font pas toujours.

PB N°2 : lorsque je lance une macro, ça déclenche systématiquement cette
fct


et la macro s'arrête avant d'avoir fini..

Auriez vous des conseils ???
Merci par avence,
Bonne journée
François













Avatar
François
Bonjour Philippe,

C'est bien parce que je voulais une "réaction" à mes màj de TCD que
j'utilise cette
instruction.
Ca présente des inconvénients en termes de temps de réponse mais les pb que
je
rencontrais venaient probalement du fait que ma fonction n'était pas
étanche...

Merci encore et bonne journée.
François
--------------------------------------------

"Philippe.R" a écrit dans le message news:
#nJ$
C'était avec plaisir François !

Application.Volatile est une instruction qui permet à ta fonction d'être
recalculée à chaque changement

dans le classeur, comme les fonctions du type maintenant() ou aujourdhui()
par exemple.

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"François" a écrit dans le message de
news:%23Cc3QC%

Bonjour Philippe,

Merci pour cette suggestion,
j'ai enfin trouvé ce WE. Ma fonction ne gère pas les cas où une cellule
est non numérique.
Il y a donc plantage sans que ça fasse le moindre bruit ..
Je reste néanmoins à l'écoute s'il y a des conseils avisés pour
l'utilisation
des fonctions personnalisés (contexte d'utilisation de
Application.Volatile


par ex.).

Merci encore et très bonne journée,
François
----------------------------------------------------
"Philippe.R" a écrit dans le message news:
#
Bonsoir François,
Sur le problème n°2, n'y aurait il pas ailleurs une variable du nom de
variation ?

Ceci pourrait expliquer cela
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"François" a écrit dans le message de
news:%

Bonjour à tous,

J'utilise la fonction suivante :

Function Variation(Cellule_Debut As Range, Cellule_Fin As Range)
Dim Fin, Debut

Application.Volatile
Fin = Cellule_Fin.Value
Debut = Cellule_Debut.Value

If Fin >= 0 And Debut > 0 Then

Variation = (Fin - Debut) / Debut
ElseIf Fin = 0 And Debut = 0 Then
Variation = 0
Else: Variation = "ns"

End If
End Function

PB N°1 : j'ai une colonne qui utilise cette fct en faisant référence
à




un
TcD
mais les rafraichissement ne se font pas toujours.

PB N°2 : lorsque je lance une macro, ça déclenche systématiquement
cette




fct
et la macro s'arrête avant d'avoir fini..

Auriez vous des conseils ???
Merci par avence,
Bonne journée
François