Discussion :

[iso81]

Bonjour ;

j'ai un petit soucis que je n'ai jamais rencontré avant ce jour. J'ai écris une petite procédure ayant la syntaxe suivantes:

Code :

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

1
2
3
4
5
Option Explicit
 
Public Sub DecalesTousLesSousTotaux(ByRef Pas As Integer)
    ' Corps de ma procédure ici.
End Sub

Lorsque je commence à taper une formule à l'intérieur de la barre de formule "=DecalesTousLesSousTotaux(SI(C3="Oui";1;-1))", la liste d'assistance qui contient toutes les fonctions ne contient pas ma procédure ! Lorsque je met à la place du mot clé Sub le mot Function, alors elle apparaît dans la liste des fonctions.

Que ce passe-t-il ?

[Didier Gonard]

bonjour,

Ben, tu as répondu toi-même à ta question, une Sub est une Sub et une fonction, une fonction...

vois ici :

Créer et utiliser des fonctions personnelles dans Excel


cordialement,

Didier

[iso81]

Merci Ormonth pour votre réponse, alors comment appeler ma procédure dans une cellule ?

[Didier Gonard]

Euh,
c'est clair soit on fait une procédure Function selon les règles, soit on fait une Sub et on ne peut l'invoquer dans une formule.

On peut déclencher une Sub par action sur un bouton ou un évènement de feuille par exemple.

Le mieux serait d'expliquer ce que doit faire le code ou ce que vous voulez qu'il fasse, mais une fonction est faite pour retourner un résultat, c'est tout.

cordialement,

Didier

[iso81]

Merci pour les explications.

[Qwazerty]

SAlut
Je rajouterais qu'il n'est pas logique de vouloir utiliser une Sub.
La sub (procédure) ne revoie aucune valeur

Code :

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

1
2
3
Sub Essai()
[...]
End Sub

la function, elle, retourne un valeur de type défini par l'utilisateur.

Code :

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

1
2
3
4
Function Essai() as String 'renvoie un string
[...]
Essai = "C'est bon"
end function

ici on retourne "C'est bon" qui va s'inscrire dans la cellule contenant la formule.
On peut definir d'autre type de retour

Code :

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

1
2
3
Function Essai() as Integer 'renvoie un entier
Function Essai() 'renvoie un variant
'etc... tous types compatible avec le contenu d'une cellule

Lorsque tu mets une formule dans une cellule, tu attends bien que le contenu de ta cellule change, en fonction de ce que te retour ta formule. Le résultat retourné par ta formule est bien celui retourné par ta fonction.

Actuellement que comptes tu faire avec ta procédure? car il y a une règle avec les formule perso qui t'interdit de modifier une cellule autre que celle dans laquelle ta formule se trouve.
En claire:
Si ta formule est dans A2, il ne t'ai pas possible de modifier le contenu de A3 a l'aide de cette formule.

++
Qwaz