Hallo hallo,


ich arbeite mit einer Exceltabelle, die aufgrund der großen Datenmenge relativ unübersichtlich ist. Um die Übersicht zu verbessern, möchte ich, dass das angewählte Feld Gelb hinterlegt wird, aber sobal man ein anderes Feld anwählt, das Gelb in dem vorherigen feld wieder verschwindet. Das habe ich über folgenden Befehl schon gelöst:


Option Explicit
Public xZelle As String
Public Farbe As Integer

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
Range(xZelle).Interior.ColorIndex = Farbe
Farbe = Target.Interior.ColorIndex
xZelle = Target.Address
Target.Interior.ColorIndex = 6
End Sub



Jetzt kommt mein eigentliches Anliegen. Außer der Gelben hinterlegung hätte ich gerne noch einen "Zoom" für das angewählte Feld. Dieser "Zoom" soll sowohl bei bereits beschrieben Zellen, als auch bei noch leeren, die ich beschreiben möchte, funktionieren.



Ich hoffe, ich habe es verständlich ausgedrückt und bedanke mich schon einmal für die Hilfe.


Gruß Christian