Bonjour,
Cette macro permet de supprimer les filtres automatiques sur une feuille:
On Error Resume Next
ActiveSheet.ShowAllData
Je voudrais le faire pour toutes les feuilles à l'ouverture du classeur pour
être sûr que toutes les lignes sont affichées
"Thisworkbook.ShowAllData"
me plante le classeur...
Merci de votre aide
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Ellimac
Bonjour,
Private Sub Workbook_Open() For Each f In ActiveWorkbook.Sheets On Error Resume Next f.ShowAllData Next End Sub
Camille
"Tendasque" a écrit dans le message de news: %
Bonjour, Cette macro permet de supprimer les filtres automatiques sur une feuille:
On Error Resume Next ActiveSheet.ShowAllData
Je voudrais le faire pour toutes les feuilles à l'ouverture du classeur pour être sûr que toutes les lignes sont affichées "Thisworkbook.ShowAllData" me plante le classeur... Merci de votre aide
Bonjour,
Private Sub Workbook_Open()
For Each f In ActiveWorkbook.Sheets
On Error Resume Next
f.ShowAllData
Next
End Sub
Camille
"Tendasque" <unss34@free.fr> a écrit dans le message de news:
%233QbfK2XIHA.4476@TK2MSFTNGP06.phx.gbl...
Bonjour,
Cette macro permet de supprimer les filtres automatiques sur une feuille:
On Error Resume Next
ActiveSheet.ShowAllData
Je voudrais le faire pour toutes les feuilles à l'ouverture du classeur
pour
être sûr que toutes les lignes sont affichées
"Thisworkbook.ShowAllData"
me plante le classeur...
Merci de votre aide
Private Sub Workbook_Open() For Each f In ActiveWorkbook.Sheets On Error Resume Next f.ShowAllData Next End Sub
Camille
"Tendasque" a écrit dans le message de news: %
Bonjour, Cette macro permet de supprimer les filtres automatiques sur une feuille:
On Error Resume Next ActiveSheet.ShowAllData
Je voudrais le faire pour toutes les feuilles à l'ouverture du classeur pour être sûr que toutes les lignes sont affichées "Thisworkbook.ShowAllData" me plante le classeur... Merci de votre aide
Tendasque
Parfait, merci beaucoup !
"Ellimac" a écrit dans le message de news:
Bonjour,
Private Sub Workbook_Open() For Each f In ActiveWorkbook.Sheets On Error Resume Next f.ShowAllData Next End Sub
Camille
"Tendasque" a écrit dans le message de news: %
Bonjour, Cette macro permet de supprimer les filtres automatiques sur une feuille:
On Error Resume Next ActiveSheet.ShowAllData
Je voudrais le faire pour toutes les feuilles à l'ouverture du classeur pour être sûr que toutes les lignes sont affichées "Thisworkbook.ShowAllData" me plante le classeur... Merci de votre aide
Parfait, merci beaucoup !
"Ellimac" <ellimac_cremelier@hotmail.com> a écrit dans le message de news:
ebWB7Q2XIHA.5396@TK2MSFTNGP02.phx.gbl...
Bonjour,
Private Sub Workbook_Open()
For Each f In ActiveWorkbook.Sheets
On Error Resume Next
f.ShowAllData
Next
End Sub
Camille
"Tendasque" <unss34@free.fr> a écrit dans le message de news:
%233QbfK2XIHA.4476@TK2MSFTNGP06.phx.gbl...
Bonjour,
Cette macro permet de supprimer les filtres automatiques sur une feuille:
On Error Resume Next
ActiveSheet.ShowAllData
Je voudrais le faire pour toutes les feuilles à l'ouverture du classeur
pour
être sûr que toutes les lignes sont affichées
"Thisworkbook.ShowAllData"
me plante le classeur...
Merci de votre aide
Private Sub Workbook_Open() For Each f In ActiveWorkbook.Sheets On Error Resume Next f.ShowAllData Next End Sub
Camille
"Tendasque" a écrit dans le message de news: %
Bonjour, Cette macro permet de supprimer les filtres automatiques sur une feuille:
On Error Resume Next ActiveSheet.ShowAllData
Je voudrais le faire pour toutes les feuilles à l'ouverture du classeur pour être sûr que toutes les lignes sont affichées "Thisworkbook.ShowAllData" me plante le classeur... Merci de votre aide