OVH Cloud OVH Cloud

pb de macros

6 réponses
Avatar
rick
bonjour,

cette macro me permet de copier une feuille d'un classeur et créer une
feuille dans un autre classeur en copiant cette feuille.

le probleme est que sur cette feuille j'ai des objets (bouton de commande).
je voudrai aussi qu'il apparaissent dans l'autre classeur.
mais le probleme est quand j'ouvre ce nouveau classeur, il est en lien avec
le classeur ancien. chose que je ne souhaite pas

les liaisons sont du au fait des boutons de commande.collé sur une autre
feuille

comment y remedier?
la macro est :
For Each sh In leClassACopier.Worksheets
If Not FeuilleExiste(leNouvClass, sh.Name) Then
leNouvClass.Worksheets.Add
leNouvClass.ActiveSheet.Name = sh.Name
leClassACopier.Worksheets(sh.Name).Cells.Copy _
leNouvClass.Worksheets(sh.Name).Range("A1")
leNouvClass.Worksheets(sh.Name).Visible = xlSheetVeryHidden
End If

merci d'avance

6 réponses

Avatar
Philippe.R
Bonjour,
La piste la plus efficace est sans aucun doute celle ci :
http://www.excelabo.net/xl/barres.php#exemplebo
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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

bonjour,

cette macro me permet de copier une feuille d'un classeur et créer une
feuille dans un autre classeur en copiant cette feuille.

le probleme est que sur cette feuille j'ai des objets (bouton de commande).
je voudrai aussi qu'il apparaissent dans l'autre classeur.
mais le probleme est quand j'ouvre ce nouveau classeur, il est en lien avec
le classeur ancien. chose que je ne souhaite pas

les liaisons sont du au fait des boutons de commande.collé sur une autre
feuille

comment y remedier?
la macro est :
For Each sh In leClassACopier.Worksheets
If Not FeuilleExiste(leNouvClass, sh.Name) Then
leNouvClass.Worksheets.Add
leNouvClass.ActiveSheet.Name = sh.Name
leClassACopier.Worksheets(sh.Name).Cells.Copy _
leNouvClass.Worksheets(sh.Name).Range("A1")
leNouvClass.Worksheets(sh.Name).Visible = xlSheetVeryHidden
End If

merci d'avance


Avatar
rick
c'est sur quelle macro, car au fait sur le lien que tu m'as donnée cela parle
des barres?

mercid 'avance.


Bonjour,
La piste la plus efficace est sans aucun doute celle ci :
http://www.excelabo.net/xl/barres.php#exemplebo
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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

bonjour,

cette macro me permet de copier une feuille d'un classeur et créer une
feuille dans un autre classeur en copiant cette feuille.

le probleme est que sur cette feuille j'ai des objets (bouton de commande).
je voudrai aussi qu'il apparaissent dans l'autre classeur.
mais le probleme est quand j'ouvre ce nouveau classeur, il est en lien avec
le classeur ancien. chose que je ne souhaite pas

les liaisons sont du au fait des boutons de commande.collé sur une autre
feuille

comment y remedier?
la macro est :
For Each sh In leClassACopier.Worksheets
If Not FeuilleExiste(leNouvClass, sh.Name) Then
leNouvClass.Worksheets.Add
leNouvClass.ActiveSheet.Name = sh.Name
leClassACopier.Worksheets(sh.Name).Cells.Copy _
leNouvClass.Worksheets(sh.Name).Range("A1")
leNouvClass.Worksheets(sh.Name).Visible = xlSheetVeryHidden
End If

merci d'avance






Avatar
Philippe.R
C'est bien celle des barres dont je parle ; de barres d'outils perso plus précisément.
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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

c'est sur quelle macro, car au fait sur le lien que tu m'as donnée cela parle
des barres?

mercid 'avance.


Bonjour,
La piste la plus efficace est sans aucun doute celle ci :
http://www.excelabo.net/xl/barres.php#exemplebo
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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

bonjour,

cette macro me permet de copier une feuille d'un classeur et créer une
feuille dans un autre classeur en copiant cette feuille.

le probleme est que sur cette feuille j'ai des objets (bouton de commande).
je voudrai aussi qu'il apparaissent dans l'autre classeur.
mais le probleme est quand j'ouvre ce nouveau classeur, il est en lien avec
le classeur ancien. chose que je ne souhaite pas

les liaisons sont du au fait des boutons de commande.collé sur une autre
feuille

comment y remedier?
la macro est :
For Each sh In leClassACopier.Worksheets
If Not FeuilleExiste(leNouvClass, sh.Name) Then
leNouvClass.Worksheets.Add
leNouvClass.ActiveSheet.Name = sh.Name
leClassACopier.Worksheets(sh.Name).Cells.Copy _
leNouvClass.Worksheets(sh.Name).Range("A1")
leNouvClass.Worksheets(sh.Name).Visible = xlSheetVeryHidden
End If

merci d'avance








Avatar
rick
mais cela ne repond pas à ma questions,

je comprend pas?

ou veut tu en venir?

merci


