Bonjour,

Je voudrais simplifier ce code vba :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Range("AS1").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Replace What:="", Replacement:="TOTO", LookAt:=xlPart, _
        SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
Y a t-il un moyen ?