VBA根据单元格值向单元格添加注释，然后在值更改时将其删除

I share a workbook with multiple colleagues at work and am trying to add a comment to a cell (F47) in a certain period (Period is selected as a list of numbers) in cell J1. I share a workbook with multiple colleagues at