Thema Datum  Von Nutzer Rating
Antwort
17.01.2013 19:12:18 Britta87
NotSolved
18.01.2013 10:07:25 Holger
NotSolved
18.01.2013 10:20:24 Gast30715
NotSolved
Blau Mittelwert aus Daten mit gleichen Sekunden
 18.01.2013 10:41:37 britta87
NotSolved
18.01.2013 11:02:39 britta87
Solved

Ansicht des Beitrags:
Von:
britta87		 Datum:
18.01.2013 10:41:37		 Views:
1025		 Rating:
     
Antwort:
  Ja
Thema:
Mittelwert aus Daten mit gleichen Sekunden

Hallo, vielen Dank erstmal...ich bekomme leider immer einen Fehler 'Typen unverträglich' für die Zeile d = d + Cells(a, w) ... hast du noch eine Idee?

 

Sub werte_mit_mittelwerten()
u = 5
'Spalte mit dem Sekunden
w = 4
'Spalte mit den Werte
a = 1
'Erste Zeile mit Werten
e = 1
'Erste Zeile für Ausgabe
lz = Cells(Rows.Count, 1).End(xlUp).Row
Columns(7).NumberFormat = "[$-F400]h:mm:ss AM/PM"
b = Cells(1, u).Value: c = 0: d = 0
Do Until a > lz
    Do Until Cells(a, u) <> b
        d = d + Cells(a, w)
        c = c + 1: a = a + 1
        If a > lz Then Exit Sub
    Loop
    b = Cells(a, u)
    Cells(e, 7) = Cells(a, u)
    Cells(e, 8) = d / c
    d = 0: c = 0: e = e + 1
    Loop
End Sub

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
17.01.2013 19:12:18 Britta87
NotSolved
18.01.2013 10:07:25 Holger
NotSolved
18.01.2013 10:20:24 Gast30715
NotSolved
Blau Mittelwert aus Daten mit gleichen Sekunden
 18.01.2013 10:41:37 britta87
NotSolved
18.01.2013 11:02:39 britta87
Solved