je voudrais créer une macro qui me donne bouton 1
la date et l'heure du debut ( date dans la cellule a10 et l'heure dans la cellule b10) bouton 2
la date et l'heure de fin ( date dans la cellule c10 et l'heure dans la cellule d10)
puis si j'ai un nouveau clic sur le bouton 1 je copie les données dans la cellule a11...
Sub debut_d()
Dim a20 As Long
Range("b5") = Time
Range("a5:b5").Copy
Range("a8").Offset(a20, 0).PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Application.CutCopyMode = False
End Sub
En l'état, remarquez que Offset(a20, 0) ne sert à rien puisque la variable a20 est nulle.
À part ça, quel rapport y-a-t-il entre ce code et votre demande initiale à propos de deux boutons censés indiquer l'heure de début et de fin (de quoi ?).
J'avoue que je ne comprends pas tout...
on est pas là pour se faire la gueule mais on est pas là non plus pour rigoler ou inversement, en tout cas on a pas de temps à perdre alors si tu nous exposais clairement ton problème avec un fichier exemple des explications parce que là c'est le flou total, au début on parle de recuperation, de temps, de deux boutons et maintenant de copie non conforme bref tout le monde est paumé!!!!
On veut bien t'aider mais il faut y mettre du tien!
roger il voulait peut-être dire
Code:
Range("a8").Offset(20, 0).PasteSpecial
, mais je suis comme toi je n'ai ni ma canne ni mon labrador