Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2010 Figer un ou plusieurs onglets

Goose

XLDnaute Occasionnel
Bjr,
je suis a la recherche d'une macro qui puisse me permettre de figer un ou plusieurs onglets,
de sorte que ces onglets reste en 1ère position dans le classeur lorsque je fais défiler les autres !?
possible ou pas ?
merci pour vos futurs réponses
 

Phil69970

XLDnaute Barbatruc
@Goose

N'oublie pas d'adapter le nom de l'onglet "Feuil1"

VB:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Application.ScreenUpdating = False
Application.EnableEvents = False
Sheets("Récap").Move Before:=Sheets(Sh.Name)

'A adapter
Sheets("Feuil1").Move Before:=Sheets("Récap") 'Feui1 à adapter avec le nom que tu souhaites
'
Sh.Activate
Application.EnableEvents = True
End Sub

@Phil69970
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…