Manipulation de feuilles et fichiers

Bonjour à tous et toutes !

Je suis nouveau dans le vba et malgré la lecture de tuto et sujets divers je n'arrive pas à faire ce que je veux...

J'ai un fichier xlsm avec plusieurs feuilles dont "FicheRT" et "FicheRT_aide".

La feuille "FicheRT" me sert de modèle pour générer une nouvelle feuille "FicheRT-xxx" ou xxx est un numéro généré dans une autre feuille à partir d'une référence (et dont de nombreux champs sont remplis automatiquement).

Pour le moment ca va...

Ensuite, et c'est là ou je n'y arrive pas, je voudrais :

  • Copier les feuilles "FicheRT_aide" et "FicheRT-xxx" que je viens de générer
  • Les coller dans un nouveau fichier en le nommant avec le nom de la fiche générée : "répertoire en cours\Fiches\FicheRT-xxx.xlsx
  • Enregistrer le fichier et le fermer
  • Dans mon fichier source supprimer la feuille FicheRT-xxx

J'utilise pour le moment la fonction :

Sheets(Array("" & ReferenceRT & "", "FicheRT_Aide")).Copy 

pour copier mes deux onglets.

Le variable ReferenceRT correspond au nom de ma fiche FicheRT-xxx

Je n'arrive par contre pas à aller plus loin et à utiliser le .SaveAs, .Close, etc...

Merci de votre aide.

Laurent.

Pour info problème résolu !

Si certains veulent l'info le code final est le suivant :

' copie des deux feuilles
    Sheets(Array("" & ReferenceRT & "", "FicheRT_Aide")).Copy
    With ActiveWorkbook
     .SaveAs Filename:="c:\temp\test.xlsx"
     .Close
    End With
'    Suppression de la feuille générée dans le fichier original
    Application.DisplayAlerts = False
    Worksheets("" & ReferenceRT & "").Delete
    Application.DisplayAlerts = True
Rechercher des sujets similaires à "manipulation feuilles fichiers"