Bonjour,

J'ai une macro qui fonctionnait très bien jusqu'à ce que je veuille déplacer une feuille après l'avoir ajoutée.
Maintenant, même en mode Débogage (F8) excel ne me met même pas d'erreur mais simplement ferme complètement mon classeur, et une fois sur deux redémarre Excel.

A quoi cela peut il être du? D'autant plus que j'ai mis en notes toutes mes modifs de déplacement pour revenir au code qui fonctionnait et le problème persiste avec ce fichier, il se ferme systématiquement au moment d'ajouter une feuille.
Si je réutilise une version encore plus ancienne, mon Sheets.Add fonctionne très bien.

Voici mon code pour ajouter une feuille. J'ai également laissé mes lignes de code en notes pour déplacer ma feuille.
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
 
        Dim Wb As Workbook
        Dim NomClasseur As String
        Dim NomFeuille As String
        Dim PositionFeuille As Integer
        Dim m As Integer
        NomClasseur = ActiveWorkbook.Name
        Set Wb = Workbooks(NomClasseur)
        'For m = 1 To Worksheets.Count()
         '   If Sheets(m).Name = FormNiveauAdd.PositionNiveau.Value Then
         '      PositionFeuille = m
         '        Exit For
         'End If
        'Next
        Sheets.Add(after:=Worksheets(Worksheets.Count())).Name = NiveauNomValue.Value
       ' Sheets(Worksheets.Count()).Move after:=Sheets(PositionFeuille)
        'PositionFeuille = ActiveSheet.Index
        NomFeuille = CStr(Wb.Sheets(Worksheets.Count()).CodeName)
        ActiveWindow.DisplayGridlines = False
        Worksheets("PROJET").Select