Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Control calendar

Control calendar

22 réponses
Avatar
Jacques
Salut a toutes et tous

Je suis sous Excel 2000, et j'utilise le control calendar 9.0, mais
existe-t'il, un moyen de l'avoir en francais?

Merci, d'avance, ouille
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2 3
Avatar
LeSteph
Bonsoir Jacques,
Tant mieux et on s'en réjouit et je crois Clément Marcotte
te l'indiquais à 17h20 (heure d'ici)...vos posts ont dû se croiser..
enfin tout est bien..
à bientôt..
"Jacques" a écrit dans le message de news:
415ecffd$0$9484$
Isabelle, LeSteph, Alain Vallon, Frédéric Sigonneau, le forum

Merci, pour votre aide, j'ai récupérer : "mscal.ocx" sur mon CDrom, et je
l'ai remis dans a l'endroit ou se trouver l'ancien.

Il y avait deux fois ce fichier dans :

C:WINDOWSSYSTEM
et
C:Program FilesMicrosoft OfficeOffice

es-ce normal?

Merci, trés beaucoup, Ouille

"Frédéric Sigonneau" a écrit dans le message
de
news:
Bonjour,

sinon au cas où cela ne soit pas voulu .../code est entièrement
accessible


sans passer par ta page (index of)...


Ce n'est pas voulu, mais ce n'est pas bien grave : il n'y a (presque) pas
de

fichiers cachés/secrets sur mon site. L'essentiel, de mon point de vue,
est de

mettre à disposition du code utile, quelle que soit la façon dont les
visiteurs

le récupèrent. Mais je te remercie de ton attention (dans les deux sens
du
terme).

Cordialement

FS
---
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://frederic.sigonneau.free.fr
Si votre question sur Excel est urgente, évitez ma bal !

Bonjour,
j'avais celui de wanadoo avant que tu ne migres pour free
et il fonctionne effectivement très bien . Quand j'ai vu pour le lien
mort


je l'ai adressé à Jacques sur sa bal mais visiblement il ne l'a pas
reçu
et


je pensai te le signaler mais n'y songeais plus ce matin...désolé...
sinon au cas où cela ne soit pas voulu .../code est entièrement
accessible


sans passer par ta page (index of)...

Bonne journée et merci pour tout ce que tu mets à notre disposition
c'est formidable et on ne le dira jamais assez merci.

lSteph

"Frédéric Sigonneau" a écrit dans le
message de


news:

Bonjour,

Au cas où, je viens de constater que le lien de téléchargement de ce
fichier (CalFr2.zip) était rompu. De nouveau disponible, et
fonctionnant
correctement chez moi :

http://frederic.sigonneau.free.fr/code/Calendriers/CalFr2.zip

FS
---
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://frederic.sigonneau.free.fr
Si votre question sur Excel est urgente, évitez ma bal !


LeSteph

Oui, avec le controlCalendar cela se passe comme cela, mais c'était
pour




l'avoir en francais, j'utiliser le calendrier sur le site de Frédéric
Sigonneau. Et c'est avec celui-la que j'ai un ti souci.

Tu m'avais parler de la version .11, est elle en français et
fonctionnerai
elle sous Excel 2000 ?

Merci, ouille

"LeSteph" a écrit dans le message de
news:euF65X$


Bonsoir,
Excuses mais comprends rien de ce que tu veux faire
normalement j'utilise en cliquant sur le jour voulu
dans le calendrier , ddans mon UF je mets juste calendar1 et 1 bouton
et pour dater la cellule active par exemple ceci suffit:
'******
'dans module:
Sub affcalendar()
UserForm1.Show

End Sub
'*******
'dans code userform1:

Private Sub CommandButton1_Click()

ActiveCell = Format(Calendar1, "dd/mmm/yyyy")
userform1.hide
End Sub
'***
Private Sub UserForm_initialize()
'initialise avec date du jour mais on peut changer
Calendar1 = Format(Now, "dd/mm/yyyy")
End Sub
'******
"Jacques" a écrit dans le message de
news:
415dae2c$0$22553$


Isabelle, le forum

Non, en faite une fois que j'ai choisi le jours, je fais Ok, et cela
me






met
systématiquement la date du jour dans le TextBox et si je veux faire



dans


l'UserForm concerné par la date, une autre chix (Sortire, par
exemple,







je


suis obligé d'appyer deux fois sur le bouton.

Merci, ouille
"isabelle" a écrit dans le message de
news:


bonjour Jacques,



ne s'inizialise pas correctement


