如何使用 Excel VSTO C# 列出特定文件夹中的所有 excel 文件名以及每个文件中使用的总行数

Question

我是 Excel 插件的新手。

我有特定的文件夹，我希望 Excel 加载项搜索任何 excel 文件，包括子文件夹并列出所有文件名和现有 [=22] 中使用的总行数=] 加载项为运行.

的文件

任何帮助将不胜感激。

非常感谢。

Answer 1

这应该可以满足您的要求。

Sub OpenAllExcelFiles()

Dim wb As Workbook, wbCSV As Workbook
Dim sPath As String, sFilename As String
Dim NbRows As Integer, rg As Range

Set wb = ThisWorkbook

Application.ScreenUpdating = False

sPath = "C:\your_path\"       'Path of CSV Files
sFilename = Dir(sPath & "*.xlsx")


Do While Len(sFilename) > 0
    Set wbCSV = Workbooks.Open(sPath & sFilename)         'open file
    NbRows = wbCSV.Sheets(1).Range("A100").End(xlUp).Row  'nb of rows

    Set rg = wb.Sheets(1).Range("A100").End(xlUp).Offset(1, 0)
    rg = sFilename
    rg.Offset(0, 1) = NbRows


    wbCSV.Close False   'close file
    sFilename = Dir

Loop
Application.ScreenUpdating = True

End Sub

我的测试用例的最终结果：

如何使用 Excel VSTO C# 列出特定文件夹中的所有 excel 文件名以及每个文件中使用的总行数

How to list all excel file names in specific foldder and total number of row used in each file using Excel VSTO C#

excel

vba

vsto

excel-addins