Hi,Can anyone recommend a good tool to export views into excel? I’ve recently tried one downloaded from SandBox but keep getting “OLE: Automation Error”.
Subject: Export Views to Excel
try this
You should also look at the excellent sessions from Lotusphere such as:
BP116 Integrating Lotus Notes and Domino 6.5 with Microsoft Office Productivity Applications - Advanced Topics
Subject: Export Views to Excel
Or you can try this tip, if you are doing this thru a Notes Web Application.
http://walnut.agileware.net/node/171
“This tip explains how to export a Notes View directly to Microsoft Excel within a Web Page and using NO CODE whatsoever. I’ve included a sample database that uses this technique also. This can also be used to export Notes data to other MIME registered applications, including Microsoft Word or Open Office.”
Subject: Export Views to Excel
Look at that tool: ANDI at http://www.bpjl.com.
This tool is able to export data to various formats.
For Excel, you can choose CSV format, this type of file can be imported into Excel.
You can also use ODBC (with the ‘ODBC driver for Excel’) to export data from Notes to an existing excel file.
Subject: RE: Export Views to Excel
For Excel, you can choose CSV format, this type of file can be imported into Excel.
Ah yes, CSV. A format that Notes already exports to natively. How does you product add any value to hte process being discussed here?
?!?
–
Subject: Export Views to Excel
What do mean,export view documents in excel?if thats what you mean… here are some codes maybe can help you…
%INCLUDE “lsconst.lss”
Dim excelappl As Variant
Dim excelbook As Variant
Dim excelSheet As Variant
tmpFileName = ""
tmpFileName = workspace.SaveFileDialog( False , "Excel - Export" , _
"Microsoft Excel Worksheet|*.xls", "C:\", "SampleFile.xls" )
Set excelappl = Nothing
Set excelappl = CreateObject("Excel.Application")
excelappl.visible = False
Set excelbook = excelappl.workbooks.add
Set excelSheet = excelappl.workbooks(1).Worksheets(1)
Call excelsheet.Activate
'Save and close Excel Sheet
excelappl.activeworkbook.saveas tFileName$
excelappl.ActiveWorkBook.close
excelappl.quit