Heure automatique

Résolu/Fermé

Marlj Messages postés 58 Date d'inscription mercredi 29 juin 2011 Statut Membre Dernière intervention 12 mars 2020 - 15 avril 2015 à 15:59
Marlj Messages postés 58 Date d'inscription mercredi 29 juin 2011 Statut Membre Dernière intervention 12 mars 2020 - 15 avril 2015 à 19:32

Bonjour,
Comme je ne suis pas expert dans les VBA, j'ai une question. J'ai un fichier Excel pour calculer le temps de fabrication d'un produit. J'ai une heure de début en A1 disons, et quand la personne termine un premier produit, elle se place dans la cellule (disons A2) elle appui sur un bouton qui met l'heure de fin, puis ainsi de suite. J'ai trouvé la macro dans un forum pour faire cela qui est celle-ci :

Sub date_heure()
With ActiveCell
.Value = Now
.NumberFormat = "hh:mm"
.Value = .Value
End With
End Sub

Ça fonctionne, et je peux l'utiliser tel quel, cependant, même si j'ai mis le format hh:mm, dans la barre de formule ça inscrit la date (15-04-2015 09:52:57). J'ai essayé de mettre "Sub heure()", mais ça ne fonctionne pas. Est-ce qu'il y a une autre façon de l'inscrire ou si je n'ai pas le choix que ça inscrive la date?

Merci beaucoup.

A voir également:

2 réponses

Réponse 1 / 2

f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 708
15 avril 2015 à 16:04

Bonjour,

pour mettre l'heure courante dans une cellule: touche ctrl+:

Réponse 2 / 2

Mike-31 Messages postés 18318 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 26 avril 2024 5 082
15 avril 2015 à 18:50

Bonsoir,

Commence par formater la plage destinée à recevoir les heures, exemple colonne A dans le format souhaité et simplement cette ligne
Sub Saisir_heure()
ActiveCell = Time()
End Sub

ou traiter le format dans le code
Sub Saisir_heure()
With ActiveCell
.Value = Time()
.NumberFormat = "hh:mm"
End With
End Sub
-
A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.

Marlj Messages postés 58 Date d'inscription mercredi 29 juin 2011 Statut Membre Dernière intervention 12 mars 2020 21
15 avril 2015 à 19:32

Ça marche extra. Merci beaucoup.

Discussions similaires

Je tiens combien de temps avec 2Go d'internet ?

2 go d'internet sa représente quoi

Utilisateur anonyme - 30 oct. 2012 à 15:31
Utilisateur anonyme - 29 mai 2013 à 13:05

Quel est l'équivalent 40 GO d'internet en heures ?

30 Go combien de temp d’internet

Colissimo

Discussions similaires

Newsletters