请帮助解决问题

jqliuym

问题我已写在了附件里。谢谢！




                         问题.zip (10.85 KB, 下载次数: 8)

2018-8-11 22:28 上传

点击文件名下载附件

不知道为什么

我想知道头像是本人不？

1. Sub test1()
   
2.   With Rows("5:9")
   
3.     .Font.Underline = True
   
4.   End With
   
5. End Sub
   

复制代码

jqliuym

不知道为什么 发表于 2018-8-11 22:51
我想知道头像是本人不？

老师您好！谢谢您的帮助。我可能没有表述清楚。我的意思是：有文字的行划一条下划直线（如我的附件里），不是对每个文字划下划线。

专搞excel

不知道为什么 发表于 2018-8-11 22:51
我想知道头像是本人不？

头像是日本女演员，佐佐木希，主演的天使之恋，还是很好看的

不知道为什么

专搞excel 发表于 2018-8-12 09:23
头像是日本女演员，佐佐木希，主演的天使之恋，还是很好看的

呵呵，谢谢。

不知道为什么

jqliuym 发表于 2018-8-11 23:02
老师您好！谢谢您的帮助。我可能没有表述清楚。我的意思是：有文字的行划一条下划直线（如我的附件里）， ...

呵呵，你好像是不是需求表述错误啊？你要的不是下划线，是 边框？

liuym

不知道为什么 发表于 2018-8-12 16:35
呵呵，你好像是不是需求表述错误啊？你要的不是下划线，是 边框？

是的，老师！谢谢！

liuym

不知道为什么 发表于 2018-8-12 16:35
呵呵，你好像是不是需求表述错误啊？你要的不是下划线，是 边框？

老师：她好像表述不准确，是个新手。

不知道为什么

liuym 发表于 2018-8-12 16:43
是的，老师！谢谢！

[a5:v9].Borders.LineStyle = 1

边框线的粗细等 你自己可以录制宏