Caros colegas,
Preciso de uma função que calcule a mediana de uma lista de números....no excel existe a função MED() mas no Access não encontrei função similar. Procurei no help e tentei pesquisar em outros lugares mas não consegui resposta.
Agradeço a todos a atenção,
Rose

Faça uma referencia ao excel no access que voce consegue chamar a função: WorksheetFunction.Median

Caro Rogerio,
Muito obrigada por responder !!
Mas...desculpe a ignorancia...voce poderia detalhar este procedimento...sem querer abusar da sua boa vontade.
Um abraço
Rose

Alguns links com a função Median:

http://experts.about.com/q/1440/3392536.htm
http://support.microsoft.com/default.aspx?scid=kb;en-us;210581&Product=acc

Oi rose,

Abra um modulo qq do sue mdb, va em Ferramentas >> Referencias, procure microsoft excel e selecione.

Desculpe pela demora em responder....
Agradeco ao Rogerio e a JLM pelas dicas que resolveram meu problema...Voces sao otimos
Acabei utilizando a funcao Median descrita abaixo.
Ainda sobre esta funcao, porque nao consigo usar como parametro uma consulta ?

Function Median (tName As String, fldName As String) As Single
Dim MedianDB As DAO.Database
Dim ssMedian As DAO.Recordset
Dim RCount As Integer, i As Integer, x As Double, y As Double, _
OffSet As Integer
Set MedianDB = CurrentDB()
Set ssMedian = MedianDB.Openrecordset("SELECT [" & fldName & "] FROM [" & tName & "]

ssMedian.MoveLast
RCount% = ssMedian.RecordCount
x = RCount Mod 2
If x <> 0 Then
OffSet = ((RCount + 1) / 2) - 2
For i% = 0 To OffSet
ssMedian.MovePrevious
Next i
Median = ssMedian(fldName)
Else
OffSet = (RCount / 2) - 2
For i = 0 To OffSet
ssMedian.MovePrevious
Next i
x = ssMedian(fldName)
ssMedian.MovePrevious
y = ssMedian(fldName)
Median = (x + y) / 2
End If
ssMedian.Close
MedianDB.Close
End Function

Se a consulta estiver salva no bd não tem problema nenhum;.