Excel SERIESSUM Function call in Access...

M

Murali

Hi

I have to use excel's SERIESSUM function in Access VBA.

My line of code is

Dim oFunctions As MSOWCFLib.OCAT
Set oFunctions = New MSOWCFLib.OCAT

intSeriesSumBU = oFunctions.SERIESSUM((wExcl.Worksheets(1).Range("F" & i).Value - wExcl.Worksheets(1).Range("P" & i).Value), 1, 1, wExcl.Worksheets(1).Range("F" & i).Value * 2 - (wExcl.Worksheets(1).Range("F" & i).Value - wExcl.Worksheets(1).Range("P" & i).Value - 1)

But I get the error "Run time error 424 -- Object Required".

For testing the above.. I just gave the following

dim intSeriesSumB
intSeriesSumBU = oFunctions.SERIESSUM(48, 1, 1, 49
msgbox (intSeriesSumBU

Giving this code gives me a "complie error -- Type Mismatch" error... But when I put this piece of code "=SERIESSUM(48, 1, 1, 49)" in an excell cell, it works fine..

Can anyone tell me the solution to this... I need this urgently and need to call this function from Access only... Please help me..

Thanks and Regards
Murali
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Word macro that can call cells out of Excel for a find and replace 0
VBA for Dependents shortcut menu 0
Prompt For Replace in Selection And More... 0
type mismatch error in macro in excel 0
Closing PDF file from Excel VBA (Adobe Reader, Adobe Acrobat, Browser) 0
WORD VBA Search and switch to advanced ... 1
Shed some light on this WS_Calculate macro. 3
VBA - exporting serial letters to single documents 0

Top