DesTIny:
方法如下:1、打开Excel2、点击视图选项卡,点击宏3、输入加粗,点击创建按钮。4、在弹出窗口中输入如下代码:SUb加粗()withactivesheetForeachcinrange("a1:a12")withccv=.valuei=instr(1,cv,"加粗",1).characters(i,2).font.bold=trueendwithnextendwithendSUb//代码结束其中1)withactivesheet表示当前活动表格2)Foreachcinrange("a1:a12....