C# VSTO Excel 2007 - pb zone d'impression

Version imprimable

salut

j'ouvre un modèle excel2007 (.xltx) à partir d'un winform : pas de souci

ce fichier comporte une zone d'impression bien définie : ok

qd je l'ouvre en double cliquant dessus, il garde la zone d'impression...
mais qd je l'ouvre par le code, il ne conserve pas la zone d'impression ... :(

qq'un a-t-il déjà rencontré ce problème !!!

si oui, qq'un a-t-il une idée ???

merci bcp !
jp
voici mon code pour info ... simple ...
Précision : tester sous vista et xp : même souci ...
Code:

1 2 3 4 5 6 7 8 9 Excel.Application excel = new Microsoft.Office.Interop.Excel.Application(); excel.Visible = true; Excel.Workbook classeur; string chemin = @"C:\Users\jp.talbot\Desktop\classeur1.xltx"; object Omissing = Type.Missing; object Otrue = true; classeur = excel.Workbooks.Open(chemin, Omissing, Omissing, Omissing, Omissing, Omissing, Omissing, Omissing, Omissing, Omissing, Omissing, Omissing, Omissing, Omissing, Omissing);

03/04/2007, 16h52
jpo

détail

j'utilise le code suivant afin de sélectionner une plage de cellule de mon fichier excel ....

Code:

xlFeuill.get_Range("a1", "b10")

je n'arrive pas à la définir en tant que zone d'impression !!:(

merci d'avance pour vos idées!
jp
14/04/2009, 14h54
draylen19

bonjour, j'ose ramener le problème puisque j'ai le même, si ma feuille est une xlt (2003) tout marche, si c'est une 2007 excel renomme "zone_d_impression" en "print_area", comme s'il y avait un problème de langue mais je n'arrive pas a trouver lequel. Ainsi la zone d'impression disparait. merci
14/04/2009, 17h10
jpo

tu ouvres bien ton fichier via un code ?
14/04/2009, 18h54
draylen19

oui, par le code il mélange le français/anglais de la zone d'impression, si je l'ouvre par windows avec un double click, il se mélange pas.

salut
j'ai mis ce code vba dans mes modeles
ca fonctionne en .xlt et .xltx

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Workbook_BeforeClose(Cancel As Boolean)
 
    Sheets("Feuil1").PageSetup.PrintArea = ""
    Sheets("Feuil2").PageSetup.PrintArea = ""
 
End Sub
 
Private Sub Workbook_Open()
 
    Sheets("Feuil1").PageSetup.PrintArea = "A1:J41"
    Sheets("Feuil2").PageSetup.PrintArea = "A1:G29"
 
End Sub

si ca peut t'aider
bon courage