> Tous les forums > Forum Bureautique
 Imprimer feuille sous condition.
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
jemiyo
  Posté le 24/03/2013 @ 12:32 
Aller en bas de la page 
Petit astucien

Voir second message



Modifié par jemiyo le 24/03/2013 15:22
Publicité
ferrand
 Posté le 24/03/2013 à 14:09 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Salut,

Si tu expliquais un peu mieux ce que tu fais : pourquoi une image ? Pourquoi on fait apparaître une feuille de calcul identique par un double clic ? Et ta condition : une date (n'immporte laquelle) ? Ou une date précise ? Et tu n'as rien défini pour l'impression... ?

jemiyo
 Posté le 24/03/2013 à 14:47 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Re.

Excusez moi, je n'avais pas fait attention que c'était une image.

J'ai rectifié et mis le tableur avec les explications.

A +

http://cjoint.com/?0CyoVb6Swko

ferrand
 Posté le 24/03/2013 à 15:41 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

OK ! Mais je ne vois pas de mise en page spécifique : si je regarde, on imprime sur du A4 en portrait, 2 documents dans le sens de la hauteur mais qui ne tiennent pas dans la page.

Il me semble que tu devrais faire tes réglages d'impression. C'est faisable par macro mais infiniment plus fastidieux à faire ! Et on verrait ce que tu veux obtenir un fois imprimé.

Ceci dit, compte tenu de l'allure de ton fichier, il me semble que la solution la plus simple sera de masquer les documents à ne pas imprimer avant de lancer l'impression (à confirmer).

jemiyo
 Posté le 24/03/2013 à 18:00 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Oui, je n'avais pas fait la mise en page sur le modèle posté.

Les fiches devront s'imprimer que s'il y a une date dans "date de création".

Il pourra y avoir 1, 2, 3 ou 4 fiches en impression suivant la condition demandée.(la 4ème fiche n'est pas encore crée.)

C'est pour cela que je cherche une solution pour imprimer que les fiches utiles (ici la 1 et 2)

Pour la solution que tu me proposes, c'est ce que je fait actuellement. Par contre comme il y en a pas mal, c'est très long.

http://cjoint.com/?0Cyr573vhsI

ferrand
 Posté le 24/03/2013 à 18:38 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Tu imprimes un document par page, tu as donc le choix entre 2 méthodes :

1) une macro pour masquer ce que tu n'imprimes pas, une autre pour démasquer après impression, et entre les deux tu lances ton impression d'un seul bloc ;

2) une macro pour tester chaque page avant de lancer ou non son impression.

C'est équivalent...

jemiyo
 Posté le 24/03/2013 à 19:15 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

J'avais essayé cette formules, mais ça ne marche pas.

Le Y1 correspond aux cellules que je veux imprimer. Mais je ne suis pas un pro en VBA

Sub Impression_Feuil1()
If [Y1] = 1 Then [A11:W22].PrintOut
If [Y1] = 2 Then [A24:W45].PrintOut
If [Y1] = 3 Then [A47:W68].PrintOut
End Sub

ferrand
 Posté le 24/03/2013 à 20:16 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

C'est quoi ce Y1, dans lequel je ne vois rien sur ton fichier. ?

Je vois aussi que tu as défini une zone d'impression discontinue, c'est peut-être pas le plus pratique : une zone continue avec des sauts de page devrait aboutir plus facilement au même résultat.

Si ta zone d'impression peut être définie préalablement et ne bougera pas, parfait, sinon faudra penser à définir ces éléments par macro.

A partir d'une zone d'impression déjà définie, ta macro devrait pouvoir prendre l'allure suivante :

With ActiveSheet [ou indication de la feuille]

For i = 8 To xxx Step 23 [puisque tu dois tester G8, G31, etc., une cellule par page, toutes les 23 lignes]

n = n + 1 [pour suivre tes numéros de page]

If .Cells(i, 7).Value > 0 Then .PrintOut From:= n, To:= n

Next i

End With

Je suis pas en mesure de tester. Regarde si ça fonctionne (pense à déclarer les variables dans ta macro)...

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
899,99 €PC portable 15.6 pouces Lenovo (Core i5, 8 Go de RAM, 512 Go SSD, GTX 1650 4 Go) à 899,99 €
Valable jusqu'au 16 Mai

Cdiscount fait une promotion sur le PC portable 15.6 pouces pouces Lenovo Ideapad 3 15ARH05 qui passe à 899,99 € alors qu'on le trouve ailleurs autour de 1100 €. Ce portable dispose d'un écran de 15.6 pouces FullHD (1920x1080), d'un processeur AMD Ryzen 7 4800H, de 16 Go de RAM, d'un SSD de 512 Go, d'une d'une carte graphique dédiée GeForce GTX 1650 TI 4 Go, du WiFi et du Bluetooth. L'ordinateur est livré sans OS. Vous pouvez installer Windows 10.


> Voir l'offre
28,79 €Support écran PC / TV pivotant sur pied (26 à 55 pouces, max 45 kg) à 28,79 € (via coupon)
Valable jusqu'au 16 Mai

Amazon propose actuellement le support écran PC / TV pivotant sur pied Bontec à 28,79 € seulement grâce à un coupon de réduction à activer sur la page du produit. Ce support est adapté aux écrans plats de 26 à 55 pouces LED, LCD et PLASMA à compatibilité VESA de 100x100 jusqu'à 400x400.  Il supporte jusqu'à 45Kg, est régable en hauteur et cache les câbles disgracieux à l'arrière. Vous pouvez le mettre par exemple sur un meuble pour surélever votre TV ou votre PC (et mettre une enceinte dessous ?) sans avoir besoin de percer le mur.


> Voir l'offre
149,69 €Casque sans fil Logitech G Pro X Lightspeed à 149,69 € livré
Valable jusqu'au 14 Mai

Amazon Espagne fait une promotion sur le casque sans fil Logitech G Pro X Lightspeed qui passe à 143,92 €. Comptez 5,77 € pour la livraison en France soit un total de 149,69 € livré alors qu'on le trouve ailleurs à partir de 185 €.

Conçu en collaboration avec de nombreux joueurs professionnels sur divers genres de jeux, le Logitech G Pro X Wireless Lightspeed Gaming Headset va vous permettre d'entendre les sons de votre jeu avec précision. Avec des transducteurs Pro-G de 50 mm en similicuir isolants, un son surround DTS Headphone:X 2.0, un microphone de qualité professionnelle disposant de la technologie Blue Vo!ce et une construction légère, le Logitech G Pro X Gaming Headset est l'accessoire idéal pour les tournois intenses. Le G Pro X Wireless Lightspeed est également équipée de la technologie sans fil Lightspeed qui permet des performances sans fil de niveau professionnel et une fiabilité inégalée.


De plus, il dispose de plusieurs profils d'égaliseur réglés par les professionnels afin que vous puissiez vous mettre dans la peau des meilleurs.


> Voir l'offre

Sujets relatifs
Copier plage de celules vers autre feuille sous condition
Copier tableaux vers autre feuille sous condition
Imprimer les lignes d'une feuille excell
Feuille de calcul sous excel / mot de passe
Comment imprimer 4 pages par feuille
Excel une addition sous condition
changer la couleur de police sous condition-valeur
somme sous condition
probléme pour imprimer sous words.
Libreoffice: insérer une image sous condition.
Plus de sujets relatifs à Imprimer feuille sous condition.
 > Tous les forums > Forum Bureautique