Définir zone d'impression VBA avec reférence dans cellulles

[mateaus]

Bonjour,

J'aimerais faire une macro qui va chercher les références qui sont calculées dans des cellules avec la fonction adresse.
A = Range("D233").Value
B = Range("G234").Value

Puis je voudrais définir ma zone d'impression avec ces références. Je n'y parviens pas.
ActiveSheet.PageSetup.PrintArea = A: B , C: D , E: F , G: H , i: J

J'ai essayé une autre méthode en mettant la fonction adresse dans VBA mais çà ne marche pas non plus.

ActiveSheet.PageSetup.PrintArea = Range(Cells(1, A), Cells(B, C)).Address , Range(Cells(1, A), Cells(B, C)).Address

Mon principale problème, c'est que j'ai plusieurs zone d'impression dans le même onglet.

Avez vous un exemple ?

 

[tototiti2008]

Re : Définir zone d'impression VBA avec reférence dans cellulles

Bonjour mateaus,

Bienvenue sur XLD,

Avez vous un exemple ?

C'est à toi de nous fournir un exemple de fichier, en expliquant bien ce qui est variable dans la définition de ta zone d'impression
Par exemple, on ne sait pas du tout ce que contiennent tes cellules D233 et G234 (c'est un peu loin d'ici et ma vue faiblit avec l'age 😉)

 

[tbft]

Re : Définir zone d'impression VBA avec reférence dans cellulles

Bonjour

Serait il possible d'avoir un fichier avec des données bidons mais avec les zones d'impressions souhaités bien identifié, stp?

 

[mateaus]

Re : Définir zone d'impression VBA avec reférence dans cellulles

Bonjour

Serait il possible d'avoir un fichier avec des données bidons mais avec les zones d'impressions souhaités bien identifié, stp?

Bonjour,

Voilà un exemple bidon comme demandé. J'ai fait une macro qui ne marche pas bien entendu. Dites moi si vous avez une solution.

 

[tbft]

Re : Définir zone d'impression VBA avec reférence dans cellulles

Bonjour

La macro fonctionne ou ne fonctionne pas... Je n'en sais rien... Je la trouve pas...
Serait il possible de vérifier si elle y est, svp?

 

[mateaus]

Re : Définir zone d'impression VBA avec reférence dans cellulles

Bonjour

La macro fonctionne ou ne fonctionne pas... Je n'en sais rien... Je la trouve pas...
Serait il possible de vérifier si elle y est, svp?

Ok elle ne s'est pas bien enregistrée, normalement çà devrait être bon maintenant.

 

[tbft]

Re : Définir zone d'impression VBA avec reférence dans cellulles

Bonjour

Essaye avec
ActiveSheet.PageSetup.PrintArea = A + ":" + B + "," + C + ":" + D

Tien moi au courant

 

[mateaus]

Re : Définir zone d'impression VBA avec reférence dans cellulles

Ok problème résolu