Comment imprimer une partie de tableau

[dedemimi]

bonjour
Je voudrais imprimer une partie d'un tableau excel,mais je n'arrive pas il buggue
je vous joint un fichier qui vous explique mon probleme
merci de vos réponses

 

[noviceAG]

Re : Comment imprimer une partie de tableau

Bonjour dedemimi, le Forum,

Tu sélectionne ta première zone et tu la nomme Kallee
La seconde zone Ceta

puis exemple :

Sub ImprKallee()
Application.Goto Reference:="Kallee"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Selection.PrintOut Copies:=1, Collate:=True
End Sub

En espérant t'avoir été utile

 

[dedemimi]

Re : Comment imprimer une partie de tableau

bonjour
a quel endroit je mets cette formule, je suis nul la dedans
merci

 

[noviceAG]

Re : Comment imprimer une partie de tableau

Re,
tu écris dans ton modèle :
j'ai fait un procede par macro j'ai copié la partie a imprimer que je colle dans feuil1 puis que je dois imprimer ensuite je l'efface

et dans ton code :
Sub vider()
'
' vider Macro
' Macro enregistrée le 03/12/2007 par Unicornis
'

'
Sheets(Array("janvier", "fevrier", "mars", "avril", "mai", "juin", "juillet", "aout", _
"sept", "oct", "nov", "decembre")).Select
Sheets("janvier").Activate
Range("B7:I7,B10:I10,B13:I13,B27:I27,B30:I30,B33:I33,B36:I36").Select
Range("B36").Activate
Selection.ClearContents
Sheets("janvier").Select
Range("B7").Select
End Sub

Sub IMPR_KALLEE()
'
' IMPR_KALLEE Macro
' Macro enregistrée le 03/12/2007 par Unicornis
'

'
Range("B4:J20").Select
Selection.Copy
ActiveWindow.ScrollWorkbookTabs Sheets:=-1
Sheets("Feuil1").Select
Range("B12").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Selection.ClearContents
Selection.Interior.ColorIndex = xlNone
Sheets("janvier").Select
Range("B4").Select
End Sub
Sub IMPR_CETA()
'
' IMPR_CETA Macro
' Macro enregistrée le 03/12/2007 par Unicornis
'

'
Range("B24:J40").Select
Selection.Copy
Sheets("Feuil1").Select
Range("B8").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Selection.ClearContents
Selection.Interior.ColorIndex = xlNone
Sheets("janvier").Select
Range("B27").Select
End Sub

Sub ImprKallee1()
Application.Goto Reference:="ImprKallee"
Selection.PrintOut Copies:=1, Collate:=True
End Sub

Sub ImprCeta1()
Application.Goto Reference:="ImprKallee"
Selection.PrintOut Copies:=1, Collate:=True
End Sub

Je te suggère de supprimer tout le code en rouge et de copier coller le code en bleu à la place.
D'affecter le code aux boutons correspondant de tes feuilles
Pour ce qui est de ton code Sub vider() je ne comprend pas car tu efface des cellules qui n'ont aucun contenu....

Fais un essai sur ta feuille janvier en cliquant sur les boutons IMPRIMER KALLEE & IMPRIMER CETA et dis-nous si ca te convient
Au plaisir

 

[noviceAG]

Re : Comment imprimer une partie de tableau

mes excuses,
j'aai omis de te dire que si tu regarde dans Insertion, Nom, Définir tu verras ImprKallee et ImprCeta qui définissent chacun la zone d'impression.
Tu peux ajouter également dans le code, la ligne en bleu :

Sub ImprKallee1()
Application.Goto Reference:="ImprKallee"
Selection.PrintOut Copies:=1, Collate:=True
Range("B3").Select 'pour supprimer la sélection
End Sub

Sub ImprCeta1()
Application.Goto Reference:="ImprKallee"
Selection.PrintOut Copies:=1, Collate:=True
Range("B24").Select 'pour supprimer la sélection
End Sub

et supprimer ta feuille 1

En te souhaitant une bonne soirée

 

[dedemimi]

Re : Comment imprimer une partie de tableau

bonjour,
merci noviceAG c'est presque ça ,le seul souci c'est quand je veux imprimer la page de fevrier ou de mars etc..
en appuyant sur le bouton kallee qui se trouve en fevrier ou en mars etc..il m'imprime celle de janvier, est ce que je dois creer pour chaque mois un nom de dossier associer a une macro,
je voudrais que chaque bouton de chaque mois soit associer au mois qu'on veut imprimer

 

[noviceAG]

Re : Comment imprimer une partie de tableau

dedemimi,

tu écris :
c'est presque ça ,le seul souci c'est quand je veux imprimer la page de fevrier ou de mars etc..
en appuyant sur le bouton kallee qui se trouve en fevrier ou en mars etc..il m'imprime celle de janvier, est ce que je dois creer pour chaque mois un nom de dossier associer a une macro,
je voudrais que chaque bouton de chaque mois soit associer au mois qu'on veut imprimer

j'ai fait un procede par macro j'ai copié la partie a imprimer que je colle dans feuil1 puis que je dois imprimer ensuite je l'efface

Sincèrement, sois dit sans te vexer, j'ai des doutes quand à ce que tu as écris dans ton fichier et cité en second ci-dessus. Bref.

Fais un clic droit sur chaque bouton de chaque mois puis sur Affecter une macro et sélectionne le nom de la macro Kallee1 et sur Ceta et sélectionne la mcaro Ceta1 et tu verras que cela fonctionne.
Tu peux aussi supprimer le bouton Remettre à zéro.

Courage ca vient bon.

 

[noviceAG]

Re : Comment imprimer une partie de tableau

En complément d'information, c'est l'enregistreur de macro qui a pondu ce code, je n'ai fait que nommer les deux zones distinctes auparavent.

Tu peux même si cela te convient, imprimer tous tes mois sur une seule page selon le même principe, si ca rentre dans tes besoins bien sur.

A toi de voir selon la finalité de ton projet.

Bonne soirée et bon travail.

 

[noviceAG]

Re : Comment imprimer une partie de tableau

Bonsoir le Forum, dedemimi,

Un petit merci de ta part pour nous informer si l'on avait répondu à ta demande et surtout à ce que tu souhaitais m'aurait personnellement fait plaisir comme à l'ensemble des membres de ce Forum d'ailleurs.

A moins que les remerciements ne fassent plus parties du language courant en france et sur ce Forum.

Dans ce cas je te prie d'accepter mes excuses.

En te souhaitant une bonne soirée.