[已解决]怎样使用python在excel文件中设置超链接

chunchun2017

工作中，有一个需求，就是要将指定目录及子目录下的所有.txt文件路径找出来，写入excel表中，并且需要在excel表中设置超链接的形式，这样点击超链接，就可以打开文件了
编写代码如下：

1. import os
   
2. import xlwt
   
3. import openpyxl
   
4. import time
   
5. 
   
6. def search_file(start_dir, target) :
   
7.     os.chdir(start_dir)
   
8.    
   
9.     for each_file in os.listdir(os.curdir) :
   
10.         ext = os.path.splitext(each_file)[1]
    
11.         file_name = os.path.splitext(each_file)[0]
    
12.         if ext in target :
    
13.             file_dict[file_name] = os.getcwd() + os.sep + each_file + os.linesep # 使用os.sep是程序更标准
    
14.         if os.path.isdir(each_file) :
    
15.             search_file(each_file, target) # 递归调用
    
16.             os.chdir(os.pardir) # 递归调用后切记返回上一层目录
    
17. 
    
18. #start_dir = input('请输入待查找的初始目录：')
    
19. start_dir = 'D:\python代码'
    
20. #orig_dir = os.getcwd()
    
21. 
    
22. target = ['.txt']
    
23. file_dict = {}
    
24. 
    
25. 
    
26. #写入excel表
    
27. line = 1
    
28. row = 0
    
29. workbook = xlwt.Workbook()
    
30. sheet = workbook.add_sheet('文件清单',cell_overwrite_ok=True)
    
31. 
    
32. search_file(start_dir, target)
    
33. 
    
34. 
    
35. #设置excel表第一行标题格式
    
36. style = xlwt.XFStyle()
    
37. fnt = xlwt.Font()
    
38. fnt.bold = True
    
39. style.font = fnt
    
40. sheet.write(0,0,'文件名',style)
    
41. sheet.write(0,1,'链接',style)
    
42. 
    
43. 
    
44. #从第1行开始，向excel表中写入文件名及其路径
    
45. for each in file_dict.keys():
    
46.         sheet.write(line,0,each)
    
47.         sheet.write(line,1,file_dict[each])
    
48.         line+=1
    
49. 
    
50. #保存excel文件
    
51. timest = '文件台账'+str(time.localtime().tm_min)+str(time.localtime().tm_sec)+'.xls'       
    
52. workbook.save(timest)
    

复制代码

以上代码运行结果如下：
发现点击B列的单元格，无法自动跳转打开对应的文件
因为B列中的内容，只是一个文件绝对路径，而不是一个指向文件位置的超链接
请教各位大神，需要怎样修改代码，才能让B列中写入指向文件的超链接？

最佳答案

月排行榜 / 总排行榜

snaker

2020-4-6 15:38:32

使用xlsxwriter库

1. import os
   
2. import xlwt
   
3. import openpyxl
   
4. import time
   
5. 
   
6. import xlsxwriter       #使用这个库创建excel
   
7. 
   
8. def search_file(start_dir, target) :
   
9.     os.chdir(start_dir)
   
10.    
    
11.     for each_file in os.listdir(os.curdir) :
    
12.         ext = os.path.splitext(each_file)[1]
    
13.         file_name = os.path.splitext(each_file)[0]
    
14.         if ext in target :
    
15.             file_dict[file_name] = os.getcwd() + os.sep + each_file + os.linesep # 使用os.sep是程序更标准
    
16.         if os.path.isdir(each_file) :
    
17.             search_file(each_file, target) # 递归调用
    
18.             os.chdir(os.pardir) # 递归调用后切记返回上一层目录
    
19. 
    
20. #start_dir = input('请输入待查找的初始目录：')
    
21. start_dir = 'D:\python代码'
    
22. #orig_dir = os.getcwd()
    
23. 
    
24. target = ['.txt']
    
25. file_dict = {}
    
26. 
    
27. #写入excel表
    
28. line = 1
    
29. row = 0
    
30. 
    
31. timest = '文件台账'+str(time.localtime().tm_min)+str(time.localtime().tm_sec)+'.xlsx'
    
32. 
    
33. workbook = xlsxwriter.Workbook(timest)
    
34. worksheet = workbook.add_worksheet('文件清单')
    
35. #设置第一列第二列的宽度
    
