Thema Datum  Von Nutzer Rating
Antwort
23.04.2013 15:35:08 KalleGabrowski
NotSolved
23.04.2013 16:52:19 Gast94530
NotSolved
23.04.2013 19:40:08 Gast57880
NotSolved
23.04.2013 22:25:24 Gast55698
NotSolved
23.04.2013 22:31:59 Gast46736
NotSolved
24.04.2013 09:28:08 Gast57880
NotSolved
Rot Standardabweichung und Datum
 24.04.2013 10:31:26 KalleGabrowski
NotSolved

Ansicht des Beitrags:
Von:
KalleGabrowski		 Datum:
24.04.2013 10:31:26		 Views:
1027		 Rating:
     
Antwort:
  Ja
Thema:
Standardabweichung und Datum

Dim j As Integer
Dim hilf As Integer
Dim f As Double
Dim i As Double
Dim jahr As Integer
Dim u As Variant
Dim y As Date
Dim hilf1 As Date
Dim v As Variant
Dim std As Double

'--------------------------------------------------

f = 2
z = 12
wg = 0
b = 7
u = 1
v = 1
std = 0
For i = 2 To 147000
    y = Sheets("Daten").Cells(i, 1).Value
    hilf1 = Sheets("Daten").Cells(i + 1, 1).Value
    If hilf1 = Empty Then
    hilf = 999
    Else
   
    j = Month(y)
    hilf = Month(hilf1)
    jahr = Year(y)
    End If
    If j = hilf Then
        v = v + 1
    Else
   
          std = Range(Cells(u, 9), Cells(v, 9))
          Sheets("Daten").Cells(f, z + 2).Value = Application.WorksheetFunction.StDev(std)
 
        u = v
        f = f + 1
        std = 0
      
End If
Next i
End Sub 

 

Hallo, ich habe mich nun erneut mit Hirnschmalz dahinter geklemmt und so müsste es der Logik nach funktionieren. Leider erscheint der Laufzeitfehler 13: Typen unverträglich. Wer hat einen Tipp woran es liegen kann?

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
23.04.2013 15:35:08 KalleGabrowski
NotSolved
23.04.2013 16:52:19 Gast94530
NotSolved
23.04.2013 19:40:08 Gast57880
NotSolved
23.04.2013 22:25:24 Gast55698
NotSolved
23.04.2013 22:31:59 Gast46736
NotSolved
24.04.2013 09:28:08 Gast57880
NotSolved
Rot Standardabweichung und Datum
 24.04.2013 10:31:26 KalleGabrowski
NotSolved