有没有办法从MS Excel电子表格中的值创建文件名?
例如,Excel电子表格包含以下值:
A1: trees
A2: grasses
A3: flowers
是否有一种方法可以自动创建文件,并在文件名中添加扩展名(例如.jpg):
tree.jpg
grasses.jpg
flowers.jpg
感谢。
答案 0 :(得分:0)
尝试按照sub来做到这一点。
Sub CreateFiles()
For Each Rng In Range("A1:A3")
FilePath = Application.DefaultFilePath & "\" & Rng.Value & ".jpg"
Open FilePath For Output As #2
Close #2
Next
End Sub