bonjour '
j'ai commencé à utiliser Vba tout récemment et j'ai rencontre beaucoup de difficulté , ce qui tout a fait normale.
Ma question :
j'ai une liste d’ancienneté d'employé et je voudrai comparé l'ancienneté de tous les employés par rapport à un employé de reference.
cet employé de référence est représenté par : nom, sa position et son secteur, session d'embauche
je voudrai donc parcourir la liste de tous les employés et déterminer ceux qui sont dans le même secteur que l'employé de référence et par la suite accorder une note de 1 à ceux qui sont plus anciens que l'employé de référence..
j'ai commencé à rédiger un code mais c'est devenu n'Importe quoi (je me suis perdu).
Sub ajouter_liste_anciennete(ByVal nom_secteur As String, ByVal nom1 As String, ByRef position1)
Dim nom_secteur As String
Dim nom1 As String
Dim position1As Integer
Dim secteur_activite1 As String
Dim secteur_activite2 As String
Dim cellule As String
Dim reponse As Boolean
Dim i As Integer
nom_liste = lire(position_employé, COLONNE_NOM)
position_employé = 137
For i = 1 To 138
secteur_activite2 = lire(position_2, COLONNE_SECTEUR)
position_2 = i
i = i + 1
Next
If secteur_activite1 = secteur_activite2 Then
reponse = True
msg = oui
Else
reponse = False
msg = non
End If
Call MsgBox(msg)
End Sub
Quelqu'un aurai-t-il une idée de comment coder ce problème , SVP???