Zellen per Doppelklick einfΣrben
Um in Excel Zellen hervorzuheben, kann man Ihnen ⁿber die Symbolleiste eine Hintergrundfarbe geben. Fⁿr gr÷▀ere Bereiche ist das gut, ich will jedoch viele einzelne Zellen herauspicken und markieren. Da dauert mir das Verfahren mit der Symbolleiste zu lange. Gibt es eine M÷glichkeit, einzelne Zellen per Doppelklick einzufΣrben?
Ja, das lΣsst sich mit Hilfe eines VBA-Makros realisieren, das in Excel eine benutzerdefinierte Funktion erzeugt. ZustΣndig fⁿr die Reaktion auf den Doppelklick ist das Ereignis "BeforeDoubleClick". Um das Makro einzugeben, ÷ffnen Sie den VBA-Editor ⁿber die Tastenkombination [Alt]+ [F11]. Im Fenster des Projektmanagers links oben (in seiner Titelleiste steht ╗Projekt - VBA-Projekt½) klicken Sie zweimal auf den Eintrag ╗Tabelle 1 (Tabelle 1)½, damit Ihre Funktion nicht gleich in allen ArbeitsblΣttern landet. Dann geben Sie ins Editor-Fenster folgende Private-Sub-Funktion ein:
Private Sub Worksheet_BeforeDoubleClick (ByVal Target As Excel.Range, Cancel As Boolean) With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid End With End SubSchlie▀en Sie den VBA-Editor und klicken Sie zweimal in eine Zelle. Sofort fΣrbt sich ihr Hintergrund gelb. Die Farbe bestimmen Sie ⁿber ╗.ColorIndex=½, indem Sie die dort eingetragene Zahl durch eine andere ersetzen. Damit die schwarzen Inhalte der Zelle gut lesbar bleiben, benutzen Sie am besten Farben wie Hellblau (Wert 8), Gelb (Wert 6) oder Grⁿn (Wert 4). Andere Farben sind natⁿrlich ebenfalls m÷glich, etwa 3=Rot, 5=Blau oder 7=Lila. Die Zeile ╗.Pattern = xlSolid½ legt das Hintergrundmuster fest. So wⁿrde ╗.Pattern = xlCrissCross½ zusΣtzlich zur Farbe die Zelle mit einem Kreuzmuster fⁿllen.