Selectionner une zone d'impression en fonction d'une date dans une colonne

[ivan27]

Bonjour à tous,

Je souhaite sélectionner et imprimer une zone en fonction de la date dans une colonne.
Explications dans le fichiers joint.
Merci d'avance pour votre aide.
Bien cordialement,

Ivan

 

[job75]

Re : Selectionner une zone d'impression en fonction d'une date dans une colonne

Bonjour ivan27,

Pas besoin de VBA ni de bouton.

Définissez une zone d'impression quelconque.

Puis dans le Gestionnaire de noms redéfinissez le nom "Zone_d_impression" avec la formule :

=DECALER(Feuil1!$A$1;EQUIV(MAX(Feuil1!$C:$C);Feuil1!$C:$C;0)-1;;NB.SI(Feuil1!$C:$C;MAX(Feuil1!$C:$C));11)

Bien sûr le tableau doit avoir été trié sur les dates de la colonne C.

A+

 

[CBernardT]

Re : Selectionner une zone d'impression en fonction d'une date dans une colonne

Bonjour ivan27 et le Forum,

Salut à toi job75, j'aime bien le VBA avec ses boutons 🙂

 

[job75]

Re : Selectionner une zone d'impression en fonction d'une date dans une colonne

Re,

En VBA on peut évaluer une formule identique :

Sub Imprimer()
With Feuil1 'CodeName de la feuille
  .Activate
  On Error Resume Next 'si aucune date
  .PageSetup.PrintArea = _
  [OFFSET(A1,MATCH(MAX(C:C),C:C,0)-1,,COUNTIF(C:C,MAX(C:C)),11)].Address
  .PrintPreview 'pour tester
  '.PrintOut 'pour imprimer
End With
End Sub

A affecter au bouton.

Edit : salut Bernard, pas rafraîchi.

A+

 

[ivan27]

Re : Selectionner une zone d'impression en fonction d'une date dans une colonne

Bonsoir le Forum, job75, CBernardT,

Merci beaucoup pour vos propositions.
Bonne nuit à tous
Ivan