Thema Datum  Von Nutzer Rating
Antwort
Rot Elseif ignoriert Bedingungen
 22.10.2020 15:30:35 Mike
NotSolved
22.10.2020 15:36:39 Gast76052
Solved
22.10.2020 15:40:20 Gast6594
NotSolved
22.10.2020 17:01:41 Gast11069
NotSolved

Ansicht des Beitrags:
Von:
Mike		 Datum:
22.10.2020 15:30:35		 Views:
943		 Rating:
     
Antwort:
  Ja
Thema:
Elseif ignoriert Bedingungen

Hallo zusammen,

ich verzweifel gerade ein einem Programm um mir eine Berechnung zu erleichter. Ich will eine Fallunterscheidung mit Elseif machen, allerdings werden meine Bedingungen ignoriert. Ich habe wahrscheinlich einen Fehler in der Syntax, kann ihn aber nicht ausmachen. Im Grund soll das Programm schauen, ob die 2 Werte in einem definiertem Bereich liegen, um dann Formel x,y,z zu verwenden.

Liebe Grüße,
Mike

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Sub SimL3()
'
'
 
   Dim i As Integer
    For i = 1 To 2295
    Me = ActiveCell.Offset(0, -4).Value
    mD = ActiveCell.Offset(0, -3).Value
     
    If mD < 15 Then
    ActiveCell.Value = 0
         
        ElseIf 32.04 < mD < 42.48 And 0 < mE < 9.9 Then
    ActiveCell.FormulaR1C1 = "= 0,2365*RC[-3] - 5,639"
     
        ElseIf 42.48 < mD < 52.92 And 10 < mE< 19.9 Then
    ActiveCell.FormulaR1C1 = "= 0,2308*RC[-3] - 6,5215"
     
     
    Else
    ActiveCell.FormulaR1C1 = "=-0,0011*RC[-3]^2 + 0,3007*RC[-3] - 2,7811"
    ActiveCell.Offset(1, 0).Range("A1").Select
       
     
    End If
 
    Next
    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:
WYSIWYG-Editor, ctl00_Content_editor1



  • 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
Rot Elseif ignoriert Bedingungen
 22.10.2020 15:30:35 Mike
NotSolved
22.10.2020 15:36:39 Gast76052
Solved
22.10.2020 15:40:20 Gast6594
NotSolved
22.10.2020 17:01:41 Gast11069
NotSolved