Solved: Application.WorksheetFunction.CountIf not support in OutLook

[Emily]

The code works in Excel
Application.WorksheetFunction.CountIf(Range(Cells(i, 11), Cells(i, LastRow)), 0)

It does not work in OutLook Excel.Application, why?



Sorry, Please discard this question

It needs Excel.Application :banghead:

Emily

[Jacob Hilderbrand]

Application in this case would be the Outlook Application. What did you call the Excel Application?

i.e.,


Dim AppExcel As New Excel Application

AppExcel.WorksheetFunction.CountIf...


Also you will need to be more specific with the range. Do you have an Excel Spreadsheet Object?

i.e.


Dim Wkb As Excel.Workbook

Set Wkb = AppExcel.Workbooks.Add 'Or Open


Then Use



Wkb.Sheets(1).Range...

[Emily]

DRJ, thanks for your quick response

I found it was my mistake, it needs Excel.Application
Excel.Application.WorksheetFunction.CountIf

[Jacob Hilderbrand]

Glad you got it working. :beerchug:

Take Care

[Emily]

DRJ

There is no "Solved" in Thread Tools