Thema Datum  Von Nutzer Rating
Antwort
25.08.2019 20:04:40 Thomas
Solved
25.08.2019 20:50:58 Gast183
NotSolved
25.08.2019 23:34:55 Gast65719
NotSolved
Blau Wenn Funktion in VBA
26.08.2019 01:29:57 Gast33604
NotSolved
26.08.2019 10:29:02 Gast33937
NotSolved
04.09.2019 10:19:24 Thomas
Solved

Ansicht des Beitrags:
Von:
Gast33604
Datum:
26.08.2019 01:29:57
Views:
552
Rating: Antwort:
  Ja
Thema:
Wenn Funktion in VBA

Hallo Thomas.

1.)

For i = 2 To i = 12

ist falsch.

Richtig ist:

For i = 2 To 12

 

2.) Braucht man hier keine Schleife:

Es reicht völlig:

Worksheets("Tabelle1").Range("J2:J12").FormulaR1C1 = "=IF(RC[-5]-RC[-6]>35,"">35"","""")"

 

3.) Man sollte die lokale Schreibweise nicht verwenden, sondern die englische. Denn die läuft auf jedem System, egal mit welcher Systemeinstellung. (auf einem System mit einer anderen Sprache als Deutsch, würde dein Code einen Laufzeitfehler verursachen)


Ich will dir hier aber noch die Lösung als Schleife zeigen:

  Dim i As Long
  
  For i = 2 To 12
    Worksheets("Tabelle1").Range("J" & i).Formula = "=IF(E" & i & "-D" & i & ">35,"">35"","""")"
  Next

 

Grüße


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
25.08.2019 20:04:40 Thomas
Solved
25.08.2019 20:50:58 Gast183
NotSolved
25.08.2019 23:34:55 Gast65719
NotSolved
Blau Wenn Funktion in VBA
26.08.2019 01:29:57 Gast33604
NotSolved
26.08.2019 10:29:02 Gast33937
NotSolved
04.09.2019 10:19:24 Thomas
Solved