Hi All,

I am trying to get an average of a set of data input by operator.
I am not familiar with cyntax for average of the range..

Sub Average()
Dim mynum As Integer
Dim lRow As Integer
Dim Arange As Range

ActiveSheet.Range("A2").Value = InputBox("No. Pls?")
'ActiveSheet.cell("A2").Value = mynum
ActiveSheet.Range("A2").Select
Selection.Copy
Range("A3").Select
Selection.Insert Shift:=xlDown

lRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row

Now I want to say at the last row to do an average of the whole rang
which starts from cell A2

Appreciate your help.
Thank you
syed Azi

--
sazi
-----------------------------------------------------------------------
saziz's Profile: http://www.excelforum.com/member.php...nfo&userid=635
View this thread: http://www.excelforum.com/showthread.php?threadid=50269