Ho risolto!!!! Mettendo una cosa così
Sub prova()
m = Cells(3, 3).Value
Calcola (m)
End Sub
dove dentro in Excel in 3,3 eseguo la funzione Conta... )
Ora la cosa che devo fare è operare su fogli diversi... cioè leggere alcune celle dal foglio1... scrivere su altre nel foglio2 etc... ))
Grazie ancora