dim MonClasseur as workbook set MonClasseur = "Classeur1".xls MonClasseur.Worksheets ...
Workbooks("Classeur2.xls").Worksheets("Feuil2").Cells(2,3).value = Workbooks("Classeur1.xls").Worksheets("Feuil1").Cells(1,1).value
'Définition des variables Dim FeuilleSource as worksheet Dim FeuilleCible as worksheet 'Initialisation des variables Set FeuilleSource = Workbooks("Classeur1.xls").Worksheets("Feuil1") Set FeuilleCible = Workbooks("Classeur2.xls").Worksheets("Feuil2") 'Copie des données FeuilleCible.cells(2,3).value = FeuilleSource.cells(1,1).value
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question