| Для работы с функциями листа Excel в VBA используйте такой код (в примере взята функция СЧЁТ): Sub Funcs()
 Dim Res As Long
 'Выберите один из вариантов:
 Res = Application.Count(Range("A1:A10"))
' Res = WorksheetFunction.Count(Range("A1:A10"))
' Res = Excel.Application.Count(Range("A1:A10"))
' Res = Excel.WorksheetFunction.Count(Range("A1:A10"))
' Res = Application.WorksheetFunction.Count(Range("A1:A10"))
 MsgBox Res
End Sub |