>>47
Application.WorksheetFunction.Average(Range())

指定したRange()に不具合があるとエラーがでる
例えば、データがないとか