Microsoft 365 Comment faire pour double-cliquer d'une cellule et avoir l'heure actuelle arrondie au 15 minute pres sur excel

patrick965

XLDnaute Impliqué
bonjour forum
je cherche Comment faire pour que quand je double-cliquer dans la cellule D12 a D18 et F12 a F18 j'aimerais que l'heures actuel s'inscrive MAIS j'aimerais avoir l'heure actuelle arrondie au 15 minute pres .
exemple ;
les minutes entre 00 et 10 donne H:00
les minutes entre 11 et 21 donne H:15
les minutes entre 22 et 36 donne H:30
les minutes entre 37 et 52 donne :H:45
ceci est a titre d'exemple seulement je veux que les minute soie arrondie au 15 minute pres
jespere que vous comprener ce que je veux dire.
un grand merci pour votre aide
 

Pièces jointes

  • feulle de temps employer.xlsx
    20.7 KB · Affichages: 5

patrick965

XLDnaute Impliqué
je comprend
pouver vous juste mindiquée dans la derniere formule crée

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.CountLarge > 1 Then Exit Sub
If Target.Row - 11 <> Weekday(Date) Then Beep: Exit Sub
If Not Intersect(Me.[C13:C19], Target) Is Nothing Then
Target.Value = Date
ElseIf Not Intersect(Me.[D13:D19,F13:F19], Target) Is Nothing Then
Target.Value = Int(Time * 96 + 0.5) / 96
End If
End Sub

ca fonctionnais jusqu'a quelque minute cest comme si la formule pence que aujourdhui cest mercredi non jeudi
il est 1 journée en arriere depuis que j'ais ajouter une colonne dans le haut de mon fichier jais ensuite changer c12:c18 pour C13:C19 etc mais ca change pas avez vous une idée pkoi
 

Pièces jointes

  • feulle de temps employer 16h25.xlsm
    28.1 KB · Affichages: 2

patrick965

XLDnaute Impliqué
bonjour
derniere petite chose qui est tres simple pour vous
cest dans le meme sance que ce que vous avez déja crée comme formule .
j'aimerais que si dans l'une des cellule en H13 a H19 un sélection est fait.
je voudrais que le temps (heures travailler) inscrit dans la journée correspondent G13 a G19 ne soie pas comptabiliser dans FGH 7 mais dans la scellule GH 11.
et ca sera complet pour ce dossier
je vous fatigue plus par la suite promis
un ÉNORME MERCI pour votre précieuse aide
 

Pièces jointes

  • feulle de temps employer 16h25.xlsm
    28.1 KB · Affichages: 1

Dranreb

XLDnaute Barbatruc
Pour le 1er problème, j'ai l'impression que vous avez ajouté une ligne.
Vous savez dans If Target.Row - 11 <> Weekday(Date) Then Beep: Exit Sub, le 11 ce n'était pas un nombre au hasard: c'était le numéro de la ligne de titre. Alors si vous en avez ajouté une devant il faut maintenant mettre 12 !
Après pour le dernier point, cherchez un peu comment programmer ce qu'il vous faut quoi… Vous auriez dû apprendre de tout ce que j'ai proposé. Si vous n'apprenez jamais rien, je ne vous aiderai plus.
 

Statistiques des forums

Discussions
312 024
Messages
2 084 724
Membres
102 642
dernier inscrit
isa_mat