Axel Richter: Makro in Excel automatisch starten

Beitrag lesen

Hallo,

Ich habe ein Excel-Sheet, welches Ressourcen berechnet. Nun suche ich eine Möglichkeit, Zellen aufgrund deren Inhalte automatisch zu Färben.

Schau Dir mal "Format - Bedingte Formatierung..." näher an.

Mir schwebt das sowas in folgender Art vor, leider habe ich keinen Plan, wie das umgesetzt werden muss...

An der Zelle rufe ich mit einem Listener (onChange) ein Makro auf. Dieses Makro prüft, dann den Wert der Zelle und setzt entsprechend eine andere Hintergrundfarbe.

Das gibt es so nicht. Ereignisse werden für das Worksheet (Tabellenblatt) standardmäßig überwacht.

-Wie kann ich das Makro dazu bringen, dass es startet, wenn sich der Wert einer Zelle ändert?

Du könntest eine Sub

Private Sub Worksheet_Change(ByVal Target As Range)
  MsgBox (Target.Address)
End Sub

z.B. in Tabelle1 hinterlegen. Bei jeder Änderung in Tabelle1 hättest Du dann in Target die Zelle oder den markierten Bereich, der sich geändert hat, z.B. beim Ausfüllen.

-Was ist zu tun, damit das Makro den korrekten Wert der Zelle findet?

Private Sub Worksheet_Change(ByVal Target As Range)
  MsgBox (Target.Address)
  MsgBox (Target.Count)
  If Target.Count = 1 Then
   MsgBox (Target.Value)
  End If
End Sub

Ich sollte das für x-Zellen nutzen, wobei sich diese Zellen aufgrund von Einfügeoperationen verschieben können.

*g* Ja, usw. usw. ...

Schau Dir mal "Format - Bedingte Formatierung..." näher an.

viele Grüße

Axel