Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

MSG Box
#1
Hallo zusammen,
Ich kann am Besten einmal das komplette Problem schildern, glaube, dann ist es auch verständlicher was ich meine ( drücke mich manchmal etwas kompliziert aus). Ich baue gerade an einem Urlaubsplaner. In Spalte A wird (Urlaub von) eingegeben und in Spalte B (Urlaub bis) eingegeben. In Spalte C wirft er dann anhand einer Formel die benötigten Urlaubstage aus (z.b. 5). Jetzt müssen die Urlaubstage noch mit dem Resturlaub (SpalteD) abgeglichen werden und wenn zu viel Urlaub genommen worden ist, soll eine MSG-Box erscheinen.
Ich kann auch gerne eine Musterdatei zur Verfügung stellen.
Vielleicht kann mir hier jemand helfen oder hat ne Idee wie ich das lösen kann?
 LG Steffi
Antworten Top
#2
Hi Steffi,

ist das eine Option?

Tabelle2

ABCDE
1Urlaub vonbisTageUrlaubstage
205.02.1528.02.151730
319.04.1512.05.151713
406.08.1525.08.1514-1zuviele Tage!!
5
6
Formeln der Tabelle
ZelleFormel
C2=WENN(UND(A2="";B2="");"";NETTOARBEITSTAGE.INTL(A2;B2;1))
E2=WENNFEHLER(WENN(D2<0;"zuviele Tage!!";"");"")
C3=WENN(UND(A3="";B3="");"";NETTOARBEITSTAGE.INTL(A3;B3;1))
D3=WENNFEHLER(D2-C3;"")
C4=WENN(UND(A4="";B4="");"";NETTOARBEITSTAGE.INTL(A4;B4;1))
D4=WENNFEHLER(D3-C4;"")
E4=WENNFEHLER(WENN(D4<0;"zuviele Tage!!";"");"")
C5=WENN(UND(A5="";B5="");"";NETTOARBEITSTAGE.INTL(A5;B5;1))
D5=WENNFEHLER(D4-C5;"")
E5=WENNFEHLER(WENN(D5<0;"zuviele Tage!!";"");"")
C6=WENN(UND(A6="";B6="");"";NETTOARBEITSTAGE.INTL(A6;B6;1))
D6=WENNFEHLER(D5-C6;"")
E6=WENNFEHLER(WENN(D6<0;"zuviele Tage!!";"");"")

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Antworten Top
#3
Hallo Günther,

vielen Dank für deinen Hinweis Smile.
So in etwas hatte ich mir das als Notlösung auch gedacht.
Aber ich wollte den Hinweis nicht unbedingt in einer extra Spalte, sondern als Pop Up bzw. MSG Box anzeigen lassen.
Vielleicht da ne Idee wie ich das umsetzen kann?

LG Steffi
Antworten Top
#4
Hi Steffi,


Zitat:Aber ich wollte den Hinweis nicht unbedingt in einer extra Spalte, sondern als Pop Up bzw. MSG Box anzeigen lassen.

das geht dann nur mit einem  Makro. Aber mangels fundiertem Wissen kann ich dir dabei nicht helfen. Aber es sind genügend VBA-Spezialisten am Werk. ;)
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Antworten Top
#5
Hi Steffi,

nochmals ich ohne VBA :05: 

Falls du's immer noch anders gelöst haben möchtest - erschlage mich bitte nicht. ;)


Tabelle2

ABCD
1Urlaub vonbisTage30  Gesamt-Url.-Tg.
205.02.1528.02.151713
319.04.1526.04.1558
406.08.1528.08.15179  Tag( e) zuviel
5
6
Formeln der Tabelle
ZelleFormel
C2=WENN(UND(A2="";B2="");"";NETTOARBEITSTAGE.INTL(A2;B2;1))
D2=WENNFEHLER(WENN(D1-C2<0;TEXT(ABS(D1-C2);"0")& "  Tag( e) zuviel";D1-C2);"")
C3=WENN(UND(A3="";B3="");"";NETTOARBEITSTAGE.INTL(A3;B3;1))
D3=WENNFEHLER(WENN(D2-C3<0;TEXT(ABS(D2-C3);"0")& "  Tag( e) zuviel";D2-C3);"")
C4=WENN(UND(A4="";B4="");"";NETTOARBEITSTAGE.INTL(A4;B4;1))
D4=WENNFEHLER(WENN(D3-C4<0;TEXT(ABS(D3-C4);"0")& "  Tag( e) zuviel";D3-C4);"")
C5=WENN(UND(A5="";B5="");"";NETTOARBEITSTAGE.INTL(A5;B5;1))
D5=WENNFEHLER(WENN(D4-C5<0;TEXT(ABS(D4-C5);"0")& "  Tag( e) zuviel";D4-C5);"")
C6=WENN(UND(A6="";B6="");"";NETTOARBEITSTAGE.INTL(A6;B6;1))
D6=WENNFEHLER(WENN(D5-C6<0;TEXT(ABS(D5-C6);"0")& "  Tag( e) zuviel";D5-C6);"")

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Antworten Top
#6
Hallo!
Ich hatte Dir ja bereits im Nachbarforum empfohlen, einfach eine zeilenweise bedingte Formatierung anzuwenden.
Ich als Benutzer der Tabelle würde mich bedanken, immer eine MsgBox wegklicken zu müssen.
Das wäre keine Usability sondern das Gegenteil.

Für das Beispiel von Günther:
- Markiere die Spalten A:D
- bed. Form., neue Regel Formel ist: =$D1<0
- Format: Hintergrund rot

Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste