Macro pr imprimer zones discontinues (de Job75)...

[Christian0258]

Bonsoir à tout le forum,

J'utilise cette macro, de Job75, pour imprimer des zones discontinues sur un planning, d'une année, linéaire et (non en colonnes) cette macro fonctionne parfaitement dans ce cas.

Pourquoi cette macro ne fonctionne pas sur un planning en colonnes ???

Merci pour votre aide si précieuse.

Bien à vous.
Christian

 

[job75]

Re : Macro pr imprimer zones discontinues (de Job75)...

Bonjour Christian,

Pénible ta macro Workbook_Open qui met le mode de calcul en manuel 😡

Quant à ton problème il suffit de remplacer les 3 .EntireColumn par .EntireRow 🙄

Bonne journée.

 

[Christian0258]

Re : Macro pr imprimer zones discontinues (de Job75)...

Re, le forum, Job75,

Merci pour la modif à effectuer.
"Pénible ta macro Workbook_Open qui met le mode de calcul en manuel"... oui mais sinon c'est trop long lors des saisies...

Bien à toi,
Christian

 

[job75]

Re : Macro pr imprimer zones discontinues (de Job75)...

Re,

Tu fais ce que tu veux chez toi mais quand tu viens sur le forum pense que des utilisateurs non expérimentés qui ouvriront ton fichier ne comprendront pas forcément pourquoi ils ont des problèmes avec leurs formules sur d'autres fichiers.

A+

 

[job75]

Re : Macro pr imprimer zones discontinues (de Job75)...

Re,

Pour éviter tout souci ajoute cette macro dans ThisWorkbook :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim enregistré As Boolean
enregistré = Me.Saved
Application.Calculation = xlCalculationAutomatic
If enregistré Then Me.Save
End Sub

A+

 

[Christian0258]

Re : Macro pr imprimer zones discontinues (de Job75)...

Re, le forum, job75,

Ok, tu as raison (post4), message reçu.

Merci pour la macro post5.

Bien amicalement,

Christian