Bonjour
Je veux créer une msgbox qui demande les heures d'un élément à la pose, afficher dans une cellule ses heures au format hhhh:mm et pouvoir faire des additions et soustractions de ses heures.
Je n'ai que des affichages au format date avec comme référence le 01/001/1900.
À l'aide !!!
l'extrait donne ceci ...
Merci pour votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Sub nouvelle_géné() Dim heure_cell_752 As Date 'Demande des heures cellule de l'appareil heure_cell_752 = InputBox(" A quelle heure cellule, la géné a été posée ?", "Titre") Sheets("760752").Range("E3").Value = heure_cell_752 End Sub
Partager