est ce que cela veut tu dire se remettre à la date d'aujourd'hui ?

isabelle



Isabelle, le forum

Merci, je l'avais bien vu, mais n'avait pas fait le rapprochement
du








Nom



de


la cellule "Résultat".

Alors voilà ce que j'ai modigié dans la fonction :

'EXEMPLE
Sub Exemple()
Dim UnJour As Date
UnJour = FormCal.Calendrier
If UnJour <> 0 Then
USF_FicheDeRenseignements.txtDateDeLaPrestation.Value >> >>>>>
Format(UnJour,




"dddd dd mmmm yyyy")
Else
USF_FicheDeRenseignements.txtDateDeLaPrestation.Value = ""
End If
End Sub

Et dans le bouton du Calendrier :

Private Sub OK_Click()
Unload Me
USF_FicheDeRenseignements.Show 0
End Sub

et voici ce que j'ai mis dans le TextBox de l'UserForm concerné
par





ce


Calendrier :

Private Sub txtDateDeLaPrestation_DblClick(ByVal Cancel As
MSForms.ReturnBoolean)
'Calendar1.Visible = True
Me.Hide
Exemple
End Sub

Mais le soucie est que je ne peu avoirs que la date du jours, je
ne





peu


rien


mettre d'autre.

Et l'UserForm d'appel, ne s'inizialise pas correctement, je suis





obligé


d'appuiyer deux fois pour faire n'importe quelle action.

Merci de votre et grosses bises Isabelle, Ouille
"isabelle" a écrit dans le message
de
news:


bonjour Jacques,

ouvre visual basic sur le module "Documentation" et regarde le
code









de




la


macro "exemple"


isabelle



Salut LeSteph, Clément MARGOTTE, le forum,

Je viens de regarder le calendrier en question, et question.
Comment faire pour l'utiliser comme le controle calendar, car je



n'arrice


même pas a voir comment cela envoie la valeur dans la cellule,





y'aurait


il


quelquechose de cacher quelque part,lol?

Je regarde encore plus en détail.

Merci, Ouille
"Clément Marcotte" a écrit dans







le


message


de news:%


Bonjour,



c'est qui FS?


Frédéric Sigonneau



et pour le fr chez FS


En fait, ce ne serait pas le modèle de MS mais un modèle maison

http://frederic.sigonneau.free.fr

































Avatar
Jacques
Re a toutes et tous

En faite c'est en suivant son conseil que tout est rentré dans l'ordre.

Bye, Ouille
"LeSteph" a écrit dans le message de
news:
Bonsoir Jacques,
Tant mieux et on s'en réjouit et je crois Clément Marcotte
te l'indiquais à 17h20 (heure d'ici)...vos posts ont dû se croiser..
enfin tout est bien..
à bientôt..
"Jacques" a écrit dans le message de news:
415ecffd$0$9484$
Isabelle, LeSteph, Alain Vallon, Frédéric Sigonneau, le forum

Merci, pour votre aide, j'ai récupérer : "mscal.ocx" sur mon CDrom, et
je


l'ai remis dans a l'endroit ou se trouver l'ancien.

Il y avait deux fois ce fichier dans :

C:WINDOWSSYSTEM
et
C:Program FilesMicrosoft OfficeOffice

es-ce normal?

Merci, trés beaucoup, Ouille

"Frédéric Sigonneau" a écrit dans le
message


de
news:
Bonjour,

sinon au cas où cela ne soit pas voulu .../code est entièrement
accessible


sans passer par ta page (index of)...


Ce n'est pas voulu, mais ce n'est pas bien grave : il n'y a (presque)
pas



de
fichiers cachés/secrets sur mon site. L'essentiel, de mon point de vue,
est de

mettre à disposition du code utile, quelle que soit la façon dont les
visiteurs

le récupèrent. Mais je te remercie de ton attention (dans les deux sens
du
terme).

Cordialement

FS
---
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://frederic.sigonneau.free.fr
Si votre question sur Excel est urgente, évitez ma bal !

Bonjour,
j'avais celui de wanadoo avant que tu ne migres pour free
et il fonctionne effectivement très bien . Quand j'ai vu pour le lien
mort


je l'ai adressé à Jacques sur sa bal mais visiblement il ne l'a pas
reçu
et


je pensai te le signaler mais n'y songeais plus ce matin...désolé...
sinon au cas où cela ne soit pas voulu .../code est entièrement
accessible


sans passer par ta page (index of)...

Bonne journée et merci pour tout ce que tu mets à notre disposition
c'est formidable et on ne le dira jamais assez merci.

