Veröffentlicht am

Wert Hintergrundfarbe ermitteln & Hintergrundfarben zählen

Function HFanzahl(Farbe, Bereich)
Anzahl = 0
For Each Zelle In Bereich
If Zelle.Interior.ColorIndex = Farbe Then
Anzahl = Anzahl + 1
End If
Next
HFanzahl = Anzahl
End Function
Function HFwert(r As Range) As Integer
HFwert = r.Interior.ColorIndex
End Function

Ermittlung zu zählende Hintergrundfarbe Formel in Zelle W3: 

=HFwert(W3)

Hintergrundfarbe aus Zelle W3 in bestimmtem Bereich zählen: 

=HFanzahl(W3;$A$1:$U$98)
Veröffentlicht am

Countdown-Timer

<!DOCTYPE HTML>
<html>
<head>
<meta name="viewport" content="width=device-width, initial-scale=1">
<style>
p {
  background-color:powderblue;
  text-align: center;
  font-size: 60px;
  margin-top: 0px;
  font-family: sans-serif;
}
</style>
</head>
<body>
<p id="demo"></p>
<script>
// Set the date we're counting down to
var countDownDate = new Date("Aug 1, 2027 13:40:00").getTime();
// Update the count down every 1 second
var x = setInterval(function() {
    // Get todays date and time
    var now = new Date().getTime();
    // Find the distance between now an the count down date
    var distance = countDownDate - now;
    // Time calculations for days, hours, minutes and seconds
    var days = Math.floor(distance / (1000 * 60 * 60 * 24));
    var hours = Math.floor((distance % (1000 * 60 * 60 * 24)) / (1000 * 60 * 60));
    var minutes = Math.floor((distance % (1000 * 60 * 60)) / (1000 * 60));
    var seconds = Math.floor((distance % (1000 * 60)) / 1000);
    // Output the result in an element with id="demo"
    document.getElementById("demo").innerHTML = days + "d " + hours + "h "
    + minutes + "m " + seconds + "s ";
    // If the count down is over, write some text
    if (distance < 0) {
        clearInterval(x);
        document.getElementById("demo").innerHTML = "EXPIRED";
    }
}, 1000);
</script>
</body>
</html>

Thanks to w3schools.com