Variable tableau

Bonjour, dans le cadre d'un suivi de commande dans un fichier potentiellement long, je dispose pour shématiser de 3 onglets. Le 1ier correspond d'une certaine façon à des commandes avec un identifiant client et des listes de produits, le 2nd onglet correspond à un suivi de date de retour, le dernier devrait intégrer pour une période donnée, et pour un client donnée, les quantités commandées.

je pourrais utiliser la méthode find mais les temps de traitement seraient beaucoup trop longs (et donc pas adapté à mon cas). J'ai découvert les variables tableaux mais je ne suis pas assez calée pour les exploiter comme il faut.

Voici le code que j'ai écrit, mais qui ne fonctionne pas.

Sub test()
Dim Mois As String, Num_Client As String
Dim Num_col_Retour As Integer, Num_Col_Saisie As Integer, Dernligne_Retour As Integer, Dernligne_saisie As Integer, Dernligne_Cde As Integer
Dim i, k As Integer
Dim Liste_param As Range, Liste_Retour As Range, Liste_Saisie As Range, Liste_Cde As Range
Set Liste_param = Sheets("param").Range("a1:c13")

Mois = Range("mois_revue").Value
Num_col_Retour = Application.VLookup(Mois, Liste_param, 2, False)
Num_Col_Saisie = Application.VLookup(Mois, Liste_param, 3, False)

Application.ScreenUpdating = False

With Sheets("commande")
    Dernligne_Cde = .Range("a" & Rows.Count).End(xlUp).Row
    For i = 2 To Dernligne_Cde
        Num_Client = Sheets("commande").Range("a" & i).Value
        Dernligne_Retour = Sheets("suivi_retour").Range("a" & Rows.Count).End(xlUp).Row
        Set Liste_Retour = Sheets("suivi_retour").Range("a1:v" & Dernligne_Retour)
        tablo = Liste_Retour
        For k = 2 To UBound(tablo)
            If tablo(k, 1) = numclient Then tablo(k, num_col) = Date
        Next k
    Next i
End With
Set Liste_param = Nothing
Set Liste_Retour = Nothing
End Sub

Du coup, je jette ma bouteille à la mer et met en copie un fichier exemple.

MERCI par avance pour votre aide :-)

Hello,

Pas testé mais la variable num_col je ne la vois nulle part ( ni déclarée, ni initialisée) donc je pense que tu dois avoir une erreur à ce niveau.

Bonjour

Ci joint une proposition si j'ai bien compris la demande...

A+

Fred

Hello Fred2406, c'est EXACTEMENT ça !!!!! super. merciiii

Faut quand même que j'essaie de comprendre ce que tu as fait pour pouvoir le reproduire ;-)

A+

Merci Rag02700 pour ton appui.

bonne soirée

Re

si tu as besoin d'explication du code revient...

Fred

Merci, je regarde ça mais j'aurais sûrement des questions, 😁

Bonne soirée