Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender Navigationstipps
Inhaltsverzeichnis

Kommentar abfragen und ändern

Kommentar abfragen und ändern
17.07.2008 09:27:36
SteffenS
Hallo Zusammen,
ich habe ein Problem bei dem ich Eure Hilfe brauche.
Ich möchte abfragen ob in einer Zelle ein Kommentar steht.
Ist dies so, so möchte ich die 2. Zeile sofern vorhanden, verändern bzw. löschen.
Wie bekomme ich so etwas hin?
Danke im Voraus.
MFG
Steffen Schmerler

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

Betreff
Datum
Anwender
Anzeige
AW: Kommentar abfragen und ändern
17.07.2008 09:29:52
Hajo_Zi
Hallo Steffen,
ich vermute Du meinst per VBA?
Teil 1
Prüfen ob Kommentar da
if cells(x,y).Comment is nothing then msgbox "nix da"

AW: Kommentar abfragen und ändern
17.07.2008 10:02:07
Beverly
Hu Steffen,
nur die erste Zeile bleibt erhalten:

Sub kommentarzeile_loeschen()
If Not ActiveCell.Comment Is Nothing Then
With ActiveCell.Comment
.Text Left(ActiveCell.Comment.Text, InStr(ActiveCell.Comment.Text, Chr(10)) - 1)
.Shape.TextFrame.AutoSize = True
End With
End If
End Sub




Anzeige
Danke
19.07.2008 14:13:06
SteffenS
...

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige