'Modification necessaire si changement de fichier et/ou d'emplacement de fichier
Const nomFichierRecolement As String = "Suivi Recolement.xlsx"
Const nomFichierSuiviSydev As String = "Suivi SyDEV marché 2018.xls"
Const nomFichierCompta As String = "Global18.XLS"
Const nomFichierRecap As String = "recapitulatif_Affaire.xlsm"
Const WorkbookSuiviSydev As String = "U:\SOC\Infra_PLRE\Vendee\Commun\ETUDES\" & nomFichierSuiviSydev
Const WorkbookRecolement As String = "U:\SOC\Infra_PLRE\Vendee\BE\Commun\" & nomFichierRecolement
Const WorkbookCompta As String = "U:\SOC\Infra_PLRE\Credit-Cli\INFRA 85 CHALLANS\MARCHES\Sydev\AO2018\" & nomFichierCompta
Sub importLot1()
'creer le workbook'
Workbooks.Open (WorkbookSuiviSydev)
Workbooks.Open (WorkbookRecolement)
Workbooks.Open (WorkbookCompta)