Equivalent PrintArea pour delphi [Résolu]

Messages postés
26
Date d'inscription
vendredi 7 mars 2003
Dernière intervention
22 octobre 2010
- - Dernière réponse : pratrick
Messages postés
26
Date d'inscription
vendredi 7 mars 2003
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 

Votre réponse

2 réponses

Meilleure réponse
Messages postés
424
Date d'inscription
mardi 3 janvier 2006
Dernière intervention
26 novembre 2013
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 95 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
Dernière intervention
22 octobre 2010
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

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.