Equivalent PrintArea pour delphi [Résolu]

Messages postés
26
Date d'inscription
vendredi 7 mars 2003
Statut
Membre
Dernière intervention
22 octobre 2010
- - Dernière réponse : pratrick
Messages postés
26
Date d'inscription
vendredi 7 mars 2003
Statut
Membre
Dernière intervention
22 octobre 2010
- 15 juin 2010 à 20:02
Messieurs Bonjour
j'ai une petite question qui est toute bête
je n'arrive pas à faire une zone d'impression sur excel
j'ai tente sans succès
OleApplication.Range['A1:G51'].select;
OleApplication.Selection.PageSetup.PrintArea :=true;


quelqu'un a t'il une petite idée
d'avance merci
Afficher la suite 

2 réponses

Meilleure réponse
Messages postés
418
Date d'inscription
mardi 3 janvier 2006
Statut
Membre
Dernière intervention
26 novembre 2013
2
3
Merci
Salut.

D'après le code de la macro créée sur Excel, essaye ceci:

with OleApplication do
begin
    Range['A1:G51'].Select; // ceci n'est pas nécessaire 
    ActiveSheet.PageSetup.PrintArea = '$A$1:$G$51';
end;


A +
Thierry

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 207 internautes nous ont dit merci ce mois-ci

Commenter la réponse de ThWilliam
Messages postés
26
Date d'inscription
vendredi 7 mars 2003
Statut
Membre
Dernière intervention
22 octobre 2010
1
0
Merci
En effet tes indications mon bien aidé
j'ai mis
OleApplication.ActiveSheet.PageSetup.PrintArea := '$A$1:$G$51';


et parfait la zone d'impression est activé
Commenter la réponse de pratrick