Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro impression

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Absinth
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
A

Absinth

Guest
Bonjour bonjour,

Je voudrais créer une macro (sur un bouton) qui imprime une feuille.

L'utilisateur sélectionne, sur une feuille "PRINCIPAL", dans une liste déroulante, ce qu'il veut, et une petite formule me donne en F6 le nom de la feuille correspondante.

J'ai donc écrit:
Code: 
Sub Imprimer()
Sheets(Sheets("PRINCIPAL").Range("F6").Value).Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("PRINCIPAL").Activate
End Sub
Mais la macro plante et me rend:
Erreur d'execution '9':
L'indice n'appartient pas à la sélection.
Cliquez pour agrandir...

Quelqu'un aurait-il une solution à me proposer?
Je ne comprends pas l'erreur, erreur de code? j'ai oublié d'initialiser une variable ou quelque chose du style? je sais pas trop...

Merci d'avance...
 
Trier par date Trier par votes
Re : Macro impression

Bonjour,

La valeur que tu récupere en F6 ne doit pas etre correcte.
Il y a peut etre un (des) espace(s) à la fin.
En tous les cas je reproduits ton pb de cette façon ..
voir fichier joint
J'ai rajouter un petit bout de code pour voir s'il y a des espaces dans ton nom de feuille.
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Macro impression

J'ai pas trouvé d'espace ni quoi que ce soit...
Par contre j'ai ajouté une variable:

Code: 
Sub Imprimer()
Dim feuille As String
feuille = Sheets("PRINCIPAL").Range("F6").Value
Sheets(feuille).Select
ActiveWindow.SelectedSheets.PrintPreview
Sheets("PRINCIPAL").Activate
End Sub

Et là ca marche sans problème... 😱 ne pas chercher à comprendre, ne pas chercher...

Merci en tout cas 😉 (je ne connaissais pas .PrintPreview)
 
Vote positif 0 Vote négatif
Re : Macro impression


Il manque sur feuille les "feuille" je crois?
Jack
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

J
  • Résolu(e)
Microsoft 365 Valeur cellule dans un macro
2
Réponses
17
Affichages
689
job75
V
  • Question Question
XL 2016 transformer en boucle une macro créer avec l'enregistreur automatique
Réponses
3
Affichages
241
vazvaz
V
M
  • Résolu(e)
XL 2021 Problème d'activation d'une macro pour transférer des valeurs d'une feuille 1 à une feuille 2
Réponses
3
Affichages
421
MATLEA
M
T
  • Question Question
XL 2013 Impression, choix de feuilles et nombre de copie
Réponses
11
Affichages
787
AtTheOne
M
  • Résolu(e)
Microsoft 365 Erreur 9 macro
Réponses
3
Affichages
313
matmac
M
C
  • Résolu(e)
XL 2021 Userform impression + choix des feuilles
Réponses
8
Affichages
686
candido57
C
S
  • Résolu(e)
XL 2016 Ne pas imprimer si 0 dans une cellule
Réponses
14
Affichages
694
AtTheOne
N
  • Résolu(e)
Microsoft 365 Macro enregistrement automatique pdf
2
Réponses
18
Affichages
1 K
Nounours4173
N
  • Question Question
Autres fenêtre "Publication"
Réponses
10
Affichages
792
ph.vanne
O
  • Question Question
XL 2016 Erreur d'exécution 32809 Erreur définie par l'application ou par l'objet
Réponses
0
Affichages
468
Oddoneju
O
A
  • Résolu(e)
XL 2010 Impression par VBA
Réponses
4
Affichages
705
Appo1985
A
C
  • Résolu(e)
XL 2021 Macro pour mise en page
Réponses
11
Affichages
890
candido57
C
B
  • Résolu(e)
Microsoft 365 creation d'liste à imprimer
2 3 4
Réponses
51
Affichages
3 K
Banbara
B
N
  • Résolu(e)
Microsoft 365 Macro copier/coller entre deux tableaux structurés
3 4 5
Réponses
66
Affichages
3 K
job75
L
  • Question Question
Autres [ RESOLU ] Impression PDF via VBA
Réponses
5
Affichages
1 K
lechti31
L
B
  • Question Question
XL 2013 Comment trier les nom des feuilles et fusionner leur tableaux dans une une autre feuille ?
Réponses
10
Affichages
1 K
Compte Supprimé 979
C
C
  • Question Question
XL 2016 accès feuilles masquées par bouton
2
Réponses
26
Affichages
1 K
vgendron
M
  • Question Question
Microsoft 365 Macro VBA supprimer une colonne
Réponses
5
Affichages
688
marie3107
M
M
  • Question Question
Microsoft 365 Copier / coller avec mise en forme VBA
Réponses
0
Affichages
948
marie3107
M
D
  • Question Question
XL 2013 VBA pour une impression recto verso - petit cote
Réponses
4
Affichages
1 K
david54520
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…