Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
372to376
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
372to376
372to376
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Erweiterte Abfrage

Erweiterte Abfrage
29.01.2004 16:28:35
Stefan Glander
Hallo Forum,
stehe mal wieder völlig auf dem Schlauch.
Folgendes Problem:
Soll für alle Zellen im Blatt gelten.
Wenn
Application.DisplayCommentIndicator = xlNoIndicator
Sub beenden
wenn
Application.DisplayCommentIndicator = xlCommentAndIndicator
dann
Comment.Visible = False
Bitte nicht erschlagen, aber ich baue eine Fehlermeldung nach der anderen
Gruss
Stefan Glander

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

Betreff
Datum
Anwender
Anzeige
AW: Erweiterte Abfrage
29.01.2004 16:54:08
Josef Ehrensberger
Hallo Stefan!
Meinst Du so.


Sub Kommentar()
Dim com As Comments
If Application.DisplayCommentIndicator = xlNoIndicator Then Exit Sub
If Application.DisplayCommentIndicator = xlCommentAndIndicator Then
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
End If
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Gruß Sepp
Anzeige
AW: Erweiterte Abfrage Danke :-))) o.T.
29.01.2004 17:06:06
Stefan Glander
.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige