Re : mettre un 1 dans une colonne
Voici mon code:
Sub Nom_FIP_1(w() As String)
Dim v As Byte, c As New Collection, x As Integer, y() As Variant, z() As Variant, i As Byte
Dim agentdisponible() As Boolean ''''''''''''''''''''''''''''
ReDim agentdisponible(nbragent)...