|
Guten Abend,
aus einer "Excel-Mutterdatei" wird ein Formblatt mit Grunddaten in ein neues Arbeitsblatt (Mappe1) kopiert.
Der Zellbereich M7:Q & letzte Zeile in Mappe1 (neu) wird in unterschiedlichen Schritten „händisch“ mit Istdaten(Kennzahlen) befüllt. Es gibt keine logische Abfolge bei der Eingabe. Es muss ständig rauf und runter gecrollt werden; dadurch Eingaben in falscher Zelle!
Die ID der Quelldatei und die ID der Zieldatei(Zelle A7 & letzte Zeile) werden optisch abgeglichen. Danach ist erst die Eingabe der Kennzahlen im Bereich z.B. M7:Q & letzte Zeile möglich. Bei bis zu 1000 Zeilen sind Fehler vorprogrammiert.
Wie kann ich erreichen, dass bei Aktivierung einer Zelle im Zellbereich "M7:Q & letzte Zeile" die jeweile Zeile während der Aktivierung optisch hervorgehoben wird, ohne die "Grund-Formatierung" der einzelnen Zellen zu verändern. Wird eine neue Zelle angesprungen, wird die bisherige Zeile inaktiv.
Vielleicht findet jemand eine Möglichkeit...! Das nachfolgende Makro funktioniert. Nur wir die bisherige Formatierung gelöscht. Problem auch, dass das Makro quasi in eine neue Datei übergeben und dort aktiviert werden muss.
Private Sub Workbook_SheetSelectionChange( _
ByVal sh As Object, ByVal Target As Excel.Range)
Static AlteZelle As Range
If Not AlteZelle Is Nothing Then
AlteZelle.EntireRow.Interior.ColorIndex = _
xlColorIndexNone
End If
Target.EntireRow.Interior.ColorIndex = 22
Set AlteZelle = Target
End Sub
Einen charmanten Abend und herzlichen Dank...!
Egon
|