Re : masquer feuille et macro
Oui c'est une bonne idée, je sens que je vais copie colle le code pour masquer apres chaque macro
J'essaye ça de suite ! merci du conseil !
Pierrot93, ça fonctionne mais j'ai un souci sur les lignes avec "Range": quand j'enlève le Select, il me cré un espace entre le "Range" et la parenthèse.
Application.ScreenUpdating = False
ActiveSheet.Range("$A$1:$F$999").AutoFilter Field:=5, Criteria1:="Bâti 7 type 1"
Range("A2:F999").Copy
Sheets("Sous Bat7").Visible = True
Range("A2").Select
ActiveSheet.Paste
Sheets("Bâti7").Visible = True
ActiveSheet.Range("$A$1:$F$999").AutoFilter Field:=5
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = " "
Sheets("Sous Bat7").Visible = True
Range("O1").Select
ScreenUpdating = True