VBA script to find and replace data across sheets in fixed ranges.

[Emerlin]

H - I would like to have a VBA script the I can define locked target ranges to look in, find a specific value in those ranges and replace it with a desired value. I will eventually add this to a button. I have found some script that adds a prompt you for the desired ranges, but I am hoping in can be simplified in the script.

Thanks in advance for your help!

ECR_CheatSheet.xlsm
	A	B	C	D	E	F
1
2		Target Range 1 (TR1)	Target Range 2 (TR2)	FIND in TR1 and TR2	REPLACE in TR1 and TR2
3		Christian McCaffrey	Marvin Harrison Jr.	Tyrone Tracy Jr.	Tyrone Tracy
4		D.J. Moore	Odell Beckham Jr.	Brian Robinson Jr.	Brian Robinson
5		Tyreek Hill	Drake London	A.J. Dillon	AJ Dillon
6		Bijan Robinson	Derrick Henry	Kenneth Walker III	Kenneth Walker
7		Breece Hall	Davante Adams	D.J. Moore	DJ Moore
8		D.J. Chark Jr.	Kyren Williams	Marvin Mims Jr.	Marvin Mims
9		Amon-Ra St. Brown	Marvin Mims Jr.	Marvin Harrison Jr.	Marvin Harrison
10		Justin Jefferson	Chris Olave	D.K. Metcalf	DK Metcalf
11		A.J. Brown	A.J. Dillon	D.J. Chark Jr.	DJ Chark
12		Garrett Wilson	Cooper Kupp	Michael Pittman Jr.	Michael Pittman
13		Jonathan Taylor	Dalton Kincaid	Calvin Austin III	Calvin Austin
14		Saquon Barkley	Isiah Pacheco	Odell Beckham Jr.	Odell Beckham
15		Jahmyr Gibbs	Mark Andrews	Brian Thomas Jr.	Brian Thomas
16		Brian Thomas Jr.	Mar'Keise Irving	Mar'Keise Irving	Bucky Irving
17		Sam LaPorta	Jaylen Waddle
18		Travis Kelce	Nico Collins
19
Name Change

 

[Emerlin]

I should also add - the Find and Replace data will be on a different sheet (same workbook) than the TR1 and TR2.