Bonjour à tous,
J'ai une fonction excel essaia() qui doit me retourner Oui et dans une autre cellule elle doit me mettre N

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Function essaia() As String
' Recuperation du code motif et verification si Vide Stock
'
'
codemotif = "Vide stock"

'
' Verification que le code motif est un vide stock
'
i = 2

    '
If codemotif = "Vide stock" Then
        '
Selection.Locked = False
Selection.FormulaHidden = False

            'on est dans le cas d'un vide stock
essaia = "Oui"
            
' AQ2 contient N
Range("AQ2").Select
Selection.Copy
Range("N2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Selection.Locked = True
Selection.FormulaHidden = False

Else

essaia = "N"
            ' 
Range("N" + Trim$(Str$(i))).Select
Selection.Locked = False
[Selection.FormulaHidden = False

End If
    '
'
End Function

Puis à ma cellule N2 j'ai O et à ma cellule Z j'ai
=essaia()

J'obtient bien comme resultat dans Z Oui, mais N2 reste à O

Pouvez vous me donner un coup de pousse.
Merci