36. worksheet.set_column('A:A', 20)
    
37. worksheet.set_column('B:B', 50)
    
38. 
    
39. search_file(start_dir, target)
    
40. 
    
41. #设置excel表第一行标题格式
    
42. style = workbook.add_format({'bold': True})     #加粗
    
43. worksheet.write(0,0,'文件名',style)
    
44. worksheet.write_url(0,1,'链接',style)
    
45. 
    
46. #从第1行开始，向excel表中写入文件名及其路径
    
47. for each in file_dict.keys():
    
48.         worksheet.write(line,0,each)
    
49.         worksheet.write_url(line,1,file_dict[each].strip())
    
50.         line+=1
    
51. 
    
52. workbook.close()
    

复制代码

跳转到最佳答案楼层

墨羽岚

支付鱼币？

chunchun2017

墨羽岚 发表于 2020-4-6 11:43
支付鱼币？

不好意思，设置错了，已经改过来了，谢谢提醒。

墨羽岚

chunchun2017 发表于 2020-4-6 11:49
不好意思，设置错了，已经改过来了，谢谢提醒。

噗

珂乔乔

也来学习一下

winsome8538

阔以阔以  

依可儿

Excel中也可以用吗。。。

乔珂珂

感谢楼主科普

chunchun2017

上面的几个人都很穷吗？不帮忙还来挣鱼币。

chunchun2017

依可儿 发表于 2020-4-6 13:37
Excel中也可以用吗。。。

你们都很穷吗？不解答还来挣鱼币。

suchocolate

ws['A1'].hyperlink = r'C:\Users\administrator\Desktop\test.png'

snaker

使用xlsxwriter库

1. import os
   
2. import xlwt
   
3. import openpyxl
   
4. import time
   
5. 
   
6. import xlsxwriter       #使用这个库创建excel
   
7. 
   
8. def search_file(start_dir, target) :
   
9.     os.chdir(start_dir)
   
10.    
    
11.     for each_file in os.listdir(os.curdir) :
    
12.         ext = os.path.splitext(each_file)[1]
    
13.         file_name = os.path.splitext(each_file)[0]
    
14.         if ext in target :
    
15.             file_dict[file_name] = os.getcwd() + os.sep + each_file + os.linesep # 使用os.sep是程序更标准
    
16.         if os.path.isdir(each_file) :
    
17.             search_file(each_file, target) # 递归调用
    
18.             os.chdir(os.pardir) # 递归调用后切记返回上一层目录
    
19. 
    
20. #start_dir = input('请输入待查找的初始目录：')
    
21. start_dir = 'D:\python代码'
    
22. #orig_dir = os.getcwd()
    
23. 
    
24. target = ['.txt']
    
25. file_dict = {}
    
26. 
    
27. #写入excel表
    
28. line = 1
    
29. row = 0
    
30. 
    
31. timest = '文件台账'+str(time.localtime().tm_min)+str(time.localtime().tm_sec)+'.xlsx'
    
32. 
    
33. workbook = xlsxwriter.Workbook(timest)
    
34. worksheet = workbook.add_worksheet('文件清单')
    
35. #设置第一列第二列的宽度
    
36. worksheet.set_column('A:A', 20)
    
37. worksheet.set_column('B:B', 50)
    
38. 
    
39. search_file(start_dir, target)
    
40. 
    
41. #设置excel表第一行标题格式
    
42. style = workbook.add_format({'bold': True})     #加粗
    
43. worksheet.write(0,0,'文件名',style)
    
44. worksheet.write_url(0,1,'链接',style)
    
45. 
    
46. #从第1行开始，向excel表中写入文件名及其路径
    
47. for each in file_dict.keys():
    
48.         worksheet.write(line,0,each)
    
49.         worksheet.write_url(line,1,file_dict[each].strip())
    
50.         line+=1
    
51. 
    
52. workbook.close()
    

复制代码

snaker

或者在49行这样写也行

1. worksheet.write(line,2,'=HYPERLINK("%s","%s")'%(file_dict[each].strip(),each))

复制代码

chunchun2017

snaker 发表于 2020-4-6 15:54
或者在49行这样写也行

之前找到的都是关于xlwt和openpyxl的，没有关于xlsxwriter的，这下解决了，感谢！！！

胜在坚持

向高手学习，