Thema Datum  Von Nutzer Rating
Antwort
19.01.2020 16:01:48 Flo
NotSolved
20.01.2020 08:46:30 Torsten
NotSolved
20.01.2020 13:01:21 Flo
NotSolved
20.01.2020 13:49:06 Torsten
NotSolved
20.01.2020 14:33:33 Gast35391
NotSolved
20.01.2020 14:38:47 Flo
NotSolved
Rot Einfache Message Box bei bestimmten Wert
 21.01.2020 08:40:33 Torsten
NotSolved
21.01.2020 10:14:13 Gast96815
NotSolved
21.01.2020 10:17:55 Torsten
NotSolved

Ansicht des Beitrags:
Von:
Torsten		 Datum:
21.01.2020 08:40:33		 Views:
439		 Rating:
     
Antwort:
  Ja
Thema:
Einfache Message Box bei bestimmten Wert

Hallo Flo,

dann mit einer zusaetzlichen If Abfrage:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
 
Dim Zelle As Range, Bereich As Range
 
Set Bereich = Range("I13:I18")
 
If Target.Address = Range("I18").Address Then
    For Each Zelle In Bereich
        If Zelle.Value = "0" Then MsgBox "Wert in Zelle " & Zelle.Address & " ist 0"
    Next
End If
 
End Sub

Wenn du den Fehler Typen unvertraeglich immernoch bekommst, dann hier:

If Zelle.Value = 0 Then MsgBox "Wert in Zelle " & Zelle.Address & " ist 0"

die Null ohne Anfuehrungszeichen.

Gruss Torsten

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
19.01.2020 16:01:48 Flo
NotSolved
20.01.2020 08:46:30 Torsten
NotSolved
20.01.2020 13:01:21 Flo
NotSolved
20.01.2020 13:49:06 Torsten
NotSolved
20.01.2020 14:33:33 Gast35391
NotSolved
20.01.2020 14:38:47 Flo
NotSolved
Rot Einfache Message Box bei bestimmten Wert
 21.01.2020 08:40:33 Torsten
NotSolved
21.01.2020 10:14:13 Gast96815
NotSolved
21.01.2020 10:17:55 Torsten
NotSolved