Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
724to728
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
724to728
724to728
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

formel aus Zelle in Kommentar der Zelle

formel aus Zelle in Kommentar der Zelle
03.02.2006 11:30:55
ray
Hallo,
vor einigen Tagen wurde mir mit folgendem Code geholfen:
Hallo,

Sub FormelInKommentare()
Dim c As Range
For Each c In Cells.SpecialCells(xlCellTypeFormulas)
If c.NoteText = "" Then
c.AddComment
c.Comment.Text Text:=c.FormulaLocal
c.Value = c.Value
Else
c.Comment.Text Text:=c.FormulaLocal
c.Value = c.Value
End If
Next
End Sub

funzt super. ABER: Jetzt habe ich bemerkt, daß nicht nur die Verweise auf andere Tebellen durch den Wert ersetzt werden sondern auch einfache Formel wie z. B. "A1+A2".
Kann man den Code so umändern:
Suche nach Formeln und verweisen
Schreibe diese in den Kommentar der Zelle (das ist obiger code)
Ersetze die Formel der Zelle nur dann durch den Wert, wenn sie sich nicht auf das sheet bezieht, auf dem sie steht.
Hat da jemand ne Idee?
Viele Grüße aus Hamburg, dichte Wolkendecke, gefühlte 2 Grad
ray

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: formel aus Zelle in Kommentar der Zelle
03.02.2006 11:37:38
u_
Hallo,
vielleicht so:

Sub FormelInKommentare()
Dim c As Range
For Each c In Cells.SpecialCells(xlCellTypeFormulas)
If c.NoteText = "" Then
c.AddComment
c.Comment.Text Text:=c.FormulaLocal
Else
c.Comment.Text Text:=c.FormulaLocal
End If
If InStr(c.Formula, "!") > 0 Then c.Value = c.Value
Next
End Sub

Gruß
Geist ist geil!
AW: formel aus Zelle in Kommentar der Zelle
03.02.2006 11:44:23
ray
Hallu und Danke, Geist ist wirklich geil.
Es funzt. ABER: Sachen wie A1+A2 bleiben jetzt erhalten. Nicht aber "Summe(xy)".
Noch ne Idee?
Viele Grüße Kev
AW: formel aus Zelle in Kommentar der Zelle
03.02.2006 11:54:04
u_
Hallo,
bei mir bleibt auch =SUMME(B15:B20) erhalten, nicht aber =SUMME(Tabelle2!B4:B13)
Es wird halt nach nem ! in der Formel gesucht.
Gruß
Geist ist geil!
Anzeige
AW: formel aus Zelle in Kommentar der Zelle
03.02.2006 11:58:57
ray
Hallo,
wie ich schon sagte, Geist ist geil.
Natürlich hast Du Recht. Bei mir bleibt es auch erhalten. Hab mich verguckt...
Vielen Dank und schönes Wochenende wünscht Dir
ray

316 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige