probleme avec la configuration d'impression
Bonjour a tous!
Je suis actuellement bloque avec un bug pour le moins bizare.....
J'essai de configurer l'impression (format paysage, 2 feuille en ligne 1 en colone etc.....) et pour cela j'ai ecris un petit bout de code(fait avec l'enregistreur et et internet ^^).
Le probleme c'est que vba va chercher un autre fonction (qui n'a rien a voir et qui n'est pas dans le meme module) a certain point du programme (voir les endroit anote).
La fonction est nome "DateToWeek"
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
Set end_line = .Cells(UBound(Array_ActualWeek) + TestList_A_TestNb.Row, TestList_A_TestNb.column)
.Range(.Range("TestList_Header"), Cells(end_line.Row, TestList_N_Leader.column)).Select
With .PageSetup
.PrintArea = Selection.Address 'ici le programme va chercher une fonction!
.Orientation = xlPortrait 'ici le programme va chercher une fonction! et deux fois en plus!!!
.FitToPagesWide = 2
.FitToPagesTall = 1
End With
.VPageBreaks.Add Before:=[TestList_HeaderPage2] |
si quelqu'un peut m'aider.....
J'avoue ne plus comprendre du tout\
Merci d'avance
Desole pour les accents manquant et les variables en anglais mais je ne travaille pas avec des francophone et mon pc est configurer mi anglais etats unis, mi tcheque!
