主题：Excel 返回自定义公式字符串

没看懂你的问题是什么。具体说明需要做到的效果。

试试用vba处理

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\1234.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1) '指定工作表

For RowIndex As Integer=1 To ws.usedrange.rows.Count-1
    For ColIndex As Integer =1 To ws.usedrange.columns.Count-1
        If ws.cells(Rowindex,ColIndex).Formula.startswith("=") Then
            msgbox(ws.cells(Rowindex,ColIndex).Formula)         '如果是公式
            'sheet1(Rowindex,ColIndex).Value=Computer2(sheet1(Rowindex,ColIndex).Formula)  '调用公式计算器进行计算
            '希望传的参数为 =年初数("1001","","","")+年初数("1003","","","")+年初数("1003","","","")
            '但是现在传入的参数是 '年初数'(1001,,,)+'年初数'(1003,,,)+'年初数'(1003,,,)  Excel把我需要的引号去掉了
        End If
    Next
Next

app.quit

是不是你excel的文件的行数列数太大？

vba读取是比较慢的。excel文件发上来测试。

执行 office.reg

如果没有在WebBrowser显示Word报表，而是在一个新的IE窗口显示，那么请双击Foxtable目录下的Office.reg文件，将其添加到注册表中

具体问题做一个实例发上来测试