Macro Vlookup / copier coller

Hello,

Je me permets de vous soumettre une demande de macro :

Voir le fichier joint pour les données, mais voila le besoin :

• Dans l'onglet 1 du fichier : faire un vlookup pour regarder la date.
• Aller regarder la date l'onglet 2, et reporter les valeurs 1,2 et 3 depuis l'onglet 1 vers l'onglet 2, dans les colonnes adéquate.

Pourriez vous m'accompagner dans la démarche ?

Slt Oo_Pan,

à mon avis:

1- faites une rechreche dans le forum, il y a assez d'exemple. exemple:

https://forum.excel-pratique.com/viewtopic.php?f=2&t=96507

2- commencez votre code, si ca fonctionne c'est bon et sinon vous recevrez de l'aide c'est sûr

ciao

Sub CopyPaste()

Dim celldepart as Long
Dim ligFin As Long
Dim iLig As Long

  Set fd = Application.FileDialog(msoFileDialogOpen)
     With fd

        .AllowMultiSelect = False
        .Filters.Clear
        .Filters.Add "Fichiers CSV", "*.csv"
        .InitialFileName = "C:\blabla\Data_CSV"

For iLig = 2 To ligFin
                    For iCol = 1 To 18
                        flux.Cells(iLig, iCol).FormulaLocal = ActiveWorkbook.Sheets(1).Cells(iLig, iCol).FormulaLocal
Next.... ?

End With

Du coup je sèche... ! help

Slt,

cette macro n'a rien à avoir avec ce que vos cherchez. Je vais voir ca ce soir!

Bonjour,

Une petite aide ?

Slt,

tes données doivent être dans l'onglet dápart, et tu les récupères dans l'onglet arrivée avec une RECHERCHEV.

Bonne nuit

Bonjour,

Merci pour ta macro, c'est exactement ce qu'il me faut...

1) Est-ce que cela fonctionne si les données sont contenues dans un autre workbook ?

2) Pourrais-tu me commenter légèrement ton code que je comprenne le fonctionnement

3) Est-ce que cela fonctionne si j'ai 30 lignes à traiter ? 300 ? (je ne vois pas de boucle for avec une condition et j'avais songé à en faire une...)

En tout cas merci pour ta contribution, ça m'avance un peu dans mon problème

Slt,

voir les réponses dans le fichier

Top !

Cela fonctionne ! et merci pour les commentaires !