Chinaunix首页 | 论坛 | 博客
  • 博客访问: 301969
  • 博文数量: 81
  • 博客积分: 3813
  • 博客等级: 中校
  • 技术积分: 945
  • 用 户 组: 普通用户
  • 注册时间: 2005-08-24 18:14
文章分类

全部博文(81)

文章存档

2013年(1)

2012年(2)

2011年(54)

2010年(15)

2009年(9)

分类: C#/.net

2013-04-23 16:11:12

(记录备忘)
今天工作中有个需求, case id  要加上 URL 。

在excel里面将 将 A列 的文字加上 E列 的URL

 A

 B

 C

 D

 E

 caseid  case name    
 1234  ddddd     1234  1234
 1231  sssss  

1231

 1231


1. Alt+F11,进入VBA编辑界面;
2. Alt+I+M,插入一个Module;
3. 在右边Module的空白编辑区域,复制粘贴下面的所有内容;
4. F5,运行该VBA命令;


点击(此处)折叠或打开

  1. Sub link()
  2. i = 2
  3.     Do While Range("A" & i).Cells.Text <> ""
  4.     Range("A" & i).Select
  5.     Worksheets("Sheet1").Hyperlinks.Add Anchor:=Selection, Address:=Range("E" & i).Cells.Text, _
  6.     TextToDisplay:=Range("A" & i).Cells.Text
  7.     i = i + 1
  8.     Loop
  9. End Sub

参考:http://zhulang158.blog.163.com/blog/static/49189427201121924156781/


阅读(1164) | 评论(0) | 转发(0) |
0

上一篇:正则表达式

下一篇:没有了

给主人留下些什么吧!~~