Enregistrer un fichier en ouvrant un autre classeur durant son impression

[mahamalily]

Bonjour à tous

J'aimerais un sérieux coup de main qui me sera d'une très grande utilité (comme toujours!!!).

Depuis hier, je cherche mais je n'arrive pas à faire fonctionner ce que je veux...

Explication :

J'ai une feuille Excel contenant un tableau etc. Pour l'impression, ca, ca marche malgré un petit souci qu'il faut que je règle.

Cependant, lors de son impression, il faut qu'un nouveau classeur s'ouvre, copie la feuille Excel en cours d'impression, l'enregistre et le ferme tout seul.

Alors voici le code :

Private Sub CmdPrint_Click()
Dim NomFichier As String
Dim NomChemin As String'

    Impression_Certificat

    NomFichier = Range("E17").Value
    NomChemin = Range("A40").Value
    
  'Sheets("IMPRESSION_CERTIFICAT").Copy
'Sheets.Copy
'test.Copy // faut déclarer le test
 
  selection.Copy
 
 
  '  Sheets("IMPRESSION_CERTIFICAT").Cells("A1:G40").Copy -------> pose problème
                                            '  ==> URGENT DE TROUVER LA SOLUTION CAR C'EST CE QU'IL FAUT
                                            '       REGLER POUR QUE TOUT SOIT SELECTIONNE
 
    ActiveSheet.Copy
    
   Workbooks.Add
    
 
    
    ActiveSheet.Paste
    ActiveSheet.Columns("A:A").ColumnWidth = 29.14
    ActiveSheet.Columns("B:B").ColumnWidth = 7.86
    ActiveSheet.Columns("C:C").ColumnWidth = 4.29
    ActiveSheet.Columns("D:D").ColumnWidth = 13.57
    ActiveSheet.Columns("E:E").ColumnWidth = 11.43
    ActiveSheet.Columns("F:F").ColumnWidth = 11.71
    ActiveSheet.Columns("G:G").ColumnWidth = 10.71
    Application.CutCopyMode = False
  
  
'et du coup, ceci pose a son tour problème aussi alors que ca marchait très bien !!!
    ActiveWorkbook.SaveAs Filename:=NomChemin & NomFichier & ".xls" _
       , FileFormat:=xlNormal, PassWord:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
    ActiveWorkbook.Close SaveChanges:=True

End Sub

J'aimerais qu'il copie toute la feuille sans même qu'elle soit sélectionnée...

C'est possible ???

Merci de bien vouloir m'aider !!