Bonjour a tous,
je travail en ce moment sur une macro qui me permettrai d'importer des données disponible dans un Fichier "Source" vers un fichier "Destination" mais sans avoir a ouvrir le fichier "source" car trop volumineux et trop d'utilisateur s'y connecte
pour l'instant j'ai réussi a mettre en place une macro mais je suis obliger de l'ouvrir et de leur fermer a la fin
voici mon code
........................................................................................
sub importer-données ()
Dim FichierSource as variant
Dim FichierDestination as workbook
Application.screenUpdating = False
FichierSource = application.getopenfilename
if FichierSource <> False then
set FichierDestination = application.Workbooks.open(FichierSource)
FichierDestination.Sheets("Feuil1").Range("A1:J10").Copy
thisWorkbook.Worksheets("Feuil1").Range("A1"). pasteSpecial xlPasteValues
FichierDestination.close False
end if
Application.ScreenUpdating=false
End Sub
.............................................................................................
Notez que je débute sur vba
Merci beaucoup de votre aide et de votre temps