Base : je voudrais qu'à l'ouverture de mon classeur toutes les feuilles présentent dans celui-ci n'aient plus le n° des lignes et la lettre de la colonne
Avec l'enregistreur de macro j'ai fait une macro ce qui me donne :
Code:
Sub Macro1()
Sheets(Array("Feuil1", "Feuil2", "Feuil3", "Feuil4", "Feuil5")).Select
Sheets("Feuil1").Activate
ActiveWindow.DisplayHeadings = False
End Sub
et j'ai placé celle-ci dans le Thisworkbook en la renommant Private Sub Workbook_Open()
Elle fonctionne très bien quand il n'y a aucune feuille masquée mais si je masque ne serait-ce qu'une feuille et que je ferme et rouvre le classeur cela me met : "Erreur 1004 : la méthode Select de la classe Sheets a échoué".
Alors comment faire pour que toutes les feuilles (même celles qui sont masquées) de mon classeur n'ai plus à l'ouverture les n° de lignes et lettre de colonne.
D'avance merci pour vos réponse vos réponses
Re : Enlever à l'ouverture du classeur le n° ligne et la lettre colonne dans les feui
Salut libellule85,
tu peux essayer ceci.
VB:
Option Explicit
Private Sub Workbook_Open()
Dim Sh
Dim Etat As Integer
Dim Feuille_Actuelle As String
Application.ScreenUpdating = False
Feuille_Actuelle = ActiveSheet.Name
For Each Sh In Sheets
Etat = Sh.Visible
If Sh.Visible = False Then Sh.Visible = True
Sh.Select
ActiveWindow.DisplayHeadings = False
If Etat <> -1 Then Sh.Visible = False
Next Sh
Sheets(Feuille_Actuelle).Select
End Sub
Re : Enlever à l'ouverture du classeur le n° ligne et la lettre colonne dans les feui
Bonjour, salut les autres,
Je ne comprends pas le problème (merci, je sais que je ne suis pas malin !).
Si les numéros de lignes et lettres de colonnes doivent ne pas s'afficher pour un fichier spécifique, il suffit de sélectionner toutes les feuilles (bouton droit de la souris sur un onglet), de les masquer (raccourci clavier : Alt+o+o+n+Entrée) et de sauver ce fichier.
A chaque ouverture elles seront masquées.
Si par contre c'est pour tous les fichiers, un fichier type pour être enregistré comme modèle, ou sous XLSTART.