lSteph

"Frédéric Sigonneau" a écrit dans le
message de


news:

Bonjour,

Au cas où, je viens de constater que le lien de téléchargement de ce
fichier (CalFr2.zip) était rompu. De nouveau disponible, et
fonctionnant
correctement chez moi :

http://frederic.sigonneau.free.fr/code/Calendriers/CalFr2.zip

FS
---
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://frederic.sigonneau.free.fr
Si votre question sur Excel est urgente, évitez ma bal !


LeSteph

Oui, avec le controlCalendar cela se passe comme cela, mais c'était
pour




l'avoir en francais, j'utiliser le calendrier sur le site de
Frédéric






Sigonneau. Et c'est avec celui-la que j'ai un ti souci.

Tu m'avais parler de la version .11, est elle en français et
fonctionnerai
elle sous Excel 2000 ?

Merci, ouille

"LeSteph" a écrit dans le message de
news:euF65X$


Bonsoir,
Excuses mais comprends rien de ce que tu veux faire
normalement j'utilise en cliquant sur le jour voulu
dans le calendrier , ddans mon UF je mets juste calendar1 et 1
bouton







et pour dater la cellule active par exemple ceci suffit:
'******
'dans module:
Sub affcalendar()
UserForm1.Show

End Sub
'*******
'dans code userform1:

Private Sub CommandButton1_Click()

ActiveCell = Format(Calendar1, "dd/mmm/yyyy")
userform1.hide
End Sub
'***
Private Sub UserForm_initialize()
'initialise avec date du jour mais on peut changer
Calendar1 = Format(Now, "dd/mm/yyyy")
End Sub
'******
"Jacques" a écrit dans le message de
news:
415dae2c$0$22553$


Isabelle, le forum

Non, en faite une fois que j'ai choisi le jours, je fais Ok, et
cela








me
met
systématiquement la date du jour dans le TextBox et si je veux
faire









dans


l'UserForm concerné par la date, une autre chix (Sortire, par
exemple,







je


suis obligé d'appyer deux fois sur le bouton.

Merci, ouille
"isabelle" a écrit dans le message
de








news:


bonjour Jacques,



ne s'inizialise pas correctement


est ce que cela veut tu dire se remettre à la date d'aujourd'hui
?










isabelle



Isabelle, le forum

Merci, je l'avais bien vu, mais n'avait pas fait le
rapprochement










du
Nom



de


la cellule "Résultat".

Alors voilà ce que j'ai modigié dans la fonction :

'EXEMPLE
Sub Exemple()
Dim UnJour As Date
UnJour = FormCal.Calendrier
If UnJour <> 0 Then
USF_FicheDeRenseignements.txtDateDeLaPrestation.Value > >> >>>>>
Format(UnJour,




"dddd dd mmmm yyyy")
Else
USF_FicheDeRenseignements.txtDateDeLaPrestation.Value = ""
End If
End Sub

Et dans le bouton du Calendrier :

Private Sub OK_Click()
Unload Me
USF_FicheDeRenseignements.Show 0
End Sub

et voici ce que j'ai mis dans le TextBox de l'UserForm concerné
par





ce


Calendrier :

Private Sub txtDateDeLaPrestation_DblClick(ByVal Cancel As
MSForms.ReturnBoolean)
'Calendar1.Visible = True
Me.Hide
Exemple
End Sub

Mais le soucie est que je ne peu avoirs que la date du jours, je
ne





peu


rien


mettre d'autre.

Et l'UserForm d'appel, ne s'inizialise pas correctement, je suis





obligé


d'appuiyer deux fois pour faire n'importe quelle action.

Merci de votre et grosses bises Isabelle, Ouille
"isabelle" a écrit dans le message
de
news:


bonjour Jacques,

ouvre visual basic sur le module "Documentation" et regarde le
code









de




la


macro "exemple"


isabelle



Salut LeSteph, Clément MARGOTTE, le forum,

Je viens de regarder le calendrier en question, et question.
Comment faire pour l'utiliser comme le controle calendar, car
je













n'arrice


même pas a voir comment cela envoie la valeur dans la cellule,





y'aurait


il


quelquechose de cacher quelque part,lol?

Je regarde encore plus en détail.

Merci, Ouille
"Clément Marcotte" a écrit
dans













le


message


de news:%


Bonjour,



c'est qui FS?


Frédéric Sigonneau



et pour le fr chez FS


En fait, ce ne serait pas le modèle de MS mais un modèle
maison














http://frederic.sigonneau.free.fr





































1 2 3