Bonjour à tous,

Je me permets de me tourner vers vous pour un peu d'aide. J'utilise un fichier excel qui dispose d'une macro (bouton de contrôle). Cette macro permet à la feuille que j'ai constituée d'être dupliquée sur une nouvelle feuille excel en prenant le n° qui lui est donnée (il s'agit en l’occurrence de factures). CA marche très bien!

Cependant, j'aimerais reproduire ce bouton de macro sur d'autres classeurs (car c'est vraiment très pratique) mais je ne dispose de suffisamment de connaissances malheureusement et mes tentatives ont échoué.
Voici le code en question:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub CommandButton1_Click()
 
Dim NFeuil As String
    If Range("G11") <> "" Then
        NFeuil = Range("G11")
        If FeuilExist(NFeuil) Then
            Sheets(NFeuil).Activate
            Exit Sub
        Else
            Sheets("Modele").Copy After:=Sheets(ThisWorkbook.Sheets.Count)
            ActiveSheet.Name = NFeuil
 
        End If
    End If
 
End Sub
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Function FeuilExist(NomFeuil As String) As Boolean
Dim a
    FeuilExist = False
    On Error GoTo Err1
    a = Sheets(NomFeuil).Range("A1").Value
    FeuilExist = True
    Exit Function
Err1:
End Function
Quelqu'un pourrait m'expliquer comment utiliser ce bouton de commande avec cette macro dans un autre classeur svp? CA m'aiderait beaucoup.
J'espère que je ne suis pas trop brouillon dans mes explications.
D'avance merci.