bonjour
j'ai une macro qui me permet d'exporter une feuille de calcul d'un fichier X vers un fichier Y et j'aimerais l'améliorer un peu
en fait a chaque fois que j'exécute la macro, la feuille du classeur active s'exporte dans un autre classeur mais en tant que nouvelle feuille or j'aimerais que si la feuille que j'exporte porte le meme nom qu'une feuille de destination alors elle la remplace
est-ce possible ?
voici mon code
Sub macro2()
Dim sh As Worksheet
Set sh = Sheets("indicateurs") 'Feuille à copier
'Ouvrir le classeur destination
Workbooks.Open Filename:=ThisWorkbook.Path & "\indicateur global diffusions ITP appros.xls"
'Copier la feuille dans le classeur destination
sh.Copy After:=Workbooks("indicateur global diffusions ITP appros.xls").Sheets(1)
With ActiveSheet
.UsedRange.Copy
.UsedRange.Range("A1").PasteSpecial xlPasteValues
End With
Application.CutCopyMode = False
ActiveWindow.Close (True)
End Sub