Bonjour à tous !
J'ai un souci sur la macro suivante :
Sub AfficherAgences()
ActiveSheet.ShowAllData
Range("B1:N2").Select
ActiveCell.FormulaR1C1 = "Benchmark Agences - Février 2010"
End Sub
Le pb est que lorsque je l'execute une fois cela fonctionne mais quand je l'execute plusieurs (autrement dit la 2 ème fois), ce message d'erreur apparaît :
"La méthode ShowAllData de la classe Worksheet a échoué"
Avez-vous une solution svp pour que je puisse éxecuter cette macro autant de fois que je le veux sans avoir un message d'erreur?
Merci à tous pour votre aide !
J'ai un souci sur la macro suivante :
Sub AfficherAgences()
ActiveSheet.ShowAllData
Range("B1:N2").Select
ActiveCell.FormulaR1C1 = "Benchmark Agences - Février 2010"
End Sub
Le pb est que lorsque je l'execute une fois cela fonctionne mais quand je l'execute plusieurs (autrement dit la 2 ème fois), ce message d'erreur apparaît :
"La méthode ShowAllData de la classe Worksheet a échoué"
Avez-vous une solution svp pour que je puisse éxecuter cette macro autant de fois que je le veux sans avoir un message d'erreur?
Merci à tous pour votre aide !