Bonjour à tous,

J'aimerais utiliser les données de variables dans plusieurs modules.
J'ai lu pas mal d'infos à propos du mode PUBLIC ou PRIVATE mais je n'arrive manifestement pas à les implémenter.

Mon code d'un userform est le suivant :

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
 
Option Explicit
Public Cem1 as long
 
Public Sub Volume_Change()
 
Dim Ligne As Long
Dim Plage As Range
 
Set Plage = Range("A2:kb2")
 
Ligne = Me.Recette.Value + 4 'Recette correspond à une valeur encodée dans une textbox
 
    Cem1 = Cells(Ligne, Application.Match("Cem1", Plage, 0)).Value
 
End Sub
J'enregistre donc une valeur pour ma variable Cem1.

J'ai ensuite un autre code, toujours dans le code de mon userform :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Public Sub Cem1_Change()
    Call Module1.CfC10
End Sub
Dans ce dernier, je fais donc appel à mon Module1 qui comporte le calcul suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Public Function CfC10()
 
Cem1 + 10
 
End Function
J'ai alors l'erreur suivante :

"Erreur de compilation :
Le membre existe déjà dans un module objet dont le présent module est dérivé."

Pourriez-vous m'éclairer à ce sujet svp ?

Merci d'avance