EXCEL中如何在这段VBA代码中添加字体加粗的命令

问题描述

精选答案

这段改一下If i0 > 0 Then c.Characters(i0, Len(n)).Font.Color = vbRed: i = i0 + Len(n)

改成

c.Characters(i0, Len(n)).Font.Color = vbRed: i = i0 + Len(n)

c.Characters(i0, Len(n)).Font.bold=true