× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 Calendrier dans EXCEL 2007Sujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
1000cbr
  Posté le 11/07/2016 @ 19:00 
Aller en bas de la page 
Astucien

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.

Publicité
dlxpat
 Posté le 11/07/2016 à 20:19 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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

1000cbr
 Posté le 11/07/2016 à 20:41 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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.

LORENZO83
 Posté le 12/07/2016 à 12:53 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

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



Modifié par LORENZO83 le 12/07/2016 13:01
1000cbr
 Posté le 12/07/2016 à 13:36 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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.

LORENZO83
 Posté le 12/07/2016 à 14:23 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Ou est la feuille?

1000cbr
 Posté le 12/07/2016 à 14:57 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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) !

LORENZO83
 Posté le 12/07/2016 à 15:05 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
Pour déposer un fichier en pièce jointe aller "www.cjoint.com" -clic sur "parcourir" -sélectionnez le fichier à envoyer -clic sur "créer le lien Cjoint" (bouton en bas) -clic droit sur le lien proposé, et sélectionnez "copier l'adresse du lien" -Clic sur la 4ème icône ci-dessus (représente des 3 chaînons), et coller le lien proposé
1000cbr
 Posté le 12/07/2016 à 15:29 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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

Publicité
LORENZO83
 Posté le 12/07/2016 à 15:54 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
1000cbr
 Posté le 12/07/2016 à 16:05 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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.

LORENZO83
 Posté le 12/07/2016 à 16:20 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

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

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



Modifié par LORENZO83 le 12/07/2016 16:24
LORENZO83
 Posté le 12/07/2016 à 16:25 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

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

1000cbr
 Posté le 12/07/2016 à 17:32 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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 ?

LORENZO83
 Posté le 13/07/2016 à 10:28 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

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

1000cbr
 Posté le 13/07/2016 à 11:34 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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 !

LORENZO83
 Posté le 14/07/2016 à 07:06 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

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

Publicité
1000cbr
 Posté le 14/07/2016 à 11:23 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

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.

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
102,99 €Carte mémoire microSDXC UHS-I U3 SanDisk Extreme 400 Go (160 Mo/s) à 102,99 €
Valable jusqu'au 30 Mai

Amazon fait une promotion sur la carte mémoire microSDXC UHS-I U3 A2 SanDisk Extreme 400 Go qui passe à 102,99 € livrée gratuitement alors qu'on la trouve ailleurs autour de 140 €. Cette carte mémoire offre des vitesses jusqu'à 160 Mo/s et est idéale pour les téléphones, caméras et appareils photo HD/4K.


> Voir l'offre
63,99 €Coffret Blu-Ray Kaamelott : Les Six Livres - L'Intégrale de la série à 63,99 €
Valable jusqu'au 30 Mai

Fnac fait une promotion sur le coffret Blu-Ray Kaamelott : Les Six Livres - L'Intégrale de la série qui passe à 63,99 €. On le trouve ailleurs à partir de 100 €. Ce coffret réunit tous les épisodes de la série (416 épisodes), les bonus et les bêtisiers. 


> Voir l'offre
305,27 €TV 43 pouces Xiaomi Mi Smart TV 4S (UHD 4K, Triple Tuner, Android TV 9) à 305,27 € livrée
Valable jusqu'au 30 Mai

Amazon Allemagne fait une promotion sur la TV 43 pouces Xiaomi Mi Smart TV 4S qui passe à 286,33 € (avec la TVA ajustée). Comptez 18,94 € pour la livraison en France soit un total de 305,27 € livrée. Cette TV de 43 pouces (108 cm) dispose d'une dalle 4K UHD (3840x2160) à bords plats, d'un triple tuner HD pour DVB-S2, DVB-C et DVB-T2 avec HEVC. Le tout tourne sous Android TV 9.0 en français et vous aurez donc accès à Netflix, Amazon Prime Video, YouTube, etc. La TV possède 3 ports HDMI, 3 ports USB, un port Ethernet RJ45, le WiFi, une sortie optique et casque et un emplacement CI+. Une très bonne affaire.

Vous pouvez utiliser votre compte Amazon France sur Amazon Allemagne et il n'y a pas de douane. Si vous êtes perdu en allemand, vous pouvez traduire le site en anglais.


> Voir l'offre

Sujets relatifs
Taille des Onglets dans Excel 2007
Excel 2007 Copier/Coller d’une feuille à l’autre Dans un même classeur.
Récupération dates dans tableau excel 2007
Date en abscisse dans excel 2007
Excel 2007 extraction feuille 1 dans feuille 2 avec mise en forme
Formulaire dans Excel 2007
Windows xp copier fichier répertoire dans excel 2007
Probleme excel - tri dans macro Excel 2007
fichier Excel 2010 s'ouvre mal dans 2007
macro majuscule dans excel 2007
Plus de sujets relatifs à Calendrier dans EXCEL 2007
 > Tous les forums > Forum Bureautique