M
mustapha
Guest
C’est la première fois que je participe à ce forum
Je voulais proposer deux macros, l'un pour afficher tous les feuilles masquer et l'autre pour supprimer un nombre déterminer de ces feuille
Merci de me évaluer et critiquer
Mustapha
Sub mfffeuille()
' mffeuille c'est le nom du macro qu'il faut créer dans Excel
For i = 1 To ActiveWorkbook.Sheets.Count
ActiveWorkbook.Sheets(i).Visible = True
Next i
' à personnaliser par l'utilisateur :Touche de raccourci du clavier: Ctrl+l
End Sub
Sub supfffeuille()
For i = ActiveWorkbook.Sheets.Count To 9 Step -1
' le chifrre 9 designe que je veux garder juste 9 feuille et effecer les autres
Sheets(i).Delete
Next i
' à perssonaliser par vous : Touche de raccourci du clavier: Ctrl+d
End Sub
Je voulais proposer deux macros, l'un pour afficher tous les feuilles masquer et l'autre pour supprimer un nombre déterminer de ces feuille
Merci de me évaluer et critiquer
Mustapha
Sub mfffeuille()
' mffeuille c'est le nom du macro qu'il faut créer dans Excel
For i = 1 To ActiveWorkbook.Sheets.Count
ActiveWorkbook.Sheets(i).Visible = True
Next i
' à personnaliser par l'utilisateur :Touche de raccourci du clavier: Ctrl+l
End Sub
Sub supfffeuille()
For i = ActiveWorkbook.Sheets.Count To 9 Step -1
' le chifrre 9 designe que je veux garder juste 9 feuille et effecer les autres
Sheets(i).Delete
Next i
' à perssonaliser par vous : Touche de raccourci du clavier: Ctrl+d
End Sub