多个Excel 批量替换

多个excel（文件名为1、2、3），所有excel工作表中都含有相同的字符A（最好做成弹窗， 可以自行决定要更换前的字符），将1工作表的A替换为1，将2工作表的A替换为2，将3工作表的A替换为3，替换完每个excel 自动关闭。求大神做个简单的小程序。