Calendrier dans une cellule

[RONIBO]

Bonsoir,

J'aurais aimé avoir un calendrier dans une cellule "G11" qui me permettra de sélectionner une date qui se mettra toujours dans "G11"

Par défaut j'aimerai qu'il me met la date du jour,

Merci à vous

Cordialement

Ronibo

 

[chris]

Re : Calendrier dans une cellule

Bonjour


Tu peux mettre la date du jour avec CTRL ; mais sinon il y a l'excellent calendrier de My Dear Friend mDF XLcalendar v3.2 - Utilitaires - mDF Applications - Téléchargements : myDearFriend! Excel Pages

 

[RONIBO]

Re : Calendrier dans une cellule

re,

Merci à toi de t'avoir pencher sr mon problème

Je connais ce calendrier, est il me semble que c'est un fichier que je dois ouvrir à part, je me trompe?

Si c'est le cas, j'aimerais avoir une autre solution 🙂

a+

 

[RONIBO]

Re : Calendrier dans une cellule

Voici s'que j'aimerais avoir

 

[Staple1600]

Re : Calendrier dans une cellule

Bonsoir à tous, salut chris 😉

Une fois n'est pas coutume, une tite pièce jointe dans un de mes posts. 😉
(suivez les instructions présentes dans le zip)

Puis copier/coller le code VBA ci-dessous dans ThisWorkbook

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address = "$G$11" Then
Call lusf
End If
End Sub

Et dans un module standard, le code ci-dessous:

Sub lusf()
UserForm1.Show
End Sub

 

[Staple1600]

Re : Calendrier dans une cellule

Re

RONIBO:
Si tu suis bien mes explications (voir message précédent et sa pièce jointe), voici ce que devrais avoir dans Excel 😉

 

[RONIBO]

Re : Calendrier dans une cellule

Bonsoir à tous, bonsoir Staple1600,

C'est exactement s'que je voulais 😉 Merccii

Deux question

1- Est ce que je peux changer la position de l'userform?

Je pense que oui. Je sais que c'est dans StartUpPosition, mais je voulais savoir si c'était possible de le positionner à un endroit précis?

2- Est ce que dans la cellule "G11" (au faite la cellule "G11" était fusionnée avec "H11" du coup j'ai modifié la macro en "$G$11:$H$11")
Je peux insérer la date du jour dans cette cellule automatiquement (sans rien toucher) et me servir du calendrier que si y' un changement de date ?

Merci encore

Bonne nuit à tout le forum 🙂

 

[Staple1600]

Re : Calendrier dans une cellule

Re


Pour mettre automtiquement la date en G11
A mettre dans ThisWorkBook

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
[G11] = Date
End Sub

A TESTER sur un classeur vierge sinon ... tous les G11 de ton classeur vont avoir chaud aux miches 😉

EDITION: Un petit plus avec cette variante

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Not IsDate([G11]) Then
[G11] = Date
End If
End Sub

 

[RONIBO]

Re : Calendrier dans une cellule

Re,

Merci pour les codes, mais il se passe rien lorsque je ferme et ré-ouvre mon fichier (la date reste la même, ne me met pas la date du jour automatiquement)

Pour la positionnement d'un userform, j'ai pu trouver un truck sur le forum qui me dépanne 😉

a+

 

[Staple1600]

Re : Calendrier dans une cellule

Re

J'avais bien précisé 😉

A TESTER sur un classeur vierge sinon ... tous les G11 de ton classeur vont avoir chaud aux miches

Testes uniquement un des deux codes sur un classeur vierge (sans aucun userform à l'intérieur)
Et va d'onglet en onglet et observe ce qui se passe en G11.

Ne crois-tu pas qu'il est désormais venu le temps (non pas des cathédrales 😉) mais celui de joindre un fichier exemple dans ta discussion ?
Histoire de t'aider plus efficacement...Inscrit depuis 2009, tu devrais savoir cela depuis lurette. 😉

 

[RONIBO]

Re : Calendrier dans une cellule

Re,

Je viens d'étreindre le pc lol,

Des demain je test tout ça, (promis je mets un fichier 😉 )
2009? Déjà ? Qu'est qui passe vite le temps 🙂

Bonne nuit a toi 🙂

 

[Staple1600]

Re : Calendrier dans une cellule

Re ______________________________________________________EDITION: Bises à chris

2009? Déjà ?

Bonne nuit à toi

 

[RONIBO]

Re : Calendrier dans une cellule

Bonjour le forum, bonjour Staple1600,

Je viens de réessayer sur un nouveau fichier, mais cela ne semble ne pas fonctionner.

Je te mets mon fichier exemple 😉

J'avais même pas fait gaffe que y'avait la date d'inscription à gauche, lol,

a+

 

[chris]

Re : Calendrier dans une cellule

Bonjour
Bise à Staple🙂

...
Je connais ce calendrier, est il me semble que c'est un fichier que je dois ouvrir à part, je me trompe?
...

C'est un complément : une fois installé il peut fonctionner sur tout fichier...

...Je peux insérer la date du jour dans cette cellule automatiquement (sans rien toucher) et me servir du calendrier que si y' un changement de date ?...

...Merci pour les codes, mais il se passe rien lorsque je ferme et ré-ouvre mon fichier (la date reste la même, ne me met pas la date du jour automatiquement)...

Tes deux demandes posent un problème : si tu a choisi une date dans 10 jours ("que si y' un changement de date") il faudrait qu'à l'ouverture elle soit écrasée par la date du jour ("la date reste la même, ne me met pas la date du jour automatiquement") ?

 

[RONIBO]

Re : Calendrier dans une cellule

re,
Bonjour Chris

ah bon! Et comment fait on pour l´installer?

au faite j´aimerais à chaque ouverture du fichier la date du jour se met automatiquement dans la cellule G11:H11
On peut pas détourner ça avec une macro?