怎么做成excel

来源:百度知道 编辑:UC知道 时间:2024/06/08 08:13:38
我们一个小组5个人 头让我们每天写一个新的问题的解决方案 做一个月
做成一个问题集锦 让我分类放文件夹里 还有做一个excel 的 目录 还是引索表啊 之类的一个东西 我也不太清楚 这个东西怎么做啊
请回答的细一点 我excel不怎么会 好的 会再加分

运行下面的宏
注意文件的目录

Sub Macro1()
Dim fs, f, f1, fc, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder("e:\test") '改为实际文件目录
Set fc = f.Files
For Each f1 In fc
ActiveCell.Offset(1, 0).Activate
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
f1.Path, TextToDisplay:=f1.Name

Next
End Sub

用该函数就可以了HYPERLINK

用超链接就行了