OVH Cloud OVH Cloud

copie de feuilles Excel en VBA

13 réponses
Avatar
Caribou
Bonsoir à tous,
Bizarre, depuis mon passage à Excel XP/2002 (Excel 2000 aupravant), une
macro ne fonctionne plus :
Elle consistait à copier les feuilles d'un classeur dans un nouveau
classeur.

Sub Macro1()
Sheets(Array("Feuil1", "Feuil2")).Select
Sheets(Array("Feuil1", "Feuil2")).Copy
End Sub

Auparavant, lorsque la macro se terminait, j'avais un nouveau classeur, prêt
à être enregistré.
Maintenant, je reste sur mon classeur, avec ces deux feuilles sélectionnées.

Lorsque je fais un enregistrement auto de macro, c'est bien cette syntaxe
qui est reprise, mais pourtant, ça ne marche pas quand on la relance !

Heeelp !!!

3 réponses

1 2
Avatar
Caribou
J'ai trouvé !
C'est Kaspersky Personal Pro qui bloque !
Il empêche l'ouverture par macro d'un second classeur, probablement car ce
doit être une technique de virus.
Je vais voir comment le paramétrer pour autoriser l'ouverture d'un second
classeur.

Merci à tous de vos tests


"LSteph" a écrit dans le message de
news:
Bonsoir,
Avec d'autres versions d'ailleurs, les deux fonctionnent même si on est
pas obligé de faire un select avant le copy.


lSteph

"Caribou" a écrit dans le message de news:
42ab5746$0$17498$
Bonsoir à tous,
Bizarre, depuis mon passage à Excel XP/2002 (Excel 2000 aupravant), une
macro ne fonctionne plus :
Elle consistait à copier les feuilles d'un classeur dans un nouveau
classeur.

Sub Macro1()
Sheets(Array("Feuil1", "Feuil2")).Select
Sheets(Array("Feuil1", "Feuil2")).Copy
End Sub

Auparavant, lorsque la macro se terminait, j'avais un nouveau classeur,
prêt
à être enregistré.
Maintenant, je reste sur mon classeur, avec ces deux feuilles
sélectionnées.

Lorsque je fais un enregistrement auto de macro, c'est bien cette
syntaxe


qui est reprise, mais pourtant, ça ne marche pas quand on la relance !

Heeelp !!!








Avatar
Caribou
hop, voici l'option dans Kaspersky qui était incriminée (maintenant
autorisée) : http://svgape.free.fr/hfr/excel_avp.png



"Caribou" a écrit dans le message de
news:42ac2515$0$27150$
J'ai trouvé !
C'est Kaspersky Personal Pro qui bloque !
Il empêche l'ouverture par macro d'un second classeur, probablement car ce
doit être une technique de virus.
Je vais voir comment le paramétrer pour autoriser l'ouverture d'un second
classeur.

Merci à tous de vos tests


"LSteph" a écrit dans le message de
news:
Bonsoir,
Avec d'autres versions d'ailleurs, les deux fonctionnent même si on est
pas obligé de faire un select avant le copy.


lSteph

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


42ab5746$0$17498$
Bonsoir à tous,
Bizarre, depuis mon passage à Excel XP/2002 (Excel 2000 aupravant),
une



macro ne fonctionne plus :
Elle consistait à copier les feuilles d'un classeur dans un nouveau
classeur.

Sub Macro1()
Sheets(Array("Feuil1", "Feuil2")).Select
Sheets(Array("Feuil1", "Feuil2")).Copy
End Sub

Auparavant, lorsque la macro se terminait, j'avais un nouveau
classeur,



prêt
à être enregistré.
Maintenant, je reste sur mon classeur, avec ces deux feuilles
sélectionnées.

Lorsque je fais un enregistrement auto de macro, c'est bien cette
syntaxe


qui est reprise, mais pourtant, ça ne marche pas quand on la relance !

Heeelp !!!












Avatar
ChrisV
Bonjour Caribou,

Merci du retour, et pour cette info a noter sur les tablettes !


ChrisV


"Caribou" a écrit dans le message de news:
42ac2515$0$27150$
J'ai trouvé !
C'est Kaspersky Personal Pro qui bloque !
Il empêche l'ouverture par macro d'un second classeur, probablement car ce
doit être une technique de virus.
Je vais voir comment le paramétrer pour autoriser l'ouverture d'un second
classeur.

Merci à tous de vos tests


"LSteph" a écrit dans le message de
news:
Bonsoir,
Avec d'autres versions d'ailleurs, les deux fonctionnent même si on est
pas obligé de faire un select avant le copy.


lSteph

"Caribou" a écrit dans le message de
news:
42ab5746$0$17498$
Bonsoir à tous,
Bizarre, depuis mon passage à Excel XP/2002 (Excel 2000 aupravant), une
macro ne fonctionne plus :
Elle consistait à copier les feuilles d'un classeur dans un nouveau
classeur.

Sub Macro1()
Sheets(Array("Feuil1", "Feuil2")).Select
Sheets(Array("Feuil1", "Feuil2")).Copy
End Sub

Auparavant, lorsque la macro se terminait, j'avais un nouveau classeur,
prêt
à être enregistré.
Maintenant, je reste sur mon classeur, avec ces deux feuilles
sélectionnées.

Lorsque je fais un enregistrement auto de macro, c'est bien cette
syntaxe


qui est reprise, mais pourtant, ça ne marche pas quand on la relance !

Heeelp !!!












1 2