Bonjour,
Je crée ma fonction ( sous vba excel 2003), ci dessous :
Puis je l'appelle dans le code suivant :
Et lorsque j'exécute, il me met l'indice n'appartient pas à la séléction en surlignant le code en rouge.
Me ce qui est étrange, c'est que le code suivant suivant marche :
Comment se fait-ce??
Merci beaucoup et à bientôt!
Je crée ma fonction ( sous vba excel 2003), ci dessous :
Code:
Private Sub récapitulatif(Nom As Variant, Colonne As Variant)
'Kloug = MsgBox(Item, 1, "Titre", "", 1)
[COLOR="Red"]Nom.Caption = Worksheets(Fac).Cells(Ligne - 3, Colonne)[/COLOR]
If Worksheets(Fac).Cells(Ligne - 3, Colonne) = "" Then
Nom.Caption = 0
End If
End Sub
Puis je l'appelle dans le code suivant :
Code:
Private Sub NomDesClients_Change()
Fac = Worksheets(OngletSemaine).Cells(1, 3)
Ligne = NomNuméroLigne.Text
Call récapitulatif(ValeurNbPlats, 4)
End Sub
Me ce qui est étrange, c'est que le code suivant suivant marche :
Code:
Private Sub NomDesClients_Change()
ValeurNbPlats.Caption = Worksheets(Fac).Cells(Ligne - 3, 4)
If Worksheets(Fac).Cells(Ligne - 3, 4) = "" Then
ValeurNbPlats.Caption = 0
End If
End Sub
Comment se fait-ce??
Merci beaucoup et à bientôt!