Macro pour imprimer selon critères...

C

Christian0258

XLDnaute Accro

• 26 Août 2007

• #16

Re : Macro pour imprimer selon critères...

Re,
bhbh,

ça plante à l'ouverture comme tout à l'heure, il faut que je mette Dim.. devant For Each c In Range([B2], [B65000].End(xlUp))
et si je le fais ça ouvre bien l'USF mais ça plante sur : c = ComboBox3.Value


à te lire
Christian

 

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 27 Août 2007

• #17

Re : Macro pour imprimer selon critères...

Bonjour à tout le forum,

Je souhaiterais votre aide pour la macro plante. J'ai trouver la cause, mais
j'ai besoin de vous pour régler le problème, compte tenu de mes très faibles connaissances en VBA .

Il y a dans le fichier joint les "explications"


Bien amicalement,
Christian

 

Pièces jointes

• c0258suite.zip

  43.5 KB · Affichages: 23
• c0258suite.zip

  43.5 KB · Affichages: 22
• c0258suite.zip

  43.5 KB · Affichages: 32

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 27 Août 2007

• #18

Re : Macro pour imprimer selon critères...

Bonjour, effectivement, tu utilisais déjà les variables dans un autre module. regarde le fichier joint

 

Pièces jointes

• c0258suite.zip

  42.8 KB · Affichages: 37
• c0258suite.zip

  42.8 KB · Affichages: 46
• c0258suite.zip

  42.8 KB · Affichages: 38

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 27 Août 2007

• #19

Re : Macro pour imprimer selon critères...

Re,

Merci, bhbh, pour ton travail énorme.

Ca fonctionne parfaitement mais c'est très long...

Peux-tu me dire.

Bien amicalement,
Christian

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 27 Août 2007

• #20

Re : Macro pour imprimer selon critères...

Qu'entends-tu par très long? Chez moi, c'est immédiat
As-tu des formules dans tes onglets?
Dans ce cas, tu peux rajouter cette ligne :
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual '<===< celle-ci
et en fin du code :
Application.Calculation = xlCalculationAutomatic '<===< celle-ci
Application.ScreenUpdating = True

 

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 27 Août 2007

• #21

Re : Macro pour imprimer selon critères...

Re,

Super, ça marche normalement... Tu es super sympa, tu ne m'as pas "laché "et je t'en suis très très reconnaissant.

Mais comment tout ce savoir, c'est énorme...lol

Grand grand merci pour tout, bhbh.

Bien amicalement,
Christian

 

Vote positif 0 Vote négatif