créer une copie d'une feuille en vba

FILK

20/01/2006 à 15:48

Bonjour Philippe,

As-tu essayé ceci ?

ActiveSheet.Copy Before:=Sheets(1)

Je suis étonné par tes symptomes. Que cela fasse une erreur,OK, mais que
cela ne fasse rien, c'est étonnant ?

As-tu une instruction du type "on error resume next" au début de ton code ?

Philippe

Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

Jacky

20/01/2006 à 15:51

Bonjour,

Comment est lancé la macro ??

JJ

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

Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

Philippe

20/01/2006 à 15:58

Je suis aussi extrêmement étonné.
Il n'y a de code que les deux lignes citées
Ta soluce ne marche pas non plus
Je confirme que "il ne se passe rien", rien que je puisse voir en tous cas.
Aucun message d'erreur, et aucun résultat

J'ai fermé Excel, et je n'ai rouvert que ce classeur.
Toujours rien.
J'y crois pas.

Bonjour Philippe,

As-tu essayé ceci ?

ActiveSheet.Copy Before:=Sheets(1)

Je suis étonné par tes symptomes. Que cela fasse une erreur,OK, mais que
cela ne fasse rien, c'est étonnant ?

As-tu une instruction du type "on error resume next" au début de ton code ?

Philippe

Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

Philippe

20/01/2006 à 16:05

à la main !
exécutée dans la fenêtre VBA

je viens de faire la même chose avec un beau classeur vierge

j'enregistre une macro
et quand je l'exécute...
... rien ! même pas une insulte de VBA me traitant d'infâme ignare

je comprends pas,
ya aucune raison que ça marche pas (enfin, j'aimerais savoir quelle est la
raison)
je trouve des référence à cette méthode sur le web !
exemple :
Worksheets("MyBeginning").Copy after:=Worksheets(Worksheets.Count)
http://www.mvps.org/dmcritchie/excel/sheets.htm

mais pour moi,
rien à faire !

Bonjour,

Comment est lancé la macro ??

JJ

"Philippe" a écrit dans le message de
news:
Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

FILK

20/01/2006 à 16:09

Ca ne te dis pas de mettre le fichier sur cjoint.com ? (ca dure 3 secondes :
tu parcours ton fichier, ca te donne une URL que tu copies dans ton prochain
post)

Ce sera largement plus facile pour t'aider.

Philippe

Bonjour,

Comment est lancé la macro ??

JJ

"Philippe" a écrit dans le message de
news:
Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

JLuc

20/01/2006 à 16:09

Outils/Macros/Macro... selectionner la macro cree (Macro1, surement)
Executer

Philippe avait soumis l'idée :

Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

--
JLuc

Jacky

20/01/2006 à 16:11

Ceci fonctionne ??
'----------
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
MsgBox "test"
End Sub
'--------
JJ

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

à la main !
exécutée dans la fenêtre VBA

je viens de faire la même chose avec un beau classeur vierge

j'enregistre une macro
et quand je l'exécute...
... rien ! même pas une insulte de VBA me traitant d'infâme ignare

je comprends pas,
ya aucune raison que ça marche pas (enfin, j'aimerais savoir quelle est la
raison)
je trouve des référence à cette méthode sur le web !
exemple :
Worksheets("MyBeginning").Copy after:=Worksheets(Worksheets.Count)
http://www.mvps.org/dmcritchie/excel/sheets.htm

mais pour moi,
rien à faire !

Bonjour,

Comment est lancé la macro ??

JJ

"Philippe" a écrit dans le message
de

news:
Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

Philippe

20/01/2006 à 16:22

Avec plaisir,
voilà

que ce soit la macro 2 ou macro 3
rien à faire

Merci Filk

http://cjoint.com/?buqtpTJ6DU

Ca ne te dis pas de mettre le fichier sur cjoint.com ? (ca dure 3 secondes :
tu parcours ton fichier, ca te donne une URL que tu copies dans ton prochain
post)

Ce sera largement plus facile pour t'aider.

Philippe

Bonjour,

Comment est lancé la macro ??

JJ

"Philippe" a écrit dans le message de
news:
Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

JLuc

20/01/2006 à 16:28

Chez moi, Macro2 Macro3 fonctionnent :/

Philippe avait soumis l'idée :

Avec plaisir,
voilà

que ce soit la macro 2 ou macro 3
rien à faire

Merci Filk

http://cjoint.com/?buqtpTJ6DU

Ca ne te dis pas de mettre le fichier sur cjoint.com ? (ca dure 3 secondes :
tu parcours ton fichier, ca te donne une URL que tu copies dans ton prochain
post)

Ce sera largement plus facile pour t'aider.

Philippe

Bonjour,

Comment est lancé la macro ??

JJ

"Philippe" a écrit dans le message de
news:
Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

--
JLuc

Philippe

20/01/2006 à 16:34

Merci Jacky,

Non ceci ne fonctionne pas :
ça ressemble à une macro de feuille
qui se déclenche sur un changement dans une cellule de la feuille.

J'ai placé ma macro dans Module1.
Mes autres macros fonctionnent très bien.
Je lance l'exécution comme souvent :
en cliquant sur exécuter sub

Ceci fonctionne ??
'----------
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
MsgBox "test"
End Sub
'--------
JJ

"Philippe" a écrit dans le message de
news:
à la main !
exécutée dans la fenêtre VBA

je viens de faire la même chose avec un beau classeur vierge

j'enregistre une macro
et quand je l'exécute...
... rien ! même pas une insulte de VBA me traitant d'infâme ignare

je comprends pas,
ya aucune raison que ça marche pas (enfin, j'aimerais savoir quelle est la
raison)
je trouve des référence à cette méthode sur le web !
exemple :
Worksheets("MyBeginning").Copy after:=Worksheets(Worksheets.Count)
http://www.mvps.org/dmcritchie/excel/sheets.htm

mais pour moi,
rien à faire !

Bonjour,

Comment est lancé la macro ??

JJ

"Philippe" a écrit dans le message
de

news:
Bonjour,

J'ai besoin de créer une copie d'une feuille en vba.
J'ai enregistrer une macro :
click droit sur onglet déplacer ou copier créer une copie

Voilà le code résultat :
Sheets("modele").Select
Sheets("modele").Copy Before:=Sheets(1)

Mais ça ne marche pas : ya tout simplement rien qui se passe !

Quelqu'un aurait-il une idée ?
Merci d'avance,
Philippe

créer une copie d'une feuille en vba

10 réponses

Veuillez sélectionner un problème