Copier les données d'un fichier vers un autre fichier excel

Y compris Power BI, Power Query et toute autre question en lien avec Excel
m
marionshbl
Nouveau venu
Nouveau venu
Messages : 1
Inscrit le : 18 novembre 2019
Version d'Excel : 2016 FR

Message par marionshbl » 18 novembre 2019, 11:31

Bonjour,

Je suis novice dans l'utilisation du VBA.
Je cherche à copier entièrement une ligne d'un tableau d'un fichier "BdB Paps brutes" dans le fichier "exportation paps" si la référence de la ligne contenu dans la première cellule de la ligne de BdB Paps n'est pas déjà contenu dans le tableau de la feuille "Export Paps csv".
J'ai tenté un code mais cela ne fonctionne pas, le message d'erreur est " la méthode Range de l'objet "_Global" a échoué".

Sub importer_info2()

j = 2
For Each cell In Range("A")
Workbooks("Exportation Paps .xlsx").Worksheets("Export Paps csv").Select
If Workbooks("BdD brutes PAPS.xlsx").Sheets(1).Range("C" & j) <> cell.Value Then

End If

With Workbooks("Exportation Paps .xlsx").Worksheets("Export Paps csv")
Workbooks("BdD brutes PAPS.xlsx").Worksheets("BdD").Rows(j).Copy .Cells(.Rows.Count, "A").End(xlUp)(2)
End With

Next cell
End Sub


Merci d'avance pour votre aide! :)
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message