Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.
  • Initiateur de la discussion Initiateur de la discussion gui59300
  • 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 !

gui59300

XLDnaute Occasionnel
Bonjour

j'ai un classeur dans lequel je dois imprimer des données filtrées.

Pour ne pas avoir de problème avec les filtres je souhaite creer une macro que fasse un copier de la feuille servant de base et ensuite coller dans une autre feuille.

J'ai deux soucis avec ma macro :

La cellule C2 se vide tout le temps dans la feuille de données.
Je voudrais que les boutons ne se copie pas.
 

Pièces jointes

Re : macro imprimer

Bonjour,

1) Dans la macro associé au bouton imprimer (Macro1), supprimes l'avatn dernière ligne
ActiveCell.FormulaR1C1 = ""
c'est elle qui efface C2

2) Pour ne pas copier un bouton :
Clic droit/Format de contrôle/onglet Propriétés/choisir "Na pas déplacer ou dimensionner avec les cellules

Caillou
 
Re : macro imprimer

J'ai un dernier soucis avec le fichier

Lorsque je clique sur imprimer la macro se lance, mais une fois la macro lancé le menu déroulant à droite devient très grand. 😕 je ne comprend pas pourquoi et sur cela alourdit bcp lz fichier. Il passe de 150KILO à 5000KILO
 

Pièces jointes

Re : macro imprimer

Re,

Je n'ai aucun problème avec un menu qui deviendrait grand !!!!!!

Par contre, pour la taille du fichier, c'est la copie qui l'alourdit. Donc dans la macro, au lieu de copier toute la feuille, tu peux par exemple, ne copier qu'un nombre convenu de lignes.

Exemple la macro ci-dessous copie 500 lignes :
Code:
Sub Macro1()
    Sheets("autocontrôle mf2000").Select
    Rows("1:500").Select
    Selection.Copy
    Sheets("imprimer").Select
    Range("A1").Select
    ActiveSheet.Paste
    Sheets("autocontrôle mf2000").Select
    Range("A1").Select
    Application.CutCopyMode = False
End Sub

Caillou
 
Re : macro imprimer


merci le problème devait venir de la quantité de cellule
 
- 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

Discussions similaires

Réponses
4
Affichages
479
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…