Bonjour,

je voudrais qu'en fonction d'un nombre (calculé sur la feuille active) le code vba ouvrira un autre fichier excel et lui insérera des nouvelles feuilles , le problème est que le code suivant créer les feuille sur le fichier excel sur lequel il est et pas sur "Workbooks("Feuille de présence.xlsm")" là où j'ai précisé
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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
    Sub generer_feuille_presence()
 
 
        Dim DernCol As Integer
        Dim wb As Workbook
        Dim ws As Worksheet
        Dim nombre As Integer
 
        With ActiveSheet
 
 
            Dercol = ActiveSheet.Cells(3, Cells.Columns.Count).End(xlToLeft).Column
 
 
            Set wb = Workbooks.Open("C:\Users\\Desktop\Feuille de présence.xlsm")
            Set ws = wb.Worksheets(1)
 
 
            For i = 3 To Dercol
 
                If .Cells(3, i) <> "" Then
 
                    Workbooks("Feuille de présence.xlsm").Sheets.Add.Move After:=Sheets(Sheets.Count)
 
                End If
            Next i
 
 
        End With
    End Sub

si vous pourriez m'aider

merci beaucoup