Bonsoir

J'ai installé « Microsoft Date and Time Picker Control » dans mon Excel 2007 et ceci fonctionne très bien.

Seulement je n'arrive pas à faire venir la date choisie dans cellule de mon choix.

Exemple : j'ai une série de ligne comprenant divers paramètres et je souhaite, en début de chaque ligne, faire apparaître une date sélectionnée.

Donc je choisi ma date dans le calendrier et je voudrai que cette date apparaisse dans la cellule où j'étais lorsque j'ai fait mon choix.

En clair il faudrait que le calendrier s'affiche sur toutes mes cellules "date" de chaque ligne.

Est-ce possible ?

Je vous remercie par avance.

Salut, je connais quelqu'un dans le vaucluse qui adore le billard, mais ça fait un peu loin !

dlxpat a écrit :

Salut, je connais quelqu'un dans le vaucluse qui adore le billard, mais ça fait un peu loin !

J'aurais aimé une réponse plus pertinente mais tant pis.

Bonjour

Copier ceci dans le module de la feuille

Private Sub DTPicker1_Change() 'ne copie la date que lorsque qu'il y a un changement de date, nécessite le changement de date
ActiveCell.Value = DTPicker1
End Sub

ou bien ceci

Private Sub DTPicker1_Click() 'copie la date lors d'un clic sur le calendrier, ne nécessite pas le changement de date
ActiveCell.Value = DTPicker1
End Sub

Remplacez le N° à la fin de "DTPicker1" par celui attribué à votre "DTPicker"

Cdlt

LORENZO83 a écrit :

Bonjour

Copier ceci dans le module de la feuille

Private Sub DTPicker1_Change() 'ne copie la date que lorsque qu'il y a un changement de date, nécessite le changement de date
ActiveCell.Value = DTPicker1
End Sub

ou bien ceci

Private Sub DTPicker1_Click() 'copie la date lors d'un clic sur le calendrier, ne nécessite pas le changement de date
ActiveCell.Value = DTPicker1
End Sub

Remplacez le N° à la fin de "DTPicker1" par celui attribué à votre "DTPicker"

Cdlt

Salutations !

Je joins une feuille EXCEL pour plus de compréhension de ma demande.

Mais je me rends compte que je ne sais pas faire.

Ou est la feuille?

LORENZO83 a écrit :

Ou est la feuille?

JE t'ai dit en fin de post que je ne savais pas faire (envoyer autre chose qu'une image) !

Voilà ! Je pense que c'est cela.

Le problème est qu'il te faut avoir le calendrier pour tester !

http://www.cjoint.com/c/FGmnCPPvojn

Essayez ceci

http://www.cjoint.com/c/FGmn14Y1alk

Cdlt

Super !

Pour être parfait il faudrait que l'appel au calendrier se fasse à chaque positionnement sur une des cellule de la colonne B !

Mais déjà merci.

Voilà, à condition que les lignes aient toujours la même hauteur soit 24,25, sinon à adapter

http://www.cjoint.com/c/FGmosQvMgck

petit correctif

a remplacer le code de Private Sub Worksheet_SelectionChange par celui-ci

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column = 2 And ActiveCell.Row > 3 Then
Lig = ActiveCell.Row
Hlig = ActiveCell.RowHeight
ActiveSheet.Shapes("DTPicker21").Select
Selection.ShapeRange.Top = (Lig * Hlig) - Hlig
End If
End Sub

Bravo !

Encore une chose comme je vois que tu manies Excel super bien et après je te laisse tranquille !

Est-il possible que l'ascenseur à droite de la cellule ne s'affiche que lorsqu'on positionne le curseur dessus à l'instar de la zone d'une liste de choix par exemple ?

Bonjour

Est-il possible que l'ascenseur à droite de la cellule ne s'affiche que lorsqu'on positionne le curseur dessus à l'instar de la zone d'une liste de choix par exemple ?

Là, je crois que j'ai manqué quelque chose, ou du moins, je n'ai pas tout compris. De quelle cellule s'agit-il? De quel ascenseur?

Si vous pouviez être plus explicite, ou fournir le fichier avec des commentaires sur ce que vous désiré.

Mais, quelque chose me dit que ce que vous demandez ne me paraît pas réalisable, enfin, je verrai en fonction de votre réponse.
cdlt

Bonjour

Je n'ai pas d'Excel à montrer comme exemple mais prenons le cas du calendrier Google.

La zone date ne propose pas de date tant que le curseur n'est pas dessus.

Dès que le curseur se positionne sur cette zone, le calendrier apparaît !

Peut être n'est-ce pas possible sans développer en VBA !

Bonjour

C'est ce que je craignais, je ne sais pas faire ce que vous demandez "la détection du pointeur de la souris sur une cellule", la détection ne peut se faire que sur un objet (image, graphique ..).

Je peux tout de même vous proposer une petite bidouille, ça ne correspond pas à ce que vous demandez mais ça peut vous intéresser.

J'ai dessiné une image en forme de rectangle à gauche de la colonne des dates, lorsque l'on promène la souris dessus, le calendrier suit automatiquement, il n'y a plus qu'à cliquer dans la cellule des dates pour ouvrir le calendrier.

http://www.cjoint.com/c/FGoe6AvM8yw

Cdlt

Bonjour

C'est très bien comme cela. Je peux utiliser le calendrier comme je le souhaitais.

Je te remercie de tout le temps passé à m'aider.

Bonne journée.