HERBERS Excel-Forum - die Beispiele

Thema: Anzeige der Formel mit Quellblattangabe

Home

Gruppe

Allgemein

Problem

Im Kommentar soll das mit dem Zellinhalt verknüpfte Tabellenblatt genannt werden.

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.
ClassModule: Tabelle1

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
   Dim cmt As Comment
   Dim sTxt As String
   If Target.Cells.Count > 1 Then Exit Sub
   If IsEmpty(Target) Then Exit Sub
   Application.DisplayCommentIndicator = xlCommentIndicatorOnly
   If Not Target.Comment Is Nothing Then
      Target.Comment.Delete
   End If
   If Target.HasFormula Then
      If InStr(Target.Formula, "!") > 0 Then
         sTxt = Left(Target.Formula, InStr(Target.Formula, "!") - 1)
         Set cmt = Target.AddComment(sTxt)
         cmt.Shape.TextFrame.AutoSize = True
      End If
   End If
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Ansicht

Formular Steuerelement bei "geschützer Ansicht" VBA und geschützte Ansicht
Hilfe Laufzeitfehler wegen benutzerdef. Ansicht OT: Exploreransicht
Allgemeine Frage zur Fehlerbehandlung allgemeine Fragen zu einer Datenbank
Symbolleistenansicht beim Userformaufruf Dateiansicht
Benutzerdefinierte Ansicht nach Blattschutz Benutzerdefinierte Ansichten trotz Blattschutz
Bildschirmansicht optimieren allgemein
Ansicht wie in Excel XP Ansicht nach Arbeitsblatt wechsel
Zellenformat für Datumsansicht ??? Freigegebene Arbeitsmappe, Ansichten & Blattschutz
Liste ähnlich der Autofilter-Ansicht Ansicht per Makro wählen
Scrollen bei Formelansicht. drucken - seitenansicht
Email Ansicht auf automaticgröße einstellen (verständnis) Problem mit benutzerdef. Ansicht
drucken oder seitenansicht allgemein: VBA lernen?
Hide-Methode-Allgemeine Frage Formelassistent allgemein
2 Tabellenblätter in einer Ansicht Bentuzerdefinierte Ansicht Problem
allgemeingültig Blattschutz aufheben druckansicht ohne drucken etc..nur schliessen funk
Ansichten Seitenansicht via VBA schließen
Ansicht VBA-Projekt-Explorer allgemeine Frage...
Ansichtsmodus Berechnungsbogen Tabellenblattansicht
Solver - allgemein noch offen - VBA Umgebung (Ansicht) ist durcheinan
Standardansicht VBA-Umgebung wiederherstellen Solver - allgemein
Frage zum Forum allgemein Ansicht aktualisieren
Monthview-Controll Objekt Ansicht "fixieren" Zelle selektieren ändert Bildschirmansicht
Bildschirmansicht "zentrieren" Allgemeine Frage - Finanz-Planungsmodell
Ansicht Pivoteingrenzung Formel verallgemeinern
Bildschirmansicht, Zelle darüberhinaus schreiben Bildschirmansicht auf Shape focusieren