Erreur d'execution

[Gilles25]

Bonjour le forum,

J'ai posé une question il y a quelques semaines, la réponse ma été donnée pas de soucis, mais maintenant ça plante,

voilà donc mon problème:
il faut que mon classeur s'ouvre sur la feuille nommée 'ouverture' donc dans ThisWorkbook j'ai placé le code suivant qui ma été donné sur le forum :
Private Sub Workbook_Open()
Sheets('ouverture').Activate
End Sub
ça a fonctionner quelques temps et paf plus rien car lors de l'ouverture le message suivant apparais:
erreur d'éxecution 57121 erruer définie par l'application ou par l'objet
Jy perd mon latin, et pour le fichier difficile de le mettre sur le forum il fait 78.7Mo

 

[PAD]

Bonjour le forum,
Bonjour Gilles,

Pour joindre ton fichier un peu plus lourd, que le permet le forum, une adresse :
http://www.cjoint.com/

A+ PAD

Oups: Bonjour José,

Message édité par: PAD, à: 28/04/2006 11:25

 

[Gilles25]

Re
Bonjour José, PAD

C'est exact j'ai juste rajouté un bouton qui me permet d'ouvrir un USF appelé 'navigateur' pour me déplacé dans le classeur, ainsi que deux formules pour mettre dans les cellules =AUJOURDHUI()et =MAINTENANT()rien de plus.

Merci PAD pour le lien je le garde sous le coude.

A+ Gilles

 

[PAD]

Re José,

C'est vrai je n'ai pas trop réfléchi aux désavantages de Ci-joint, je voulais surtout que Gilles se sorte de ça mouise.

Vraiment désolé,


A+ PAD

 

[Gilles25]

Re,

Bingo José, j'ai viré le bouton en question et ça fonctionne, mais ce bouton j'en ai besoin, alors comment faire ???????????

 

[Gilles25]

Re,

Boite à outil contrôles josé, tu crois que je doit essayer avec un bouton formulaire ????

Gilles

 

[Gilles25]

Re

Office 2003, mais aaaaaaaaaa yest, j'ai trouvé grace à toi et j'explique:

J'ai donc supprimé le bouton outil contrôle et je l'ai remplacé par un bouton formulaire en y affectant la macro suivante:
Sub Macro10activenavigateur()

' Macro10activenavigateur Macro
'ouvrir formulaire de navigation
NAVIGATEUR.Show
End Sub

Et ben tu sais quoi ??????????
ça marche MERCI José.
A+ Gilles

 

[Charly2]

Bonsoir Gilles, José et PAD,
bonsoir à toutes et à tous,
et j'en profite pour faire un coucou à toute ma famille

Gilles, juste 2 solutions à tester parce que j'ai déjà eu ce genre de souci sous XL97 :

1. dans les propriétés de ton bouton (barre d'outils contrôles), tu places TakeFocusOnClick à False,

ou

2. dans ta procédure Workbook_Open, tu ajoutes Range('A1').Select avant d'activer ta feuille...

Voili voilà

A+