VBA somar dados de uma coluna e calcular media

[Pedro Moreno]

Bom dia galera,

preciso de uma ajuda.. administro um programa feito todo em VBA no trabalho, e estou com um problema.

o programa gere uma planilha com várias colunas, e abaixo da ultima linha da primeira coluna está escrito em uma Célula o nome "MÉDIA"

Nas ultimas linhas das colunas subsequentes, coluna 2, coluna 3, etc, são calculadas as médias, pegando o valor de tudo que está acima e dividindo pela quantidade de itens.

eis a dúvida, o código para a coluna dois logo depois da média é o seguinte:

declara-se a variavel soma2

contador = ultLinha + 1

soma2 = Workbooks(relatorio).Worksheets("1").UsedRange.Col umn("B").Calculate

idf = soma2/contador

o código está correto?? muito obrigado! qualquer dúvida meu email é

pedromc89@gmail.com

[benzadeus]

Acho que está errado. O código deveria ser:

Sub Somar()
    contador = ultLinha + 1
    soma2 = WorksheetFunction.Sum(Workbooks(relatorio).Sheets("1").Columns("B"))
    idf = soma2 / contador
End Sub