Hi liebe Leser,
Excel war für mich immer nur eine kleine "Hilfe" für einfache Berechnungen, und kleine Formulare um nicht alles mit der Hand auszurechnen und manuell einzutragen. Mehr habe ich nie gemacht.
Nun erstelle ich eine Tabelle, bei der jedes Registerblatt ein Tag darstellt. Registerblatt 1 ist ein "Willkommensbildschirm",
Registerblatt 2-32 "Tag 1-31", dann noch eine weiteres Blatt für eine Endberechnung. Hier gibt es auch keine Fragen.
Da aber nicht jeden Tag ein Eintrag erfolgt, habe ich mir eingebildet, bei z.B. bei einem Eintrag in Register 11 (für Tag 11) sich die Registerfarbe auf Rot ändert. Also sobald die Zeit auf >1 Minute bei Zelle E30 ist.
Somit sieht man am Monatsende z.B. das die Register 11,23 und 25 und 31 rot eingefärbt - und damit dort Einträge vorhanden sind.
Soweit meine Idee.
Nun sitzte ich geschlagene 2 Tage am
Internet und
suche eine Möglichkeit einen Code einzufügen.
Diesen hier habe ich z.B. im Netz gefunden:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target = 3 And Target.Address = "$E$30" Then ActiveSheet.Tab.ColorIndex = 3
End Sub
Soweit so gut. ABER:
WO füge ich den ein? 100 Einträge im Netz - 100 verschiedene Beschreibungen.
Das was dem wohl am nächsten kommt, ist ALT-F11 zu drücken.
Ja und dann?
Mit Doppelklick auf das Tabellenblatt erscheint dann ein leerer Kasten. Habs da halt mal reinkopiert. Aber lässt sich nicht speichern, da er meint, es fehlt ein Makro ... ähm .. ja ... das hatte ich ja gerade eingefügt.
Ich weiss ja noch nicht mal, ob obiger Code auch Korrekt ist, aber ich kann ihn auch nicht mal testen, da ich nicht mal weiss, wo der hingehört!
Und kann man das - wenn ich mal davon ausgehe, das ich mit ALT-F11 richtig liege - das auch den Registern 2-32 zuordnen? Oder muss ich das dann für jedes Registerblatt einzeln einfügen?
Die Ausgabezelle E33, die abgefragt werden soll, ist bei allen gleich! (>1 Minute).
So, nun sind die Spezialisten gefragt, denn ich bin am Ende!
Liebe Grüsse:
Tammy