Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1400to1404
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

Kommentar abhängig von Wert anhängen

Kommentar abhängig von Wert anhängen
30.12.2014 23:06:52
Wert
Hallo VBA Experten,
meine Voraussetzungen: Excel "geht so", VBA "erste Gehversuche"
Ich arbeite gerne mit Kommentaren. Jetzt suche ich nach einer Lösung dafür, wie man Kommentare abhängig vom Wert in der betreffenden Zelle "auftauchen".
Zur Veranschaulichung ein Beispiel: In den Zellen A1 bis A5 werden Obstsorten eingegeben. Wenn die Begriffe "Banane" oder "Orange" eingegeben werden, soll die betroffene Zelle mit dem Kommentar "muss geschält werden" versehen werden. Nach Entfernung der Banane oder Orange soll auch der Kommentar wieder verschwinden.
Wie kann man so was machen ?
Wünsche einen guten rutsch ins neue Jahr.
Gruss Bernhard

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kommentar abhängig von Wert anhängen
31.12.2014 09:08:43
Wert
Hallo
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A5")) Is Nothing And Target.Count = 1 Then
If Target.Value = "Banane" Or Target.Value = "Orange" Then
With Target
.ClearComments
.AddComment
.Comment.Visible = True
.Comment.Text Text:="muss geschält werden"
End With
Else
Target.ClearComments
End If
End If
End Sub
Gruß Matthias

With-Konstrukt leicht geändert
31.12.2014 09:41:19
Matthias
Hallo
oder etwas gekürzt:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A5")) Is Nothing And Target.Count = 1 Then
With Target
If .Value = "Banane" Or .Value = "Orange" Then
.ClearComments
.AddComment
.Comment.Visible = True
.Comment.Text Text:="muss geschält werden"
Else
.ClearComments
End If
End With
End If
End Sub
Gruß Matthias

Anzeige
AW: With-Konstrukt leicht geändert
31.12.2014 12:25:10
bernhardtautz
Das ist genau das, was ich suche. Vielen Dank Matthias !
Wünsche einen guten Rutsch und alles Gute für das neue Jahr

307 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige