VBA
关注
分享
扫一扫
文章平均质量分 72
lulierhan
这个作者很懒，什么都没留下…
展开
-
BugFree Excel格式化VBA实现
rows_a = ActiveSheet.UsedRange.Rows.CountColumns("J:J").Select Selection.Delete Shift:=xlToLeft Columns("G:H").Select Selection.Delete Shift:=xlToLeft Columns("A:G").Select原创 2013-11-08 18:08:37 · 1218 阅读 · 0 评论 -
一VBA
1. 对比超链接设置：rows_a = ActiveSheet.UsedRange.Rows.Count'For i = 1 To rows_a Range("B" & i).Select ID = Range("B" & i).Value ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _原创 2013-11-13 10:23:59 · 977 阅读 · 0 评论