Excel versus Net

[Alfred Sterner]

Es mag für Experten eine leichte Angelegenheit sein. Für mich jedoch, der sich nach langer Zeit wieder für EDV interessiert ist, ist es nicht leicht.
Also:
Do Loop bedarf keiner Erklärung. Die Anzahl (Count) ist bekannt. Von beiden Ansätzen erwarte ich mir einen mittelwert, der aber ohne Math.Log(!MaxCount(i)) einen anderen Wert ergibt.
Kann mir geholfen werden?

Do
    If Range("M" & i).Value <> 0 Then anz = anz + Range("M" & i).Value
    i = i + 1
    zeile = zeile + 1
    Loop While Range("A" & zeile) <> ""
    max = Range("A1").Value
    mittelwert = anz / max              'die durchschnittliche Eintragsnummer

'############################################

                 ReDim lMaxCount(max - 1)
                For Each row In dt1.Rows
                    lMaxCount(i) = CDbl(row!Wert)
                     mittelwert = mittelwert + Math.Log(lMaxCount(i))
                    i = i + 1
                 Next
                 mittelwert = mittelwert / max       'die durchschnittliche Eintragsnummer

'############################################

 

[Yaslaw]

Ich verstehe die Frage nicht. Und was hat das mit .Net zu tun? Ist das eine In Excel VBA und das andere in .Net?

Und es sind ja 2 total verschiedene Formeln. Bei der ersten rechnest du mit der Anzahl. Bei der zweiten mit dem Math.Log(Zellenwert).

 

[Alfred Sterner]

Ich bedaure meine Nachlässigkeit. Ich hätte mich präziser ausdrücken können. Tut leid.
Zwischenzeitig hat sich für mich eine neue Situation ergeben, weshalb ich mit Bedauern diesen (meinen) Beitrag zurückziehe.
Mfg.