MS Excel - 使用特定文件夹中的文件名自动填充列

时间:2016-10-22 11:41:59

标签: excel macros ms-office excel-2016 office-2016

我是非程序员,我需要一种自动方式在Excel 2016中使用特定文件夹中的文件名填充列。我之前从未构建过宏。有一种相对无痛的方法吗? 非常感谢。

1 个答案:

答案 0 :(得分:1)

下面的代码将从A列中的** C:\ testFolder **中复制所有文件的名称。

Sub test()
    Dim file As Variant
    file = Dir("C:\testFolder\")
    Range("A2").Activate
    While (file <> "")
        ActiveCell.Value = file
        ActiveCell.Offset(1, 0).Activate
        file = Dir
    Wend
End Sub