Bonjour,
j'ai réussi à copier une feuille de calcul nommée "VIERGE" du classeur "Xxxx.xlsm", la renommer "V1"et la coller dans le même classeur ("Xxxx.xlsm").
Or après réflexion, j'aimerai copier la feuille de calcul nommée "VIERGE" du classeur ""Xxxx.xlsm"", la renommer "V1" et la coller dans un autre classeur (déjà existant) nommé ("NouveauXxxx.xlsx").
Merci d'avance pour votre aide
j'ai réussi à copier une feuille de calcul nommée "VIERGE" du classeur "Xxxx.xlsm", la renommer "V1"et la coller dans le même classeur ("Xxxx.xlsm").
Or après réflexion, j'aimerai copier la feuille de calcul nommée "VIERGE" du classeur ""Xxxx.xlsm"", la renommer "V1" et la coller dans un autre classeur (déjà existant) nommé ("NouveauXxxx.xlsx").
Code:
Sub duplic_archive()
Worksheets("VIERGE").Copy After:=Sheets(Worksheets.Count)
Set MySheet = ActiveSheet
With MySheet
.Name = Worksheets("VIERGE").Range("H7") & Worksheets("VIERGE").Range("I7")
End With
End Sub
Merci d'avance pour votre aide