如何用代码批量修改宏，修改或增加所有含VBA的EXCEL中的VBA代码的一行代码

peter-chen

大家 好， 我想将我 指定 文件夹下面(包括子文件夹里的所有XLSM后缀文件） 含VBA的 EXCEL文件中的 VBA代码的 一句中修改和 增加某个数值， 即VBAPROJECT里面的 THISWORKBOOK里面的 VBA代码统一增加一个 值。
比如下面原来有"00:10:20:30:40:D9"，通过VBA代码将 所有的 VBA代码改成"B8:57:9A:E1:DG:88", "00:10:20:30:40:D9"
就是 说统一所有 含VBA代码的 ，通过VBA代码将 所有的 VBA代码增加  "B8:57:9A:E1:DG:88",  这个值到arr = Array里面的 值里。

当然，有些含VBA代码的 EXCEL文档已经做了“保护工作薄”（“审阅”菜单下面的“保护并共享工作薄”）， 加上VBAPROJECT也加了 密码，
所以请 各位高手看看如何批量 修改。
就是 将VBA代码的：
arr = Array("00:10:20:30:40:D9", "5P:10:5C:C6:BB:C7", "00:14:2A:D8:DD:D9", "00:11:22:33:BD:F7", "00:1A:73:E7:97:0A", "00:53:45:00:00:00")
改成：
arr = Array("B8:57:9A:E1:DG:88", "00:10:20:30:40:D9", "5P:10:5C:C6:BB:C7", "00:14:2A:D8:DD:D9", "00:11:22:33:BD:F7",  "00:1A:73:E7:97:0A", "00:53:45:00:00:00")
谢谢大家！