Forum des développeurs  

Le forum de référence en programmation et développement. Articles, cours et tutoriels du débutant au chef de projet et DBA confirmé.
Précédent   Forum des développeurs > Hardware, Systèmes et Logiciels > Microsoft Office > Excel

Excel Forum d'entraide sur Excel

Réponse
 
Outils de la discussion
Vieux 03/10/2008, 10h44   #1 (permalink)
Membre du Club
 
Date d'inscription: octobre 2007
Messages: 97
Par défaut [E-00] Calendrier quand clique dans une cellule excel 2000

Bonjour,

j'ai bien regardé tout ce qu'il y a sur le sujet et surtout la faq http://www.developpez.net/forums/d44...de-calendrier/
mais je ne comprend pas comment faire...

J'ai une feuille excel et je veux que lorsque je clique sur la cellule D14 un calendrier s'affiche, que je sélectionne une date et que la cellule D14 prenne alors cette date en compte.

J'ai cru comprendre qu'il fallait passé par une maccro, je met les morceaux de code que j'ai trouvé mais ça ne fonctionne pas...

Je pense que ce sont les 1eres étapes qui me manque...

"1 - Dans la faq ils disent :Ajouter sur la feuille contrôle Calendrier que vous trouverez dans les contrôles complémentaires de la boite à outils VBA, et le positionner en bas a droite du coin de la cellule E11

2 - Dans les propriétés du calendrier, mettre visible à false"

mais je ne comprend pas ce que cela signifie...

quelqu'un peut-il venir à mon secours...

Merci,

Lilou
afssaLERH est déconnecté   Envoyer un message privé Réponse avec citation
Vieux 03/10/2008, 11h15   #2 (permalink)
Membre Expert
 
Avatar de jacques_jean
 
Date d'inscription: janvier 2006
Localisation: St Cyr s/mer (83)
Âge: 64
Messages: 1 263
Par défaut

Bonjour,

Vous cliquez sur Affichage puis Barre d'outils puis Visual Basic.

Vous cliquez sur l'icône Boite à outils contrôles puis dans la barre d'outils qui s'affiche vous cliquez sur Autres contrôles vous double-cliquez sur Controle calendrier 9.0 (selon votre version vous trouverez peut-être autre chose que 9.0).

Le calendrier s'affiche.

Vous appuyez sur Alt et F11. La fenêtre VBA s'affiche.

Vous double-cliquez sur Feuil1 (ou le nom de votre feuille) et dans la fenêtre de droite vous collez ce code :

Code :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
If Target.Address = "$E$11" Then
    Me.Calendar1.Visible = True
Else
    Me.Calendar1.Visible = False
End If
 
End Sub



Code :
Private Sub Calendar1_Click()
    Range("E11").Value = Me.Calendar1.Value
End Sub
__________________
N'oubliez pas de cliquer sur quand vous avez obtenu la réponse à votre question.
jacques_jean est déconnecté   Envoyer un message privé Réponse avec citation
Vieux 03/10/2008, 12h02   #3 (permalink)
Membre du Club
 
Date d'inscription: octobre 2007
Messages: 97
Par défaut

D'accord merci j'ai réussi... si je veux ensuite faire apparaitre ce calendrier pour deux cellules (mais qui au final ne récupère pas forcement la même date), est-ce que je dois créer deux calendriers séparés et dupliquer le code?
afssaLERH est déconnecté   Envoyer un message privé Réponse avec citation
Vieux 03/10/2008, 12h06   #4 (permalink)
Membre du Club
 
Date d'inscription: octobre 2007
Messages: 97
Par défaut

C'est bon j'ai réussi merci beaucoup pour cette réponse rapide qui m'a bien éclairée...
afssaLERH est déconnecté   Envoyer un message privé Réponse avec citation
Réponse

Précédent   Forum des développeurs > Hardware, Systèmes et Logiciels > Microsoft Office > Excel

 
Offres d' emploi informatique sur Lesjeudis.com


Outils de la discussion

Règles de messages
Vous ne pouvez pas créer de nouvelles discussions
Vous ne pouvez pas envoyer des réponses
Vous ne pouvez pas envoyer des pièces jointes
Vous ne pouvez pas modifier vos messages

Les balises BB sont activées : oui
Les smileys sont activés : oui
La balise [IMG] est activée : oui
Le code HTML peut être employé : non
Trackbacks are non
Pingbacks are non
Refbacks are non
Navigation rapide