Foxtable(狐表)用户栏目专家坐堂 → 如何批量修改文件名字


  共有153人关注过本帖树形打印复制链接

主题:如何批量修改文件名字

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109736 积分:558396 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/9/28 8:56:00 [显示全部帖子]

类似:http://www.foxtable.com/webhelp/topics/2334.htm,遍历处理即可

Dim Book As New XLS.Book("c:\test\xxx.xls")
Dim 
Sheet As XLS.Sheet = Book.Sheets(0)

'注意下面的循环变量从1开始,而不是从0开始,因为Excel表的第一行是标题
For n As Integer = 1 To Sheet.Rows.Count -1
    dim 文件名称 as string = 
Sheet(n,1).Value & Sheet(n,2).Value & right(Sheet(n,3).Value,4)

 回到顶部