inserer calendrier dans plusieurs cellules

DoubleZero

XLDnaute Barbatruc

• 13 Décembre 2012

• #2

Re : inserer calendrier dans plusieurs cellules

Bonjour à toutes et à tous,

Bienvenue sur XLD, anta 🙂 !

Pourrions-nous disposer du fichier de travail, allégé et dépourvu de donnée confidentielle ?

A bientôt.

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 13 Décembre 2012

• #3

Re : inserer calendrier dans plusieurs cellules

Re-bonjour,

Une suggestion, par macro, dans le fichier joint.

A bientôt 🙂

 

Pièces jointes

• 00 - anta - Validation de données.xls

  74 KB · Affichages: 559

Vote positif 0 Vote négatif

A

anta

XLDnaute Nouveau

• 14 Décembre 2012

• #4

Re : inserer calendrier dans plusieurs cellules

Bjr DoubleZero, merci de votre reponse et de la proposition que vous m'avez fait mais c'est pas ce que je veux. Je voudrais que le calendrier s'affiche si je clique sur la cellule et me permet de choisir une date puis disparait. J'ai reussi à le faire sur une cellule (A5) de la colonne A par exemple mais si je veux avoir la meme chose sur la cellulle A6 j'y arrive pas. J'aimerai joindre le fichier pour vous montrer ce que je veux dire mais je n'y arrive pas. Comment faire pour joindre un fichier dans ce forum ?
Merci de votre aide

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 14 Décembre 2012

• #5

Re : inserer calendrier dans plusieurs cellules

Bonjour, anta, le Forum,

anta à dit:

... Comment faire pour joindre un fichier dans ce forum ?...

Cliquez pour agrandir...

En répondant au présent message, option "Aller en mode avancé", un clic sur l'image "Pièces jointes", puis "Ajouter un fichier depuis votre ordinateur" (cellule "Parcourir") et, enfin, un clic sur "Envoyer".

A bientôt 🙂

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 14 Décembre 2012

• #6

Re : inserer calendrier dans plusieurs cellules

salut

Si... j'ai bien compris avec le peu d'explications données (n'est-ce pas DoubleZéro 😉) : 2 activeX (Monthview et DTPicker) puis adapter avec Calendar si nécessaire. De même adapter l'évènement si besoin.

 

Pièces jointes

• Calendrier(doubleClic).xls

  38 KB · Affichages: 473

Vote positif 0 Vote négatif

A

anta

XLDnaute Nouveau

• 14 Décembre 2012

• #7

Re : inserer calendrier dans plusieurs cellules

merci à tous pour vos reponses. DoubleZero voici le fichier en question. Si..... quand je double clique dans une cellule de votre fichier, j'ai ce message qui s'affiche"Erreur d'execution "424"" . Merci de votre aide

 

Pièces jointes

• Calendrier 2.xls

  60.5 KB · Affichages: 370

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 14 Décembre 2012

• #8

Re : inserer calendrier dans plusieurs cellules

Re-bonjour, bonjour, Si... 🙂,

anta à dit:

... voici le fichier en question...

Cliquez pour agrandir...

Je ne comprends pas : à présent, il n'est plus question de dates obtenues, en colonne E, par validation de données 😕.

A bientôt 🙂

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 14 Décembre 2012

• #9

Re : inserer calendrier dans plusieurs cellules

re

peux pas répondre 😱 : je n'ai pas de Calendar !
A essayer :

Code:

Private Sub Worksheet_SelectionChange(ByVal R As Range)
  If R.Address = "$A$5" Then
    With Calendar1
      .Visible = True
      .Top = R.Top
      .Left = R.Left
    End With
  End If
End Sub

Private Sub Calendar1_Change()
  ActiveCell = Format(calendar1, "dd mm yyyy")
  Calendar1.Visible = False
End Sub

Maintenant, si cela doit se produire avec plusieurs feuilles, un UsF pourrait aider à réduire le nombre de macros.

 

Vote positif 0 Vote négatif