Bonjour, je voudrais tout simplement utiliser la cellule I4 de la Feuil1 dans la macro suivante.
Il s'agit de remplacer "34" par la valeur de la cellule I4 de la Feuil1 (Ici "35")
Selection.Replace What:="34", Replacement:="35", LookAt:=xlPart,
Mais je ne suis pas fichu d'y parvenir.
Quelqu'un aurait-il le bon vouloir de m'aider?
Merci beaucoup d'avance!
Quentin
Il s'agit de remplacer "34" par la valeur de la cellule I4 de la Feuil1 (Ici "35")
Selection.Replace What:="34", Replacement:="35", LookAt:=xlPart,
Mais je ne suis pas fichu d'y parvenir.
Quelqu'un aurait-il le bon vouloir de m'aider?
Code:
Sheets("BASE").Select
Selection.Copy
Sheets("Modèle").Select
Range("A1").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveWindow.DisplayFormulas = True
Range("A2:F2,A5:A52").Select
Range("A5").Activate
Selection.Replace What:="34", Replacement:="35", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
ActiveWindow.DisplayFormulas = False
Merci beaucoup d'avance!
Quentin