Word

下载这个压缩包 文字手写化-即刻球手抄文件夹.rar 并解压 字体配合代码使用. 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455Dim R_Character As Range Dim FontSize(5) ' 字体大小在5个值之间进行波动，可以改写 FontSize(1) = "21" FontSize(2) = "21.5" FontSize(3) = "22" FontSize(4) = "22.5" FontSize(5) = "23" Dim FontName(3) '字体名称在三种字体之间进行波动，可改写，但需要保证系统拥有下列字体 FontName(1) = "陈静的字完整版" FontName(2) = "萌妹子体" FontName ...