XL 2019 programme temporisation

valouf

XLDnaute Junior
bonjour debutant sur vba j'aimerais realiser ce programme merci d'avance
 

Pièces jointes

  • temporisation multiples.xlsm
    58.3 KB · Affichages: 20

danielco

XLDnaute Accro
Désolé. Pour tester plus rapidement, j'ai testé en décrémentant le compteur toutes les secondes. Pour les minutes, la macro est :

VB:
Sub DecompteMN()
  With Sheets("travail")
    If IsNumeric(.[B9]) Then
      If .[B9] > 0 Then
        .[E4] = .[B9]
        Do While .[E4] > 0
          Application.Wait Now + TimeValue("0:1:0")
          .[E4] = .[E4] - 1
        Loop
      End If
    End If
  End With
End Sub

Daniel
 

Discussions similaires

Réponses
8
Affichages
363
Réponses
3
Affichages
755

Statistiques des forums

Discussions
315 123
Messages
2 116 457
Membres
112 752
dernier inscrit
PUARAI29