Danke SchauAn, ich hatte mich mit der Tabelle intensiv beschäftigt und kleine Schussligkeitsfehler(meine eigenen) gefunden und beseitigt. Jetzt geht alles wie es soll. Dankeschön an Alle die mir geholfen haben. :19: !!
habe leider grad ein Problem bemerkt. ich sollte doch irgend ein zeichen in J setzen. Geht aber nicht, wenn ich zu beispiel ein Leerzeichen schreibe, wird die Zelle Ort. Bekommt man das irgendwie ohne Eingabe von Zeichen oder Werten hin??
29.07.2017, 21:45 (Dieser Beitrag wurde zuletzt bearbeitet: 29.07.2017, 21:45 von Weiss der Geier.)
Hallo SchauAn,
Diablolisch ist doch der Teufel, glaub es Diatolisch oder so ähnlich, aber ja ganz Excel ist Diablolisch . Ich häng den letzten Versuch mal ran. UND Danke!!!!
30.07.2017, 08:10 (Dieser Beitrag wurde zuletzt bearbeitet: 30.07.2017, 08:10 von schauan.)
Hallo Uwe,
Zwei Sachen: bei dem roten Wert vom dystolischen musst Du zwei Vorzeichen tauschen: statt =(J4<>"")*((J4>=70)+($J4<=100)) dann =(J4<>"")*((J4<=70)+($J4>=100))
Warum da ein Leerzeichen rein soll, weiß ich nicht. Aber, um das zu berücksichtigen, schreibst Du statt J4<>"" dann ISTZAHL(J4) und falls das in Spalte H auch zutrifft, dann dort auch.
siehe Anhang.
. \\\|/// Hoffe, geholfen zu haben. ( ô ô ) Grüße, André aus G in T ooO-(_)-Ooo (Excel 97-2019+365)
Folgende(r) 1 Nutzer sagt Danke an schauan für diesen Beitrag:1 Nutzer sagt Danke an schauan für diesen Beitrag 28 • Weiss der Geier
Danke und das mit Leerzeichen, ist so, dass irgendwas in die J Zelle stehen soll, das von j nach A gesprungen wird, leider ist Ohne was, das das Macro dann nicht greift. Schade, aber es muss doch ein Weg geben Oder!
ich hatte bisher beim Öffnen die Makros immer ausgeschalten und daher nichts bemerkt. Deine Makros greifen schon, nur bringen die eine Fehlermeldung. In den Makros gehst Du eine Spalte zu weit nach links. Wenn Du in J bist, was Spalte 10 ist, kommst Du mit ...Offset(1,-10)... zur Spalte 0 und die gibt es nicht Deine Beiden Makros müssten also so aussehen:
Code:
Sub Makro1() ActiveCell.Offset(1, -8).Select End Sub Sub Makro2() ActiveCell.Offset(1, -9).Select End Sub
. \\\|/// Hoffe, geholfen zu haben. ( ô ô ) Grüße, André aus G in T ooO-(_)-Ooo (Excel 97-2019+365)
ich sollte um von J nach A zuspringen irgendwas in J eintragen, dann klappts mit dem nach vorn springen. Nur färbt dann die Zelle sich Rot, was ja logisch ist durch die bedingte Formatierung. Muss doch trotzdem klappen mit zu A springen auch wenn die Zeile leer ist ODER??
31.07.2017, 20:03 (Dieser Beitrag wurde zuletzt bearbeitet: 31.07.2017, 20:03 von schauan.)
Hallo Uwe,
im Anhang zu #35 hatte ich die Formatierung korrekt eingebaut. Es fehlte nur die Änderung aus #37.
Das mit der leeren Zelle geht wahrscheinlich nicht. Außer, Du gibst irgendwas ein und löschst es wieder und drückst dann ENTER. Dann denkt Excel, es wäre was geändert, und das Makro Worksheet_Change greift.
Wenn man einfach nur auf den Wechsel in die Spalte J reagieren würde, dann könntest Du nichts eingeben, weil der Cursor mit einem Makro Wirksheet_Selection_Change ja gleich wieder raus springen würde.
. \\\|/// Hoffe, geholfen zu haben. ( ô ô ) Grüße, André aus G in T ooO-(_)-Ooo (Excel 97-2019+365)