Bonjour,
J'ai plusieurs macros qui effectuent des sélections grâce à la méthode Range("X:X").Select
afin de mettre en forme ou copier des données de façon automatique.
Lors de l'exécution des macros, l'utilisateur voit toutes ces sélections ainsi :
Est-il possible de "masquer" ces zones qui sont sélectionnées lors de l’exécution de mes macros ?
Un exemple d'une procédure où l'on voit les sélections :
Sub Macro1()
Range("E5:J5,L5:P5").Select
With Selection
.Borders(xlEdgeLeft).LineStyle = xlContinuous
.Borders(xlEdgeTop).LineStyle = xlContinuous
.Borders(xlEdgeBottom).LineStyle = xlContinuous
.Borders(xlEdgeRight).LineStyle = xlContinuous
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.WrapText = True
.Name = "Arial"
End With
With Selection.Font
.Name = "Arial"
.Size = 12
.Bold = False
.ColorIndex = xlAutomatic
End With
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End Sub
Sub Macro2()
With Feuil1
Set zone = .Range(.Cells(5, 1), .Cells(.Cells(.UsedRange.Count, 1).End(xlUp).Row, 16))
zone.Select
With Selection.Font
.Name = "Arial"
.Size = 12
.Bold = False
.ColorIndex = xlAutomatic
End With
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.WrapText = True
.ReadingOrder = xlContext
End With
End With
End Sub
Merci par avance pour votre aide
Bapt"