Thema Datum  Von Nutzer Rating
Antwort
09.01.2015 19:22:14 Monika
NotSolved
Blau Schleifen Problem
 09.01.2015 19:26:14 Gast97978
NotSolved
09.01.2015 20:04:33 Gast68989
NotSolved
10.01.2015 10:01:52 Gast20968
Solved

Ansicht des Beitrags:
Von:
Gast97978		 Datum:
09.01.2015 19:26:14		 Views:
762		 Rating:
     
Antwort:
  Ja
Thema:
Schleifen Problem		 
am = 2
imo = 10
imu = 0


a_C10 = Sheets("Tabelle1").Range("C10").Value
a_C11 = Sheets("Tabelle1").Range("C11").Value

b = UserForm1.txt_3.Value



If a_C10 >= b Then
MsgBox ("Der Wert in der Tabelle ist größer oder gleich")
ElseIf txt_1.Value - am < 0.5 And txt_1.Value + am > 0.5 And txt_2.Value - imo < 0.5 And txt_2.Value + imu > 0.5 Then
Sheets("Tabelle1").Range("C10").Value = txt_3.Value
MsgBox ("Der Wert in C10 wurde geändert")
End If

If a_C11 >= b Then
MsgBox ("Der Wert in der Tabelle ist größer oder gleich")
ElseIf txt_1.Value - am < 0.5 And txt_1.Value + am > 0.5 And txt_2.Value - imo < 1.5 And txt_2.Value + imu > 1.5 Then
Sheets("Tabelle1").Range("C11").Value = txt_3.Value
MsgBox ("Der Wert in C11 wurde geändert")
End If

sry, habe einen Fehler beim Kopieren gemacht. Das ist nun der richtige Code

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
09.01.2015 19:22:14 Monika
NotSolved
Blau Schleifen Problem
 09.01.2015 19:26:14 Gast97978
NotSolved
09.01.2015 20:04:33 Gast68989
NotSolved
10.01.2015 10:01:52 Gast20968
Solved