> 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 participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
33,75 €Carte mémoire Samsung 256 Go MicroSDXC Evo Select U3 (100 Mo/s) à 33,75 € livrée
Valable jusqu'au 27 Janvier

Amazon Allemagne fait une promotion sur la toute nouvelle carte mémoire Samsung 256 Go MicroSDXC Evo Select U3 qui passe à 29,63 €. Comptez 4,52 € pour la livraison en France soit un total de 33,75 € livrée. Une bonne affaire pour cette carte que l'on trouve ailleurs à partir de 60 € et qui offre des vitesses de 100 Mo/s en lecture et 90 Mo/s en écriture.  Elle est idéale pour les téléphones, caméras et appareils photo 4K. Elle est étanche, anti-choc et résiste aux rayons X et aux champs magnétiques. Elle est garantie 10 ans.

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


> Voir l'offre
54,99 €Clavier Logitech G213 Prodigy RVB à 55,99 €
Valable jusqu'au 25 Janvier

Amazon fait une promotion sur le clavier Logitech G213 Prodigy RVB qui passe à 55,99 € livré gratuitement alors qu'on le trouve ailleurs à partir de 69 €. Ce clavier RVB à membranes est conçu aussi bien pour le jeu que pour l'activité professionnelle, résiste aux liquides, aux miettes et à la saleté pour un nettoyage aisé.


> Voir l'offre
12,54 €Micro clé USB 3.1 Sandisk Ultra Fit 64 Go à 12,54 €
Valable jusqu'au 25 Janvier

Amazon fait une promotion sur la micro clé USB Sandisk Ultra Fit d'une capacité de 64 Go qui passe à 12,54 €. La minuscule taille de cette clé USB va vous permettre de la laisser brancher en permanence sur votre portable, votre TV ou votre autoradio sans qu'elle dépasse de manière disgracieuse. Sa compatibilité USB 3.1 lui permet d'atteindre des débits jusqu'à 130 Mo/s. 


> 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