OVH Cloud OVH Cloud

Macro complémentaire

4 réponses
Avatar
STEN83
Bonjour a tous tout d'abord tout mes voeux pour cette nouvelle année!

Dans un classeur comportant 8 feuilles, le feuille 1 sert de menu principal
avec des boutons pour naviguer dans le reste du classeur.
J'ai enregistré les macros dans un classeur et enregistré en xla (macro
complémentaire).
jusque la rien de particulier, le problème c'est que lorsque je veux aller
dans une autre feuille via un bouton d'accès qui se trouve sur le menu
principal j'ai une erreur de code.
Je ne trouve pas la solution voila ce que j'ai dans mon module qui se trouve
dans le xla:

Sub ActiveCaisse1 ()

recette_journaliere_caisse1.activate

End sub

la on me demande de nommé une variable ce que j'ai fait et ce qui donne

Sub ActiveXaisse1 ()

Dim recette_journaliere_caisse1 As Sheets

recette_journaliere_caisse1.Activate

Ends Sub

et là toujour une erreur !!!
Que dois-je mettre pour que cela fonctionne

Merci a tous

--
Le partage du savoir contribue à l'amélioration de la condition humaine!
Merci à tous

4 réponses

Avatar
Pounet95
Bonjour,
Je n'ai pas vérifié, mais il me semble que le nom est trop long
De mémoire ce doit être limité à 30 ou 31 caractères

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"STEN83" a écrit dans le message de news:

Bonjour a tous tout d'abord tout mes voeux pour cette nouvelle année!

Dans un classeur comportant 8 feuilles, le feuille 1 sert de menu
principal
avec des boutons pour naviguer dans le reste du classeur.
J'ai enregistré les macros dans un classeur et enregistré en xla (macro
complémentaire).
jusque la rien de particulier, le problème c'est que lorsque je veux aller
dans une autre feuille via un bouton d'accès qui se trouve sur le menu
principal j'ai une erreur de code.
Je ne trouve pas la solution voila ce que j'ai dans mon module qui se
trouve
dans le xla:

Sub ActiveCaisse1 ()

recette_journaliere_caisse1.activate

End sub

la on me demande de nommé une variable ce que j'ai fait et ce qui donne

Sub ActiveXaisse1 ()

Dim recette_journaliere_caisse1 As Sheets

recette_journaliere_caisse1.Activate

Ends Sub

et là toujour une erreur !!!
Que dois-je mettre pour que cela fonctionne

Merci a tous

--
Le partage du savoir contribue à l'amélioration de la condition humaine!
Merci à tous


Avatar
Pounet95
Re,

Autant pour moi, j'ai tiré trop vite.
La longueur est bonne mais le fait de déclarer en objet Sheets n'est pas
bon.

il faut

Dim recette_journaliere_caisse1 as WorkSheet

et ensuite 'affecter' l'objet

Set recette_journaliere_caisse1 þuil1

Là, ça devrait aller

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"STEN83" a écrit dans le message de news:

Bonjour a tous tout d'abord tout mes voeux pour cette nouvelle année!

Dans un classeur comportant 8 feuilles, le feuille 1 sert de menu
principal
avec des boutons pour naviguer dans le reste du classeur.
J'ai enregistré les macros dans un classeur et enregistré en xla (macro
complémentaire).
jusque la rien de particulier, le problème c'est que lorsque je veux aller
dans une autre feuille via un bouton d'accès qui se trouve sur le menu
principal j'ai une erreur de code.
Je ne trouve pas la solution voila ce que j'ai dans mon module qui se
trouve
dans le xla:

Sub ActiveCaisse1 ()

recette_journaliere_caisse1.activate

End sub

la on me demande de nommé une variable ce que j'ai fait et ce qui donne

Sub ActiveXaisse1 ()

Dim recette_journaliere_caisse1 As Sheets

recette_journaliere_caisse1.Activate

Ends Sub

et là toujour une erreur !!!
Que dois-je mettre pour que cela fonctionne

Merci a tous

--
Le partage du savoir contribue à l'amélioration de la condition humaine!
Merci à tous


Avatar
STEN83
Merci je vais essayer si cela fonctionne
--
Le partage du savoir contribue à l'amélioration de la condition humaine!
Merci à tous



Re,

Autant pour moi, j'ai tiré trop vite.
La longueur est bonne mais le fait de déclarer en objet Sheets n'est pas
bon.

il faut

Dim recette_journaliere_caisse1 as WorkSheet

et ensuite 'affecter' l'objet

Set recette_journaliere_caisse1 þuil1

Là, ça devrait aller

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"STEN83" a écrit dans le message de news:

Bonjour a tous tout d'abord tout mes voeux pour cette nouvelle année!

Dans un classeur comportant 8 feuilles, le feuille 1 sert de menu
principal
avec des boutons pour naviguer dans le reste du classeur.
J'ai enregistré les macros dans un classeur et enregistré en xla (macro
complémentaire).
jusque la rien de particulier, le problème c'est que lorsque je veux aller
dans une autre feuille via un bouton d'accès qui se trouve sur le menu
principal j'ai une erreur de code.
Je ne trouve pas la solution voila ce que j'ai dans mon module qui se
trouve
dans le xla:

Sub ActiveCaisse1 ()

recette_journaliere_caisse1.activate

End sub

la on me demande de nommé une variable ce que j'ai fait et ce qui donne

Sub ActiveXaisse1 ()

Dim recette_journaliere_caisse1 As Sheets

recette_journaliere_caisse1.Activate

Ends Sub

et là toujour une erreur !!!
Que dois-je mettre pour que cela fonctionne

Merci a tous

--
Le partage du savoir contribue à l'amélioration de la condition humaine!
Merci à tous






Avatar
STEN83
Bonjour,
j'ai essayer ce que tu m'a donné sans résultat cela ne fonctionne pas peut
être parce que les feuilles sont dans le même classeur?
si tu as un exemple a me donner je suis prenneur.
Merci
--
Le partage du savoir contribue à l'amélioration de la condition humaine!
Merci à tous



Re,

Autant pour moi, j'ai tiré trop vite.
La longueur est bonne mais le fait de déclarer en objet Sheets n'est pas
bon.

il faut

Dim recette_journaliere_caisse1 as WorkSheet

et ensuite 'affecter' l'objet

Set recette_journaliere_caisse1 þuil1

Là, ça devrait aller

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"STEN83" a écrit dans le message de news:

Bonjour a tous tout d'abord tout mes voeux pour cette nouvelle année!

Dans un classeur comportant 8 feuilles, le feuille 1 sert de menu
principal
avec des boutons pour naviguer dans le reste du classeur.
J'ai enregistré les macros dans un classeur et enregistré en xla (macro
complémentaire).
jusque la rien de particulier, le problème c'est que lorsque je veux aller
dans une autre feuille via un bouton d'accès qui se trouve sur le menu
principal j'ai une erreur de code.
Je ne trouve pas la solution voila ce que j'ai dans mon module qui se
trouve
dans le xla:

Sub ActiveCaisse1 ()

recette_journaliere_caisse1.activate

End sub

la on me demande de nommé une variable ce que j'ai fait et ce qui donne

Sub ActiveXaisse1 ()

Dim recette_journaliere_caisse1 As Sheets

recette_journaliere_caisse1.Activate

Ends Sub

et là toujour une erreur !!!
Que dois-je mettre pour que cela fonctionne

Merci a tous

--
Le partage du savoir contribue à l'amélioration de la condition humaine!
Merci à tous