Code to Paste Formulas in the "Name Manager" of all Sheets

Hi,
From cell B3 onward, i have sheet numbers as Sheet1, Sheet2, Sheet3........ From cell A3 onward, I have formulas.
Now as Cell B3 has name as Sheet1. Respective adjacent cell of B3 is A3. So, formula from A3 should be copied and pasted in the "Name Manager" of sheet 1.
As Cell B4 has name as Sheet2. Respective adjacent cell of B4 is A4. So, formula from A4 should be copied and pasted in the "Name Manager" of sheet 2.
As Cell B5 has name as Sheet3. Respective adjacent cell of B5 is A5. So, formula from A5 should be copied and pasted in the "Name Manager" of sheet 3. And so on,
Please see attached sample file for more clarification (I am using Excel 2021)