[Excel] Autom. Formeln als Kommentare darstellen

Computer: Software & Programmierung Office Software
1

Hallo,

gibt es einen Weg, wie ich in Excel automatisch Formeln als Kommentare darstellen lassen kann?

In diesem PDF ist auf Seite 25 ein Bild davon, wie es aussehen soll:

http://www.ase.org.uk/htm/journals/ssr/pdf/ssr_2001_…

LG
Jochen

PS: ich weiß, daß ich generaell alle Formeln anzeigen lassen kann (Extras/Optionen/Ansicht) - aber das zeigt nicht Ergebnisse UND Formeln gleichzeitig.

2

Hi Jochen,

gibt es einen Weg, wie ich in Excel automatisch Formeln als
Kommentare darstellen lassen kann?

ich glaube ja.

In diesem PDF ist auf Seite 25 ein Bild davon, wie es aussehen
soll:
http://www.ase.org.uk/htm/journals/ssr/pdf/ssr_2001_…

Sorry, mir werden da nur 12 Seiten angezeigt!?

Gruß
Reinhard

3

Sorry, mir werden da nur 12 Seiten angezeigt!?

Schau auf die Seitennummerierung, unten links auf den Seiten!

Gruß
Jochen

4

Schau auf die Seitennummerierung, unten links auf den Seiten!

Hi Jochen,
habs kapiert.
Das Pdf besteht aus 12 Seiten, innerhalb des PDFs sind pro Pdf-Seite mehrere „Seiten“ abgebildet und deine Seite 25 des Dokuments, steht auf Seite 3 des PDF-Dokuments.
Okay, das wäre gelöst.
Und, wie man in Kommentaren Formeln darstellt, schau ich mal.
Gruß
Reinhard

5

Hallo,
gibt es einen Weg, wie ich in Excel automatisch Formeln als
Kommentare darstellen lassen kann?

Hallo Jochen
Ich hab vor langer langer Zeit mal eine Makro-Funktion getroffen, die Dir vielleicht hilft. Sie zeigt die Formel zwar nicht als Kommentar sondern in einer eigenen Zelle, z. B. neben der Zelle mit dem Formelinhalt.
Vielleicht nützt Dir das etwas.
Grüsse Niclaus

Function FormelInhalt(Zelle)
’ Zeigt den Text der Formel der Bezugszelle an.
Application.Volatile
’ Volatile: Neuberechnung, wenn im Blatt irgendetwas geändert wird
If Application.ReferenceStyle = xlA1 Then
FormelInhalt = Zelle.FormulaLocal
Else
FormelInhalt = Zelle.FormulaR1C1
End If
End Function

6

Hallo,

gibt es einen Weg, wie ich in Excel automatisch Formeln als
Kommentare darstellen lassen kann?

Hallo,

eine direkte Excel-Funktion bzw. Einstellung um eine solche Darstellung zu erreichen kenne ich nicht.

Folgendes Makro kommentiert die aktuell ausgewählten Zellen mit der Formel aus:

Sub tester()
Dim c As Range
For Each c In Selection.Cells
 If c.HasFormula Then
 On Error Resume Next 'bei Fehler weiter
 c.Comment.Delete
 On Error GoTo 0
 With c.AddComment
 .Text c.FormulaLocal 'deutsche Formelausgabe mit Bezusgsystem A1
 .Visible = True 'dauerhaft eingeblendet sonst auf "false" setzen
 'Breite des Kommentars (ca. bei Standardschrift Tahoma 8)
 .Shape.Width = Len(.Text) \* 6.2
 'oben analog oberer Rand Zelle
 .Shape.Top = c.Top
 'Höhe Kommentar ca. analog Zellenhöhe
 .Shape.Height = c.RowHeight - 2
 End With
 End If
Next c
End Sub

Beachte:
evtl. schon bestehende Kommentare zur Zelle werden ohne Rückfage gelöscht.
Eine Aktualisierung bei Veränderung der kommentierten Formeln muss durch erneuten Aufruf des Makros erfolgen.

Viele Grüße, tester!

7

Hi Jo,

gibt es einen Weg, wie ich in Excel automatisch Formeln als
Kommentare darstellen lassen kann?

Option Explicit

Sub tt()
Dim Zelle As Range
On Error Resume Next 'wegen 1004 bei AddComment wenn schon Kommentar drin.
With Worksheets("Tabelle1")
 For Each Zelle In .UsedRange.Cells
 If Zelle.HasFormula Then
 Zelle.AddComment
 Zelle.Comment.Text Text:=Zelle.FormulaLocal
 End If
 Next Zelle
End With
End Sub

PS: ich weiß, daß ich generaell alle Formeln anzeigen lassen
kann (Extras/Optionen/Ansicht)

Ich nehme da Strg+ „#“

Gruß
Reinhard