Re : Macro pour faire deux listes sans doublons...
bjr,
Bebere peux-tu me donner quelques explications sur ton code ?
Tu écris :
Set M = CreateObject("Scripting.Dictionary") : je ne connais pas, après quelques recherches sur google je crois avoir compris qu'il s'agit d'une sorte de tableau , exact ? et donc tu alimentes ce "tableau" avec
If C = "MIDI" Then
If Not M.Exists(C.Offset(, 3).Value) Then M.Add C.Offset(, 3).Value, C.Offset(, 3).Value
End If
If C = "SOIR" Then
If Not S.Exists(C.Offset(, 3).Value) Then S.Add C.Offset(, 3).Value, C.Offset(, 3).Value
End If
---------
A la fin tu écris :
Set D = Nothing: Set M = Nothing
Application.ScreenUpdating = True
ca ne serait pas plutot
Set S = Nothing: Set M = Nothing
Application.ScreenUpdating = True
---------
en attendant tes explications...
a+
bob