Informationszeichen
20.05.2020 10:01:45
Westermann
Ich weiß um ehrlich zu sein gar nicht, was genau ich da suche (keine Ahnung, ob das eine Excel-Funktion oder schon VBA ist). Aber ich versuch es mal zu beschreiben.
Ich habe des öfteren schon Excel-Mappen gesehen, in denen ein Symbol in einer Zelle hinterlegt ist (meist ein Informationszeichen), wenn man dann mit der Maus über dieses Zeichen streicht, dann bekommt man eine Zusatzinfo (Beispiel: 1 = Urlaub, AH = Außer Haus, BS = Berufsschule, DG = Dienstgang, DR = Dienstreise, FZA = Freizeitausgleich, K = Krank, R = Reha, SE = Seminar, SU = Sonderurlaub) angezeigt.
Weiß jemand wie man so etwas erstellen kann?
Ich find die Lösungen mit Kommentarfeld oder auch Eingabemeldung nicht so schön. Hier brauche ich eure Unterstützung! Vielen Dank Vorab!
P.S.: Habe in meiner Exeltabelle folgenden VBA:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 33 Then
Cancel = True
Select Case Target.Row
Case 8
Target = IIf(Target = "", "KLA", "")
Target.Interior.Color = IIf(Target = "KLA", vbRed, xlNone)
Target.Font.Color = IIf(Target = "KLA", vbWhite, vbBlack)
Case 10
Target = IIf(Target = "", "BAB", "")
Target.Interior.Color = IIf(Target = "BAB", vbRed, xlNone)
Target.Font.Color = IIf(Target = "BAB", vbWhite, vbBlack)
Case 11
Target = IIf(Target = "", "HSA", "")
Target.Interior.Color = IIf(Target = "HSA", vbRed, xlNone)
Target.Font.Color = IIf(Target = "HSA", vbWhite, vbBlack)
End Select
End If
End Sub
Viele Grüße,
Wolfgang