Bonjour,
Je galère depuis plusieurs heures sans trouver la solution!
J'ai un classeur comportant 2 feuilles dont le contenu est au départ identique : "màj" et "màj_original".
Je souhaite notamment modifier les formules figurant dans "màj". La partie concernée de ma macro est :
Sheets("màj").Select
Range("AD2:AO61").Select
Selection.Replace What:=année_2, Replacement:=année_1, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=année_6, Replacement:=année_5, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("BD2:BO76").Select
Selection.Replace What:=année_2, Replacement:=année_1, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=année_6, Replacement:=année_5, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Et au final, les formules sont remplacées également dans "màj_original" !!!
Tout se passe comme si Selection.Replace était appliqué à l'ensemble du classeur et non pas à la seule feuille "màj" pourtant sélectionnée en tête.
Quelqu'un peut-il trouver mon erreur?
Merci d'avance.
Je galère depuis plusieurs heures sans trouver la solution!
J'ai un classeur comportant 2 feuilles dont le contenu est au départ identique : "màj" et "màj_original".
Je souhaite notamment modifier les formules figurant dans "màj". La partie concernée de ma macro est :
Sheets("màj").Select
Range("AD2:AO61").Select
Selection.Replace What:=année_2, Replacement:=année_1, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=année_6, Replacement:=année_5, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("BD2:BO76").Select
Selection.Replace What:=année_2, Replacement:=année_1, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=année_6, Replacement:=année_5, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Et au final, les formules sont remplacées également dans "màj_original" !!!
Tout se passe comme si Selection.Replace était appliqué à l'ensemble du classeur et non pas à la seule feuille "màj" pourtant sélectionnée en tête.
Quelqu'un peut-il trouver mon erreur?
Merci d'avance.
Dernière édition: