Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
Pour imprimer une feuille dans Excel, cette dernière n'a pas besoin d'être activé. As-tu des problèmes avec la syntaxe que tu as utilisée ? Si oui, quel est le message d'erreur ?
With worksheets("Onglet concerné") .Printout Copies:=1 End with
"Yvan" a écrit dans le message de news:
Bonjour,
Dans l'un de mes classeurs, si l'on active un onglet, cela déclenche une macro.
Pour diverses raisons, je souhaite dans certaines occasions imprimer cet onglet.
Mais avec une formule du type :
With worksheets("Onglet concerné") .Printout Copies:=1 End with
la macro est lancée puisque l'onglet est activé !!!
Comment faire pour éviter cet inconvénient ???
-- Merci pour vos réponses.
Pour imprimer une feuille dans Excel, cette dernière n'a
pas besoin d'être activé. As-tu des problèmes avec la
syntaxe que tu as utilisée ? Si oui, quel est le message d'erreur ?
With worksheets("Onglet concerné")
.Printout Copies:=1
End with
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
713D31FE-44AB-489E-9E4D-88116F2711CB@microsoft.com...
Bonjour,
Dans l'un de mes classeurs, si l'on active un onglet, cela déclenche une
macro.
Pour diverses raisons, je souhaite dans certaines occasions imprimer cet
onglet.
Mais avec une formule du type :
With worksheets("Onglet concerné")
.Printout Copies:=1
End with
la macro est lancée puisque l'onglet est activé !!!
Pour imprimer une feuille dans Excel, cette dernière n'a pas besoin d'être activé. As-tu des problèmes avec la syntaxe que tu as utilisée ? Si oui, quel est le message d'erreur ?
With worksheets("Onglet concerné") .Printout Copies:=1 End with
"Yvan" a écrit dans le message de news:
Bonjour,
Dans l'un de mes classeurs, si l'on active un onglet, cela déclenche une macro.
Pour diverses raisons, je souhaite dans certaines occasions imprimer cet onglet.
Mais avec une formule du type :
With worksheets("Onglet concerné") .Printout Copies:=1 End with
la macro est lancée puisque l'onglet est activé !!!
Comment faire pour éviter cet inconvénient ???
-- Merci pour vos réponses.
Youky
Salut Yvan, Pour désactiver l'événement Activation d'un onglet Youky
Application.EnableEvents = False With Worksheets("Feuil2") .PrintOut Copies:=1 End With Application.EnableEvents = True
Salut Yvan,
Pour désactiver l'événement Activation d'un onglet
Youky
Application.EnableEvents = False
With Worksheets("Feuil2")
.PrintOut Copies:=1
End With
Application.EnableEvents = True
Salut Yvan, Pour désactiver l'événement Activation d'un onglet Youky
Application.EnableEvents = False With Worksheets("Feuil2") .PrintOut Copies:=1 End With Application.EnableEvents = True
FFO
Salut Yvan
Si tu veux éxécuter ces lignes de manière occasionnelle et non à l'activation de l' onglet Soit tu mets avant ces lignes une condition pour leur éxécution (à déterminer) If Condition then With worksheets("Onglet concerné") .Printout Copies:=1 End with End If
Soit dans le VBA de l'onglet à la suite de ton code tu les mets dans une autre procédure évennementielle de type Double click par exemple : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) With worksheets("Onglet concerné") .Printout Copies:=1 End with End Sub
Un simple doubleclick dans une cellule déclenchera l'impression
Soit tu intégres ces lignes dans un module classique relié à un bouton que tu actives à la demande
Espérant avoir répondu à ton attente
Bonjour,
Dans l'un de mes classeurs, si l'on active un onglet, cela déclenche une macro.
Pour diverses raisons, je souhaite dans certaines occasions imprimer cet onglet.
Mais avec une formule du type :
With worksheets("Onglet concerné") .Printout Copies:=1 End with
la macro est lancée puisque l'onglet est activé !!!
Comment faire pour éviter cet inconvénient ???
-- Merci pour vos réponses.
Salut Yvan
Si tu veux éxécuter ces lignes de manière occasionnelle et non à
l'activation de l' onglet
Soit tu mets avant ces lignes une condition pour leur éxécution (à déterminer)
If Condition then
With worksheets("Onglet concerné")
.Printout Copies:=1
End with
End If
Soit dans le VBA de l'onglet à la suite de ton code tu les mets dans une
autre procédure évennementielle de type Double click par exemple :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
With worksheets("Onglet concerné")
.Printout Copies:=1
End with
End Sub
Un simple doubleclick dans une cellule déclenchera l'impression
Soit tu intégres ces lignes dans un module classique relié à un bouton que
tu actives à la demande
Espérant avoir répondu à ton attente
Bonjour,
Dans l'un de mes classeurs, si l'on active un onglet, cela déclenche une
macro.
Pour diverses raisons, je souhaite dans certaines occasions imprimer cet
onglet.
Mais avec une formule du type :
With worksheets("Onglet concerné")
.Printout Copies:=1
End with
la macro est lancée puisque l'onglet est activé !!!
Si tu veux éxécuter ces lignes de manière occasionnelle et non à l'activation de l' onglet Soit tu mets avant ces lignes une condition pour leur éxécution (à déterminer) If Condition then With worksheets("Onglet concerné") .Printout Copies:=1 End with End If
Soit dans le VBA de l'onglet à la suite de ton code tu les mets dans une autre procédure évennementielle de type Double click par exemple : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) With worksheets("Onglet concerné") .Printout Copies:=1 End with End Sub
Un simple doubleclick dans une cellule déclenchera l'impression
Soit tu intégres ces lignes dans un module classique relié à un bouton que tu actives à la demande
Espérant avoir répondu à ton attente
Bonjour,
Dans l'un de mes classeurs, si l'on active un onglet, cela déclenche une macro.
Pour diverses raisons, je souhaite dans certaines occasions imprimer cet onglet.
Mais avec une formule du type :
With worksheets("Onglet concerné") .Printout Copies:=1 End with
la macro est lancée puisque l'onglet est activé !!!