XL 2013 Cells(r,c) qui ne modifie pas la cellule...

[massepi]

Bonjour j'ai un souci vraiment très très bête, mais très embêtant...
J'ai isolé le pb dans mes fonctions et le voici :
Dans une cellule je fais appel à une fonction Test() et la fonction Test() est sensée modifier la valeur d'une cellule avec Cells. Mais rien ne se passe et j'ai une erreur #VALEUR

Function Test() As String
    Cells(5, 5) = "Hello"
    Test = "ok"
End Function

Merci pour vos réponses,
Pierre

 

[pierrejean]

Bonjour massepi
Ceci est normal : Le but d'une fonction ne peut pas etre d'assigner une valeur à une cellule specifiée mais de prendre une valeur fonction d'un ou plusieurs paramètres

 

[jmfmarques]

Bonjour
tout dépend de ce que tu appelles "fonction" . Fonction personnalisée ou autre ? C e n'est pas du toujt pareil.
Preuve ici avec une fonction "normale" (non "personnalisée") --->>

Private Sub CommandButton1_Click()
 MsgBox Test() ' affichera "ok" et écrira "Hello" en cellule E5
End Sub

Function Test() As String
    Cells(5, 5) = "Hello"
    Test = "ok"
End Function

 

[massepi]

D'accord, mais donc il n'y a pas moyen de faire modifier le contenu de cellules depuis une formule appelée dans une cellule?
C'est que j'aurai besoin de cette fonctionnalité pour une autre de mes fonctions (je vais créer un autre sujet pour expliquer en détail mon besoin).