gelang(while)t

ja da gibt es schon Möglichkeiten, ich würde ein UserForm erstellen, auf den du einen Button legst und ihm als Funktion gibst, dass er jede Zeile ablaufen soll und wenn in der bestimmten Zelle "erledigt" steht, soll er diese in das nächste Tabellenblatt kopieren...! wenn du Fragen hast, einfach schreiben, aber als Tipp die Makros kannst du aufzeichnen und dann siehst du den passenden Quelltext dazu, musst ihn dir nur variabel umschreiben!

also richtig verstanden solltest du mich schon haben, ich denke aber schon, dass es eine saubere Lösung ist, weil ich nur die aktuellsten PopUps auslese und von daher weniger Umweg gehe als wenn ich nur die Nachrichtendienst-Fenster auslese...denke ich zumindest! ob nun vba oder vbs spielt ja keine Rolle, denn der Teil der Übung funktioniert ja, ich möchte nur allgemein irgendwo im System eine Einstellung machen, dass ein PopUp mit dem Ereigniscode 26 nicht aufpopt...

hehe, dann wird deine Befehlszeile im Jahr 2050 sehr sehr lang sein^^ greetz gelang(while)t

Also ich weiß ja nicht, aber du machst jeweils 2 IF-Abfragen für je 1 Fall um 2 Anweisungen auszuführen!!! einfacher meines Erachtens: If Range("J3").Value >= Range("I3").Value Then MsgBox "Der SMI hat die Limite bei Herrn ... überschritten! " Range("J3").ClearContents ElseIf Range("J4").Value >= Range("I4").Value Then MsgBox "ABB hat die Limite bei Herrn ... überschritten! " Range("J4").ClearContents End if greetz gelang(while)t

So also, wenn ich es richtig verstanden habe, möchtest du überprüfen ob Samstag oder Sonntag ist! Denn es kann ja nie Samstag und Sonntag gleichzeitig sein^^ Ich habe dir mal ein kleines Prog geschrieben, brauchst nur ein Userform mit Button!!! _______________________________________________________________ Function GetWochentag(dtmDate As Date) As String GetWochentag = WeekdayName(Weekday(dtmDate, vbMonday)) End Function Private Sub CommandButton1_Click() Dim wochentag As String wochentag = GetWochentag(Now) If wochentag = "Samstag" Or wochentag = "Sonntag" Then MsgBox ("Wochenende!!!") Else MsgBox ("Arbeitswoche!!! :-(") End If End Sub ________________________________________________________________ Ich hoffe ich konnte helfen!!! greez gelang(while)t

Hallo Leute, ich weiß das Thema ist viel unterwegs, aber ich habe die Lösung auf meine Frage noch nicht gefunden. Momentan bin ich dabei über VBA eine lokale und eine fremde Ereignisanzeige (System) auszulesen um die PopUps, die Net Send erzeugt, herauszufiltern. Das ganze funktioniert soweit auch und mein eigentliches Ziel, eine Art Chatprogramm für gesicherte Netzwerke zu schreiben rückt näher. Nur habe ich ein Problem, ich möchte den Ursprung des "Nachrichtendienst"-Fenster finden, heißt ich möchte den Nachrichtendienst aktiviert lassen und trotzdem das aufpopen dieses Fensters unterdrücken. Kennt jmd. eine Möglichkeit dafür? Vielen Dank für eure Hilfe...! greez gelang(while)t