title image


Smiley Re: mit Autofilter gefilterte Spalte mit bedingter Formatierung färben
Hallo!



Der automatische Start müsste sich durch Auffangen des Calculate-Ereignisses realisieren lassen.

Siehe dazu

http://www.spotlight.de/zforen/amse/m/amse-1059586906-12162.html



Hier mal ein Lösungsansatz:



In Zelle A 15 folgende Formel:

=TEILERGEBNIS(3;A1:A9)



und in das Codefenster dieser Tabelle folgenden Code:



Dim rng_target As Range

Dim str_Old As String

Dim str_New



Private Sub Worksheet_Calculate()



Set rng_target = Range("a15")

str_New = rng_target

If str_New str_Old Then

MsgBox "Wert hat sich geändert"

Call AutoFilterungenMarkieren

str_Old = str_New

End If



End Sub



Die Msgbox kannst Du natürlich nach dem Ausprobieren weglassen.

Müsste so eigentlich klappen.



Viel Erfolg

Manes
Ob ich Spotlight gut finde? Also wenn ich ehrlich sein soll, müsste ich lügen!

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: