Message d'erreur macro afficher toute les données

[lmylvc]

Hello les amis

J'ai réalisé une macro simple qui me permet d'afficher toutes les données d'un tableau après un filtrage de celles-ci.

Cette même macro, je voudrais l'insérer à l'ouverture de mon fichier excell
Jusque là, pas de pb.
Mon pb apparait lorsque le fichier s'ouvre et que toutes les données sont déjà affichées.

Une messagebox souvre m'indiquant erreur d'exécution 1004' ce qui m'oblige à cliquer sur le Btn Fin.
Afin que ceux qui vont utiliser mon fichier ne soient pas effryés par ce message, quelqu'un saurait-il comment faire pour que cette messahge box n'apparaisse pas ??????

Merci à vous

Ci- dessous ma macro de base

Sub Afficher_Tout()
'
' Afficher_Tout Macro
' Macro enregistrée le 29/06/2010 par Vincent
'

'
ActiveSheet.ShowAllData
End Sub


Merciiiii


Vincent

 

[Dull]

Re : Message d'erreur macro afficher toute les données

Salut lmylvc, le Forum

devant

ActiveSheet.ShowAllData

ajoute

On Error Resume Next

Bonne Journée

 

[lmylvc]

Re : Message d'erreur macro afficher toute les données

Hello Dull

Cela fonctionne parfaitement,

merci à toi pour ta réponse.

Encore heureux que ce forum existe, sans quoi .....


Bye

Vincent