C'est bien celle des barres dont je parle ; de barres d'outils perso plus précisément.
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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

c'est sur quelle macro, car au fait sur le lien que tu m'as donnée cela parle
des barres?

mercid 'avance.


Bonjour,
La piste la plus efficace est sans aucun doute celle ci :
http://www.excelabo.net/xl/barres.php#exemplebo
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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

bonjour,

cette macro me permet de copier une feuille d'un classeur et créer une
feuille dans un autre classeur en copiant cette feuille.

le probleme est que sur cette feuille j'ai des objets (bouton de commande).
je voudrai aussi qu'il apparaissent dans l'autre classeur.
mais le probleme est quand j'ouvre ce nouveau classeur, il est en lien avec
le classeur ancien. chose que je ne souhaite pas

les liaisons sont du au fait des boutons de commande.collé sur une autre
feuille

comment y remedier?
la macro est :
For Each sh In leClassACopier.Worksheets
If Not FeuilleExiste(leNouvClass, sh.Name) Then
leNouvClass.Worksheets.Add
leNouvClass.ActiveSheet.Name = sh.Name
leClassACopier.Worksheets(sh.Name).Cells.Copy _
leNouvClass.Worksheets(sh.Name).Range("A1")
leNouvClass.Worksheets(sh.Name).Visible = xlSheetVeryHidden
End If

merci d'avance












Avatar
Clément Marcotte
Me semble que cela ne prend pas la tête à Papineau pour voir que si tu
mets tes boutons dans une barre d'outils, ils ne seront plus dans ta
feuille.



--
On apprend pas à un vieux singe à faire des grimaces
"rick" a écrit dans le message de
news:
mais cela ne repond pas à ma questions,

je comprend pas?

ou veut tu en venir?

merci


C'est bien celle des barres dont je parle ; de barres d'outils
perso plus précisément.


--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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



c'est sur quelle macro, car au fait sur le lien que tu m'as
donnée cela parle



des barres?

mercid 'avance.


Bonjour,
La piste la plus efficace est sans aucun doute celle ci :
http://www.excelabo.net/xl/barres.php#exemplebo
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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





bonjour,

cette macro me permet de copier une feuille d'un classeur et
créer une





feuille dans un autre classeur en copiant cette feuille.

le probleme est que sur cette feuille j'ai des objets (bouton
de commande).





je voudrai aussi qu'il apparaissent dans l'autre classeur.
mais le probleme est quand j'ouvre ce nouveau classeur, il
est en lien avec





le classeur ancien. chose que je ne souhaite pas

les liaisons sont du au fait des boutons de commande.collé
sur une autre





feuille

comment y remedier?
la macro est :
For Each sh In leClassACopier.Worksheets
If Not FeuilleExiste(leNouvClass, sh.Name) Then
leNouvClass.Worksheets.Add
leNouvClass.ActiveSheet.Name = sh.Name
leClassACopier.Worksheets(sh.Name).Cells.Copy _
leNouvClass.Worksheets(sh.Name).Range("A1")
leNouvClass.Worksheets(sh.Name).Visible = xlSheetVeryHidden
End If

merci d'avance














Avatar
rick
non mais c'est pas ce que souhaite, il faut que la forme reste la meme, sans
mettre les boutons de commande dans la barre d'outils.

je sais pas quelle astuce employer?

merci d'avance.


Me semble que cela ne prend pas la tête à Papineau pour voir que si tu
mets tes boutons dans une barre d'outils, ils ne seront plus dans ta
feuille.



--
On apprend pas à un vieux singe à faire des grimaces
"rick" a écrit dans le message de
news:
mais cela ne repond pas à ma questions,

je comprend pas?

ou veut tu en venir?

merci


C'est bien celle des barres dont je parle ; de barres d'outils
perso plus précisément.


--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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



c'est sur quelle macro, car au fait sur le lien que tu m'as
donnée cela parle



des barres?

mercid 'avance.


Bonjour,
La piste la plus efficace est sans aucun doute celle ci :
http://www.excelabo.net/xl/barres.php#exemplebo
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

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





bonjour,

cette macro me permet de copier une feuille d'un classeur et
créer une





feuille dans un autre classeur en copiant cette feuille.

le probleme est que sur cette feuille j'ai des objets (bouton
de commande).





je voudrai aussi qu'il apparaissent dans l'autre classeur.
mais le probleme est quand j'ouvre ce nouveau classeur, il
est en lien avec





le classeur ancien. chose que je ne souhaite pas

les liaisons sont du au fait des boutons de commande.collé
sur une autre





feuille

comment y remedier?
la macro est :
For Each sh In leClassACopier.Worksheets
If Not FeuilleExiste(leNouvClass, sh.Name) Then
leNouvClass.Worksheets.Add
leNouvClass.ActiveSheet.Name = sh.Name
leClassACopier.Worksheets(sh.Name).Cells.Copy _
leNouvClass.Worksheets(sh.Name).Range("A1")
leNouvClass.Worksheets(sh.Name).Visible = xlSheetVeryHidden
End If

merci d'avance