Ich arbeite viel mit großen Dateien und der Suchfunktion.
Kann man es so einstellen, daß die relevante Zelle nicht nur einen Rahmen erhält, sondern auch der Hintergrund farblich markiert wird?
So wäre es einfacher, die gefundene Zelle zu finden.
Ich arbeite viel mit großen Dateien und der Suchfunktion.
Kann man es so einstellen, daß die relevante Zelle nicht nur einen Rahmen erhält, sondern auch der Hintergrund farblich markiert wird?
So wäre es einfacher, die gefundene Zelle zu finden.
Hi Goebi :p
Vorschlag wäre
RowLiner Add-In
Gruß Tanto :cool:
oder per Code im "Workbook_SheetSelectionChange" Ereignis
Danke für die Antworten!
Leider ist es für mein Excel im Büro und da kann ich keine Add-In's oder VBA einfügen.
Hi Goebi :p
Dann hast du keine Chance einer Lösung 8O
Gruß Tanto :cool:
@Jochy
Wäre es so leicht zu lösen,hätte das Addin wohl keine Berechtigung
Wenn du es probiert hättest,dann würdest du feststellen das es mit einem Ereignis nicht getan ist
gibst du im VBA Editor
in deiner Arbeitsmappe mal das ein
ich finde das geht wohl so
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)
Static tmpIndex As Integer
Static tmpCell As Range
On Error Resume Next
tmpCell.Interior.ColorIndex = tmpIndex
If Not OldCell Is Nothing Then
tmpIndex = Target.Interior.ColorIndex
End If
Target.Interior.ColorIndex = 4 'grün , 6=gelb
Set tmpCell = Target
End Sub
Alles anzeigen
Hi Jochy :p
Mit deinem Code schränkst du Excel aber ganz schön ein
Hier nur mal Drei der von mehreren Reproduzierbaren Fehler
Copy/Einfuegen/Formatierungen
On Error Resume Next ist auch nicht so elegant :cool:
Guß Tanto
und so
Option Explicit
Dim tmpVor As Range
Dim tmpVorX As Integer
Private Sub Worksheet_Deactivate()
If Not tmpVor Is Nothing Then tmpVor.Interior.ColorIndex = tmpVorX
Set tmpVor = Nothing
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Not tmpVor Is Nothing Then tmpVor.Interior.ColorIndex = tmpVorX
tmpVorX = Target.Interior.ColorIndex
Target.Interior.ColorIndex = 6 'Gelb
Set tmpVor = Target
End Sub
Alles anzeigen
Sie haben noch kein Benutzerkonto auf unserer Seite? Registrieren Sie sich kostenlos und nehmen Sie an unserer Community teil!