Office: VBA/Makro: gefundene Zelle mit Farbe markieren

Hallo zusammen

Beiliegend eine Excel-Datei (Version 2010). Ich habe mithilfe von gefundenen Einträgen in VBA-Foren das darin enthaltene Makro erstellt und es funktioniert soweit einwandfrei.

Via ein Suchfeld im 1. Register wird das eingegebene Kontrollschild in allen nachfolgenden Tabellenblättern gesucht. Der Cursor bleibt dann auf der gefundenen Zelle stehen, nur leider sieht man diese sehr schlecht und muss von Auge dann mühsam auf dem Tabellenblatt gesucht werden.

Daher möchte ich mit entsprechender Ergänzung des VBA-Codes die gefundene Zelle rot einfärben, allerdings nur solange wie man mit dem Cursor auf der Zelle steht, ansonsten müsste ich die Farbe der gefundenen Zelle nachher immer manuell wieder zurück formatieren. Ich weiss allerdings nicht, ob die bestehende bedingte Formatierung in den Zellen der Kontrollschildern diesen Wunsch verunmöglicht. (Die Kontrollschilder in den verschiedenen Hallenlagerplatzregistern werden mit einer Stammdatenliste abgeglichen und blau eingefärbt, wenn eine Übereinstimmung da ist.)

Ich verstehe von VBA-Programmierung so gut wie nichts und habe - wie eingangs erwähnt - das Makro nur anhand von kopierten Codes aus dem Internet zustande gebracht. Von daher bin ich sehr dankbar, wenn mir jemand so antworten könnte, dass ich weiss, was ich wo genau in den Code einfügen muss.

Vielen herzlichen Dank!

Beste Grüsse
Rainbow-Warrior

 

Hi,

ich hätte da einen anderen Vorschlag: verschiebe die gefundene Zelle nach links oben. Ersetze dazu in deinem Code diese beiden Zeilen

Code:

ws.Select
c.Select

durch diese eine Zeile

Code:

Application.Goto reference:=Worksheets(ws.Name).Range(c.Address), scroll:=True

Bis später,
Karin

 

Hallo Karin

Danke für den Tipp.

Bei meiner Suche geht es darum, ein bestimmtes Fahrzeug/Kontrollschild in verschiedenen Abstell-Hallen (div. Register) zu finden, um zu wissen, wo man das Fahrzeug abholen muss bzw. auf welchem Platz es steht. Daher muss die gefundene Zelle dort bleiben, wo sich das Fahrzeug befindet. Oder habe ich dich falsch verstanden?

Gruss
Jan

 

Hi Jan,

die Zelle an sich bleibt natürlich wo sie ist, nur das Tabellenblatt wird so verschoben, dass die relevante Zelle im Bildschirmauschnitt in der linken oberen Ecke zu sehen ist, wodurch man sie leichter finden kann - teste es doch einfach mal.

Bis später,
Karin

 

Hallo Karin

Ok, habe ich nun verstanden und ausprobiert. Ist eine Variante, damit geht aber die Übersicht auf dem Hallenplan verloren, wenn ich dann immer nur noch einen Ausschnitt davon auf dem Bildschirm habe.

Falls noch andere Ideen vorhanden sind, bin ich dankbar dafür.

Gruss
Jan