Bonjour,

Je dispose d'une macro qui permet lorsqu'elle est exécutée sur Excel 2010 d'ouvrir la fenêtre d'impression et de préparer le document à imprimer sans la couleurs de fonds sur les cellules de ma feuille pour que je n'ai plus qu'a cliquer sur Imprimer.

Macro actuelle:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub Impression_sans_couleurs()
  Dim temp1(), temp2()
  For Each c In ActiveSheet.UsedRange
    If c.Interior.ColorIndex <> xlNone Then
       n = n + 1
       ReDim Preserve temp1(1 To n)
       ReDim Preserve temp2(1 To n)
       temp1(n) = c.Address
       temp2(n) = c.Interior.ColorIndex
       c.Interior.ColorIndex = xlNone
    End If
  Next c
  ActiveSheet.PrintPreview   ' ou ActiveSheet.PrintOut
  For i = 1 To n
    Range(temp1(i)).Interior.ColorIndex = temp2(i)
  Next i
End Sub
Par contre je suis obliger de définir ma zone d'impression manuellement sur feuille.
Comment puis-je définir ma zone d'impression (qui doit être de A1 à L60)
Merci pour votre aide.