Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1756to1760
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Kommentarinhat überprüfen

Kommentarinhat überprüfen
16.05.2020 12:55:23
Sergej
Hallo Leute,
ich habe mit unten beigefügtem Code überprüft, ob die Zelle KUNNR ein Kommentar enthält. Soweit in Ordnung.
Wie kann ich bitte ergänzend noch folgendes als Bedingung einfügen:
- Wenn der Kommentarinhalt nicht leer ist
- Wenn der Kommentarinhalt nicht mit \\ beginnt oder zweites Zeichen nicht ein : (Doppelpunkt enthält)
- Wenn der Kommentarinhalt nicht mit .cfg endet
Sub Comm()
If Range("KUNNR").Comment Is Nothing Then
MsgBox "Die Zelle ""KUNNR"" beinhaltet kein Inhalt oder ist nicht richtig ausgefüllt",  _
vbCritical
Else
End If
End Sub
Beste Grüße,
Sergej

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kommentarinhat überprüfen
16.05.2020 13:04:40
Hajo_Zi
Hallo Sergej,
Option Explicit
Sub Comm()
If Range("KUNNR").Comment Is Nothing Then
MsgBox "Die Zelle ""KUNNR"" beinhaltet kein Inhalt oder ist nicht richtig ausgefüllt",  _
_
vbCritical
Else
If Left(Range("KUNNR").Comment.Text, 2) = "\\" Then
ElseIf Mid(Range("KUNNR").Comment.Text, 2, 1) = ":" Then
ElseIf Right(Range("KUNNR").Comment.Text, 4) = ".cfg" Then
Else
MsgBox "Falscher Kommentar"
End If
End If
End Sub
GrußformelHomepage
Anzeige
AW: Kommentarinhat überprüfen
16.05.2020 13:11:01
Sergej
Hallo Hajo,
vielen herzlichen Dank!
Beste Grüße,
Sergej

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige