Salut Jm !
En effet, pour utiliser Select, il faut que la feuille soit visible.
Donc, il faut modifier ta macro en utilisant "Activate" ou rien.
Pour imager :
Quand tu "Select", tu tiens l'objet dans ta main.
Quand tu "Activate", tu l'allumes avec une télécommande.
Quand tu lui donnes un ordre sans Activate ni Select, tu lui donne directement l'ordre, avec une télécommande.
Comment modifier ta macro en conséquence ?
Prenons une macro simple, avec "Select" :
Sub Macro1()
Sheets("Feuil2").Select
Range("B4:C7").Select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
End Sub
Devient avec "Activate" :
Sub Macro2()
Sheets("Feuil2").Activate
Range("B4:C7").Interior.ColorIndex = 6
End Sub
Sans "Select" ni "Activate" :
Sub Macro3()
Sheets("Feuil2").Range("B4:C7").Interior.ColorIndex = 6
End Sub
Dans la macro1, la feuille foit être visible, dans les macros 2 et 3, elle peut-être masquée.
Un autre Exemple, simple aussi, fait avec l'enregistreur de macro :
Sub Macro4()
Sheets("Feuil1").Select
Range("B3😀7").Select
Selection.Copy
Sheets("Feuil2").Select
Range("E5").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub
Deviendra :
Sub Macro5()
Sheets("Feuil2").Range("E5:G9") = Sheets("Feuil1").Range("B3😀7").Value
End Sub
Bonne jouréne à toi
@ +
Moa
