Userform plein écran +calendrier microsoft

[ChuBaKa]

Bonjour,

J'ai découvert ce site tout récemment et je le trouve trés bien !
Ma première question est la suivante: est-il possible d'afficher une Userform en plein écran dans excell ?
La seconde: Dans Outlook il existe un calendrier automatique de microsoft pour choisir une date. est-il possible d'utiliser ce calendrier dans excel pour fixer la date d'une Textbox par exemple. actuellement je le fais en manuel (JJ/MM/AA) mais je pense que l'on doit pouvoir utiliser ce calendrier microsoft dans excel.

Par avance, merci

 

[Arnaud]

salut,

voila un exemple pour l'usf en plein écran.
sinon pour l'autre question je comprend pas trop ton problème

 

[ChuBakA]

Merci pour usf plein écran.
Concernant mon autre question, je vais éssayé d'être plus clair

Dans Outlook, dans le calendrier, si tu double clik pour ajouter un rendez vous, tu a les champs début et fin pour ton rendez vous.
Lorsque tu défini ces champs qui sont en fait des dates, tu click sur le menu déroulant et tu as le calendrier standard (deja tout pret) de windows qui apprait. tu choisi ta date dans ce caldendrier et automatiquement la case prend la veleur de la date selectionnée dans le calendrier.
Je voudrais faire la même chos dans Excel pour donner des valeur de date à des textbox par exemple.

Je sais pas si c'est plus clair, mais j'ai éssayé )

 

[jmps]

Bonjour Chubaka, Arnaud,

Je pense que Chubaka parle d'un contrôle supplémentaire de la Boîte à-Outils de VBA. Je crois que c'est quelque chose comme Microsoft calendar. Mais là je suis sur XL97 et je peux pas tester, il n'existe pas.

Alors Chubaka (Si tu as XL2000 ou plus), Tu vas dans dans VBA (Alt + F11), tu affiches ou crées un USF, click droit sur la boite à outils, tu cherches Microsoft calendar (ou approchant) et tu coches la case. Tu valides et normalement tu as ton contrôle qui va bien.

A+

José

 

[jmps]

Oups,

J'ai oublié après click droit, menu Contrôles supplémentaires...

José

 

[ChuBakA]

Alors là bravo jmps.

Tu viens de m'apprendre un truc là.


Merci pour ton aide

 

[Arnaud]

re,

si j'ai bien compris voici un ex

 

[jmps]

Oui Arnaud,
C'est bien ça mais je peux pas tester avec 97.
Il me dit objet non disponible sur cette machine :°(

A+

José

 

[jp]

salut avous,


encore une question sur control calendar!!!!

Il est disponible seulement si vous avez installé préalablement access!!!!
merci microsoft


Jp

 

[Arnaud]

re,

cela dois surement dépendre de la version de office car je n'est jamais installé access sur mon poste et je l'ai.

 

[ChuBaKa]

Arnaud,

Tu as parfaitement compris ce que je cherche à faire !
J'ai éssayé ton fichié. je suis sous Excel 2000.
Lorsque j'éxécute ta macro, j'ai le message suivant : "projet ou bibilotheque introuvable". l'élément MonthView1 est la cause de ce problème.

 

[Arnaud]

re,

tu trouvera le .ocx dont il a besoin ici :

http://sgithomas.free.fr/SGI%20THOMAS/Dowload/OCX/comdlg32.zip

a placer dans les répertoire system de windows.
si cela ne fonctionne pas, essaye de l'enregistrer comme ça:
va dans Démarer->exécuter et tappe:

regsvr32 "C:\WINDOWS\SYSTEM32\MSCOMCT2.OCX"

 

[jmps]

Re,

Je viens de voir ton code Arnaud. En fait c'est pas tout à fait comme ça.
La récupération de la date ne se fait pas comme ça :

Private Sub CommandButton2_Click()
TextBox1.Value = True
CommandButton1.Visible = True
CommandButton2.Visible = False
MonthView1.Visible = False
TextBox1.Value = MonthView1.Value
End Sub

C'est plutôt un truc du style :

Private Sub MonthView1_Click()
TextBox1.Value = MonthView1.QuelqueChose
End Sub

Je peux toujours pas tester, mais je regarderai chez moi ce soir. Et je reviens ici.

J'espère que j'aurai le temps. Je pars en ouacances demain à l'aube et faut que je prépare la ouature et tout le reste LOL !

A+ j'espère. Sinon bon week-end a tous.

José

 

[Arnaud]

arf non pas le bon .ocx essaye de le chercher sur le net. c MSCOMCT2.OCX.

 

[Arnaud]

re,

en tout cas jmps, l'aide est d'accord avec moi :
je cite : "La propriété Value du contrôle MonthView renvoie la date sélectionnée."
et en plus chez moi ça marche