Profil von lh042

Frage

23.09.2011, 14:35

Excel: Beim Klicken in die Zelle Text ausblenden?

Hallo

Ich komme nicht weiter. Ich möchte gerne eine Tabelle führen, die mehrere Leute dann benutzen können. Nun möchte ich eine Kurze erklärung in die Zelle einfügen, welche aber dan verschwindet, wenn man drein klickt um die Info ein zu geben. Versteht ihr das? XD

So wie bei einem Formular, wenn z.b. "Name" da steht ich klicke rein und gebe dan meinen Namen ein.

Danke viel mal für die Hilfe

...zur Frage

Antwort

von lh042

23.09.2011, 14:51

Das kann man über ein Event-Makro realisieren. Im VBA-Editor (Alt+F11) Doppelklick auf Dein Tabellenblatt (z.B. Tabelle1) und dort eintragen:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Target.Cells(1).Value = ""
End Sub

Damit verschwindet der Text mit einem Doppelklick. Das passiert allerdings mit JEDEM Text... Wenn man das verhindern will, muss man den Kommentar kennzeichnen, z.B. mit einem Unterstrich _ am Anfang. Dann könnte die Routine so aussehen:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Left(Target.Cells(1).Value, 1) = "_" Then
        Target.Cells(1).Value = ""
    End If
End Sub

...zur Antwort