Copier une plage depuis le premier onglet et copier le deuxième onglet auto

Fermé
KK7510 - 15 juil. 2020 à 10:55
franc38 Messages postés 197 Date d'inscription mercredi 23 avril 2008 Statut Membre Dernière intervention 27 février 2023 - 26 juil. 2020 à 15:33
Bonjour,

J'ai un fichier excel composé de 2 onglets et je voudrais copier coller avec vba une plage du premier onglet, par exemple (B1:V2000) et copier en entier le deuxième onglet et que ces 2 onglets s'enregistrent quelque part à une adresse que je précise. Je souhaite que ce code copie depuis la feuille "Etat", la plage "B1:V2000" et le feuillet "LEXIQUE" en entier. Je n'arrive pas à adapter le code Sheets(Array("Etat", "LEXIQUE")).Copy pour lui donner une plage au feuillet "Etat". Quelqu’un aurait une idée? Merci par avance pour votre aide.
Sub Sauvegarde()

Dim extension As String, chemin As String, nomfichier As String, suivi As String
extension = ".xlsx"
chemin = "disque_test"
suivi = "Suivi_"
nomfichier = Sheets("Critères").Range("C7") & suivi & Sheets("Etat").Range("C3") & extension
Sheets(Array("Etat", "LEXIQUE")).Copy
ActiveWorkbook.SaveAs Filename:=chemin & nomfichier
ActiveWorkbook.Close
End Sub
A voir également:

1 réponse

franc38 Messages postés 197 Date d'inscription mercredi 23 avril 2008 Statut Membre Dernière intervention 27 février 2023 38
26 juil. 2020 à 15:33
Bonjour
les joies de l'informatique
Worksheets(Array("BD", "RES")).Copy

A+ François
0