View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Mike Middleton Mike Middleton is offline
external usenet poster
 
Posts: 762
Default worksheet function with two ranges

pb -

A non-VBA solution is

=STDEVP(A1:A100-B1:B100)

array-entered (Control+Shift+Enter instead of Enter).

- Mike
http://www.mikemiddleton.com


"pb" wrote in message
oups.com...
I want to calculate the stdev of (colA - colB) in VBA code without
creating a new column. My attempted code below gives me a type
mismatch. Does anyone know how I would do it?

Public Sub calcStdev()

Dim myRangeAct As Range
Dim myRangeMod As Range

Set myRangeAct = Range(Cells(1, 1), Cells(100, 1))
Set myRangeMod = Range(Cells(1, 2), Cells(100, 2))

Debug.Print Application.WorksheetFunction.StDevP(myRangeAct)
Debug.Print Application.WorksheetFunction.StDevP(myRangeMod)

'GET TYPE MISMATCH
Debug.Print Application.WorksheetFunction.StDevP(myRangeAct -
myRangeMod)

End Sub

Thanks