message d'erreur d'execution 9

[H@nnoun]

Bonjour le forum

mon probleme est
le classeur A est ouvert et lorsque je lance l'ouverture du classeur B

j'ai un message d'erreur d'execution 9 l'indice n'appartient pas à la selection

dans
thisworkbook du classeur B j'ai mis le code suivant pour ouvrir un USF

Private Sub Workbook_Open()
Sheets("donnees").Activate
ActiveWindow.WindowState = xlMinimized
Application.WindowState = xlMaximized
UserForm1.Show 0
End Sub

si le classeur est ouvert seul il n'y a pas d'erreur

Pouvez vous m'aider a resoudre ce probleme Merci d'avance pour ttes reponses

H@nnoun

 

[arnaud]

Salut ,

si il te dis "l'indice n'appartient pas à la selection" c'est surement car il ne trouve pas la feuille "donnees" dans ton classeur.

 

[H@nnoun]

Salut Arnaud Merci pour ta reponse

oui tu as raison c'est ce j'ai vu mais comment lui dire que la selection appartient au classeur qui vient de s'ouvrir

en clair comment activer le classeur avant d'ouvrir l'USF pour eviter l'erreur

si tu as une idee

A+ H@nnoun

 

[arnaud]

re,

Workbooks("TonClasseur").Worksheets("TaFeuille").Activate

 

[H@nnoun]

Re salut Arnaud merci pour ton aide ca marche tu n'en doute pas

merci bonne journee A+ H@nnoun