tælle en op kl 00.00

Er det korrekt, at du et Excel ark der heletiden er åbent og har en Macro der kører i baggrunden ?

Du kan lave det med Application.OnTime

Her er et eksempel.

_______________________________________________

' Indsæt det her i et modul

Public Sub DinMakro()
  Call DinTimer
  Ark1.Range("A1") = Ark1.Range("A1") + 1
End Sub

Public Sub Nulstil()
  Call DinTimer
  Ark1.Range("A1") = 0
End Sub

Public Sub DinTimer()
  Dim NyTid As Date
  NyTid = Date & " " & #12:00:00 AM#
 
  ' Du kan teste med lidt kortere interval med denne her
  ' NyTid = DateAdd("s", 5, Now)
 
  Application.OnTime NyTid, "DinMakro"
End Sub

____________________________________________________

' Og det her i ThisWorkbook

Private Sub Workbook_Open()
  If Ark1.Range("A1") = "" Then
    Ark1.Range("A1") = 0
  End If
  Call DinTimer
End Sub

____________________________________________________

Jeg spurgte om arkets tilstand da ovenstående metode kun virker hvis Excel arket er åbent.

Er det hvad du ønsker ?

hej igen
det skal indgå i en powerpoint  men jeg vil ro at arket kan holdes åbent hvis nødvendigt

PK

Du er vel i bund grund bare interesseret i, hvor mange dage siden der er trykket reset.

Det kunne gøres ved at trække dato for reset fra dags dato.

Hvorfor så ikke smide koden ind i PP. Der kan du også kode VBA og gemme værdierne ?

den sidste med at oprette direkte i pp lyder interessant  er det på samme facon som i excel ?
PK

var der nogle der vidste noget om VBA i powerpoint....
;-)

PK

test