Bonjour à toutes et tous,
Je cherche à faire un sommaire automatique avec l'ensemble de mes onglets (non caché) sur la première page.
Cela fonctionne, mais pour chaque onglet caché il ne me le met pas dans mon sommaire par contre il laisse la case vide, mois je voudrai avoir un sommaire sans vide d'un seul trait avec l'ensemble des onglets non caché.
voici mon code
Sub sommaire()
For i = 2 To Sheets.Count
If Worksheets(i).Visible = xlSheetVisible Then
Cells(1 + i, 1) = Sheets(i).Name
End If
Next i
End Sub
voici mon fichier excel pour être plus clair.
Par avance merci de votre aide.
Je cherche à faire un sommaire automatique avec l'ensemble de mes onglets (non caché) sur la première page.
Cela fonctionne, mais pour chaque onglet caché il ne me le met pas dans mon sommaire par contre il laisse la case vide, mois je voudrai avoir un sommaire sans vide d'un seul trait avec l'ensemble des onglets non caché.
voici mon code
Sub sommaire()
For i = 2 To Sheets.Count
If Worksheets(i).Visible = xlSheetVisible Then
Cells(1 + i, 1) = Sheets(i).Name
End If
Next i
End Sub
voici mon fichier excel pour être plus clair.
Par avance merci de votre aide.