Lotus Notes CSV导出-更改字符串限定符

时间:2019-01-07 19:46:05

标签: lotus-notes

是否有一种方法可以将带字符串限定符的Lotus Notes视图导出到csv文件中,除了波浪号(〜)之类的双引号以外,什么都可以?

谢谢。

2 个答案:

答案 0 :(得分:1)

据我所知(谷歌搜索,我什么也证明不了),使用File-> Export,不。还有其他选择。一种是编写一个代理以遍历视图并写出每一列。这样,您就可以完全控制所有这些内容。另一个想法可能是创建一个可通过Web访问的视图,其格式设置为您希望的格式。您必须显式使用“ count =“ URL参数来获取所有文档。

答案 1 :(得分:0)

您可以修改下面链接的代码以使用不同的定界符: http://blog.texasswede.com/export-notes-view-to-excel-with-multi-value-fields/

这将是修改的功能:

Public Function CSVArray() As Variant
    Dim rowarray() As String 
    Dim textrow As String
    Dim cnt As Long
    ReDim rowarray(rowcnt) As String

    ForAll r In row
        textrow = ""
        ForAll h In r.column 
            textrow = textrow + |"| + Replace(h,Chr$(13),"\n") + |",|
        End ForAll
        rowarray(cnt) = Left$(textrow,Len(textrow)-1)
        cnt = cnt + 1
    End ForAll  
    CSVArray = rowarray
End Function

只需替换行

textrow = textrow + |"| + Replace(h,Chr$(13),"\n") + |",|

使用

textrow = textrow + Replace(h,Chr$(13),"\n") + |~|