ich benötige 2 x das selbe VBA-Makro auf jeweils unterschiedlichen Worksheets der gleichen Datei. ziel ist es, in einer recht langen Datei (Jahresplanung) "weiter hinten" etwas ändern zu können und dabei den ganz links angezeigten Mitarbeiter (fixiert) zu markieren, damit man nicht in der Zeile verrutscht.
Ich habe das mit "Colorindex" umgesetzt. Da es sich um mehrere Tabellenblätter handelt, auf denen dieselbe Funktion greifen soll, müsste ich wohl das Script an jedes Tabellenblatt anpassen - nur wie...?
Hier der verwendete Code (Auf dem ersten Tabellenblatt funktioniert es tadellos ab Nr. 2 nicht mehr).
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("8:40")) Is Nothing Then
Rows("8:40").Interior.ColorIndex = 0
Range("E" & Target.Row & ":F" & Target.Row).Interior.ColorIndex = 8
End If
End Sub
Wie bringe ich das Ganze dazu, auf verschiedenen Tabellenblättern das gleiche zu tun? Per Modul geht nicht, da auf einem Tabellenblatt die einzufärbenden Zellen an jeweils anderen Positionen sitzen. Also müsste ich schon den Code definiert für den jeweiligen Namen des Tabellenblattes anpassen - weiß nur nicht, wieSchon mal ganz lieben Dank für Eure Unterstützung!
Boory