Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zellverweise / Formeln in Kommentarfeld

Zellverweise / Formeln in Kommentarfeld
16.05.2024 15:37:27
Vincent Breith
Hallo zusammen,

ihr kennt sicher die Excelfunktion dass die zu einer Formel zugehörige Zelle farbig markiert wird wenn man die Zelle anklickt.
nun möchte ich nun aber dass dieses "Zellmarkieren" funktioniert wenn man mit dem Mauszeiger über die Zelle fährt.
Dieses würde deutlich schneller funktionieren wie jede Zelle anzuklicken.

Nun habe ich mit schon programmiert, dass die Formel automatisch in den Kommentar der entsprechenden Zelle geschrieben wird.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Range("A1").Select ' Zelle A1 selectieren -->Start des Suchens nach blauen Feldern
Range(ActiveCell.Offset(0, 0), ActiveCell.Offset(50, 50)).Select ' 50 Zeilen und 50 Spalten werden in das Suchfenster genommen - Selectiert
For Each Zelle In Selection 'suche in jeder dieser markierten Zellen
If Zelle.HasFormula = True Then 'Zelle enthält eine Formel
Zelle.Select
If Zelle.Comment Is Nothing Then
Zelle.AddComment
End If
Zelle.Comment.Text Text:="" & Chr(10) & ""
Zelle.Comment.Text Text:=ActiveCell.Formula & Chr(10) & ""
Zelle.Locked = True 'Schutz aktivieren
Zelle.FormulaHidden = False 'Formel nicht ausblenden
Zelle.Interior.ColorIndex = 36
Else
If Zelle.Interior.ColorIndex = 37 Or Zelle.Interior.ColorIndex = 43 Then
'hier muss eine Eingabe erfolgen können
Else
Zelle.Locked = True 'Schutz aktivieren
Zelle.FormulaHidden = False 'Formel nicht ausblenden
End If
End If
Next

End Sub

Wie könnte ich nun die zur Formel zugehörenden Zellen (hier A1 und B1) farbig hervorheben oder die Schriftart auf Fett einstellen wenn sich die Maus darüber bewegt.

Hintergrund:
Wir arbeiten mit geschützten Excelblättern, bei denen man, nach ihrer Validierung, die Zelle nicht anklicken kann.

Vielen Dank für eure Ideen und Hilfe
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zellverweise / Formeln in Kommentarfeld
16.05.2024 16:24:30
daniel
Hi

wenn du nicht klicken, sondern nur mit der Maus drüberfahren willst um die Aktion auszulösen, brauchst du ein MouseMove-Event.
das hast du aber nicht für Zellen und du müsstest wahrscheinlich schon sehr tief in die Windows-Trickkiste greifen, um sowas zu programmieren.

mit VBA-Basiskenntnissen sollte aber folgendes möglich sein:

1. erstelle einen ActiveX-Button, denn dieser hat ein MouseMove-Event. mach den button so groß, dass er den benötigten Zellbereich abdeckt und stelle seinen Hintergrund auf Transparent, damit du die Zellen siehst

2. im MouseMove des Buttons hast du die x- und y-koordinaten des Mauszeigers über dem Button und damit auch über dem Tabellenblatt. Damit solltest du ausrechnen können, über welcher Zelle sich der Mauszeiger befindet.

3. wenn du die Zelle hast, kannst du die Formel ermitteln und über DirectPrecentes auch die verwendeten Zellen.

damit müsstest du dir dann was programmieren können, was die verwendeten Zellen beim hoovern über eine Zelle entsprechend einfärbt.

Gruß Daniel

Anzeige
AW: Zellverweise / Formeln in Kommentarfeld
16.05.2024 17:01:35
Vincent Breith
Hallo Daniel,
vielen Dank für deine Idee.
Mein Gedanke war ob bzw. wie ich die Formel aus den aufpoppenden Kommentarfeld auslesen und weiterverarbeiten könnte.
Da die Formel mit meinem oben eingefügten Makro automatisch in ein Kommentarfeld eingetragen wird, müsste ich nur dieses auslesen wenn es aufpoppt.
(so simuliere ich das MouseMove)
Anzeige
AW: Zellverweise / Formeln in Kommentarfeld
16.05.2024 17:18:33
daniel
"nur" ist leicht gesagt.
es gibt meinem Wissen nach keine Möglichkeit, über Standard-VBA automatisch auf das Aufpoppen eines Kommentarfeldes zu reagieren, so dass du damit ein Makro ausführen lassen kannst.
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige