insertion date

Roland_M

XLDnaute Barbatruc

• 22 Décembre 2015

• #2

Re : insertion date

bonsoir

voir ton classeur avec mon calendrier sur cellule !
si tu veux plus de précisions, ou imposer une saisie dans un champ précis, tu reviens ou tu vas voir le code dans thisworkbook

EDIT: j'ai fais en sorte que la saisie se limite à la colonne A et D !

 

Pièces jointes

• insertion date.xlsm

  45.8 KB · Affichages: 31

Dernière édition: 22 Décembre 2015

Vote positif 0 Vote négatif

grisan29

XLDnaute Accro

• 22 Décembre 2015

• #3

Re : insertion date

bonsoir Rolland_M
j'ai regarder comment tu as mis ton calendrier qui est parfait, mais le double clic dans n'imprte qu'elle cellule le déclenche et ce n'est peu pas ce que cherches Roll

pascal

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

• 22 Décembre 2015

• #4

Re : insertion date

Bonsoir.

Dans le module de Feuil1 :

VB:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("a6:a31,d6:d31")) Is Nothing And Target.Count = 1 Then
Target.Value = Date
End If
End Sub

Enregistrez sous XLSM, et acceptez les macros.

Alternative sans macro :
Positionnez-vous sur la cellule concernée et appuyez sur "Ctrl" + ";"

 

Vote positif 0 Vote négatif

R

Roll

XLDnaute Occasionnel

• 23 Décembre 2015

• #5

Re : insertion date

Bonjour Roland_M,
la macro fonctionne parfaitement bien.

Merci beaucoup

 

Vote positif 0 Vote négatif