Copye feuille dans nouveau fichier

Efgé

XLDnaute Barbatruc

• 28 Octobre 2009

• #2

Re : Copye feuille dans nouveau fichier

Bonjour,
Pour avoir le code, il suffit d'utiliser l'enregistreur de macro.
Outil / Macro/ nouvelle macro/
faire l'action désirer, puis arréter l'enregistrement.
Le code se trouve dans l'éditeur VBA (Alt + F11).
Ca devrait ressembler à ça:

Sub Macro11()
'
' Macro11 Macro
'
Sheets("Feuil2").Select
Sheets("Feuil2").Copy
End Sub

Cordialement

 

Vote positif 0 Vote négatif

J

jhofman

XLDnaute Occasionnel

• 28 Octobre 2009

• #3

Re : Copye feuille dans nouveau fichier

exact Efgé

c'est ce que j'avais fait mais à la lecture du code je me demandais s'il ne manquait pas un chouilla de code.... et bien non cela suffit.
Merci

 

Vote positif 0 Vote négatif

J

jhofman

XLDnaute Occasionnel

• 28 Octobre 2009

• #4

Re : Copye feuille dans nouveau fichier

en fai j'ai sélectionné plusieurs sheets : et ne sait comment continuer ...😡

Code:

Sub recopie()
isheetMaxi = Sheets.Count
Sheets(1).Select True
derniereFeuilleAcopier = 0
For i = 1 To isheetMaxi - 1
    If Sheets(i).Name = "FIN" Then
        derniereFeuilleAcopier = i
    End If
Next i
For i = 1 To derniereFeuilleAcopier - 1
    Sheets(i).Select False
Next i
'Selection.Copy
End Sub

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 30 Octobre 2009

• #5

Re : Copye feuille dans nouveau fichier

Bonjour,
Pardon pour le retard réponse,
Pour sélectionner et copier plusieurs feuilles on peut utiliser ce code:
Sheets(Array("Feuill1", "Feuill2", "etc...")).Select
ActiveWindow.SelectedSheets.Copy
en espérant que vous pourrez l'adapter...
Cordialement

 

Vote positif 0 Vote négatif

J

jhofman

XLDnaute Occasionnel

• 4 Novembre 2009

• #6

Re : Copye feuille dans nouveau fichier

bonjour Efgé

effectivement tu as raison mais dans ce acs le code est figé et al suppression d'un onglet ou le changement de nom ne sont pas pris en compte par ta formule.
cdlt

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 4 Novembre 2009

• #7

Re : Copye feuille dans nouveau fichier

Bonjour,
Un idée en l'air:
Vous pouvez copier le classeur sous un nouveau nom et ensuite supprimer les feuilles "en trop" dont vous connaissez le nom.
Encore une foi c'est une idée en l'air.
Cordialement

 

Vote positif 0 Vote négatif