你试一试Word的录制宏的功能，在“工具”--“宏”--“录制新宏”
Sub 下划线()
'
' 下划线 Macro
' 宏在 2011/8/3 由 **录制
'
Selection.Font.UnderlineColor = wdColorAutomatic
Selection.Font.Underline = wdUnderlineSingle
End Sub
选中需要下划线的文字，运行宏即可。
不过我的想法和一楼的想法一样，一楼的方法更简单。
为何不直接选中 ctrl+U呢？
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024