Calendrier dans cellule
Résolu/Fermé
soah44
Messages postés
40
Date d'inscription
mardi 19 novembre 2013
Statut
Membre
Dernière intervention
8 avril 2016
-
27 déc. 2013 à 20:14
soah44 Messages postés 40 Date d'inscription mardi 19 novembre 2013 Statut Membre Dernière intervention 8 avril 2016 - 28 déc. 2013 à 20:23
soah44 Messages postés 40 Date d'inscription mardi 19 novembre 2013 Statut Membre Dernière intervention 8 avril 2016 - 28 déc. 2013 à 20:23
A voir également:
- Calendrier dans cellule
- Aller à la ligne dans une cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Afficher calendrier outlook dans google agenda - Guide
- Calendrier partagé google - Guide
- Verrouiller cellule excel - Guide
7 réponses
via55
Messages postés
14501
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
28 novembre 2024
2 735
28 déc. 2013 à 00:35
28 déc. 2013 à 00:35
Bonsoir Soah
Un exemple avec les explications
https://www.cjoint.com/?0LCaJrp9z4c
Cdlmnt
Un exemple avec les explications
https://www.cjoint.com/?0LCaJrp9z4c
Cdlmnt
Boisgontierjacques
Messages postés
175
Date d'inscription
jeudi 19 septembre 2013
Statut
Membre
Dernière intervention
26 décembre 2018
64
28 déc. 2013 à 10:51
28 déc. 2013 à 10:51
Bonjour,
Exemple
https://www.cjoint.com/c/CLCkZFWT6pK
Jacques Boisgontier
Exemple
https://www.cjoint.com/c/CLCkZFWT6pK
Jacques Boisgontier
soah44
Messages postés
40
Date d'inscription
mardi 19 novembre 2013
Statut
Membre
Dernière intervention
8 avril 2016
28 déc. 2013 à 19:19
28 déc. 2013 à 19:19
Bonsoir,
Oula!! j'ai n'ai pas réussi à faire fonctionner vos fichiers messieurs!! Je ne connais que les bases d'Excel et commence tout juste les macros..
Pourriez-vous m'expliuer vos démarches? Surtout que vous me présentez deux manières d'arriver à mon but!
Merci.
Oula!! j'ai n'ai pas réussi à faire fonctionner vos fichiers messieurs!! Je ne connais que les bases d'Excel et commence tout juste les macros..
Pourriez-vous m'expliuer vos démarches? Surtout que vous me présentez deux manières d'arriver à mon but!
Merci.
via55
Messages postés
14501
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
28 novembre 2024
2 735
28 déc. 2013 à 19:33
28 déc. 2013 à 19:33
Bonsoir,
Toutes les explications sont dans le fichier
Il faut accepter d'activer les macros pour que le calendrier fonctionne
Cdlmnt
Toutes les explications sont dans le fichier
Il faut accepter d'activer les macros pour que le calendrier fonctionne
Cdlmnt
soah44
Messages postés
40
Date d'inscription
mardi 19 novembre 2013
Statut
Membre
Dernière intervention
8 avril 2016
28 déc. 2013 à 19:40
28 déc. 2013 à 19:40
Oui oui j'ai bien effectué ça, mais dès que je clique sur ta case où il y a la date, j'ai Visual Basic qui s'ouvre avec un message d'erreur!
"Erreur de compilation
Projet ou bibliothèque introuvable"
"Erreur de compilation
Projet ou bibliothèque introuvable"
via55
Messages postés
14501
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
28 novembre 2024
2 735
28 déc. 2013 à 19:50
28 déc. 2013 à 19:50
Et quand tu fais touches Alt et F11 le code s'affiche ?
soah44
Messages postés
40
Date d'inscription
mardi 19 novembre 2013
Statut
Membre
Dernière intervention
8 avril 2016
28 déc. 2013 à 19:59
28 déc. 2013 à 19:59
oui!
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
eriiic
Messages postés
24601
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
25 novembre 2024
7 244
28 déc. 2013 à 19:48
28 déc. 2013 à 19:48
Bonjour à tous.
Pour la proposition de via ça dépend de la version d'excel. Si ça ne marche pas du 1er coup c'est une bagarre sans fin.
La proposition de J. Boigontier doit fonctionner sur toutes les versions puisqu'il a construit le calendrier..
Si tu as accepté les macros, son fichier exemple doit fonctionner chez toi.
N'oublie pas de donner ta version excel à chaque question. Dans certains cas c'est primordial.
eric
Pour la proposition de via ça dépend de la version d'excel. Si ça ne marche pas du 1er coup c'est une bagarre sans fin.
La proposition de J. Boigontier doit fonctionner sur toutes les versions puisqu'il a construit le calendrier..
Si tu as accepté les macros, son fichier exemple doit fonctionner chez toi.
N'oublie pas de donner ta version excel à chaque question. Dans certains cas c'est primordial.
eric
soah44
Messages postés
40
Date d'inscription
mardi 19 novembre 2013
Statut
Membre
Dernière intervention
8 avril 2016
28 déc. 2013 à 19:58
28 déc. 2013 à 19:58
Bonsoir eriiic,
Une fois tout importé tout le texte je l'écris dans n'importe quelle feuille? Et après comment j'affecte ça à une cellule? comme on a pas donné de nom à la macro! (Peut être pas necessaire?!
D'accord pour la version moi c'est 2007!
Une fois tout importé tout le texte je l'écris dans n'importe quelle feuille? Et après comment j'affecte ça à une cellule? comme on a pas donné de nom à la macro! (Peut être pas necessaire?!
D'accord pour la version moi c'est 2007!
eriiic
Messages postés
24601
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
25 novembre 2024
7 244
Modifié par eriiic le 28/12/2013 à 20:12
Modifié par eriiic le 28/12/2013 à 20:12
Soit précis, on ne sait pas de quelle proposition tu parles...
Si c'est celle de JB tu vas dans VBE et tu fais tout à l'identique.
Tu fais un cliqué-glissé du UserForm F_calendrier1dateTableur dans ton classeur pour le copier.
Dans la (les) module feuille qui t'intéressent, copier-colle le code 'Private Sub Worksheet_BeforeDoubleClick' du module Feuil89.
Puis tu adaptes cette ligne à ton besoin :
If Target.Address = "$B$4" Then
eric
Si c'est celle de JB tu vas dans VBE et tu fais tout à l'identique.
Tu fais un cliqué-glissé du UserForm F_calendrier1dateTableur dans ton classeur pour le copier.
Dans la (les) module feuille qui t'intéressent, copier-colle le code 'Private Sub Worksheet_BeforeDoubleClick' du module Feuil89.
Puis tu adaptes cette ligne à ton besoin :
If Target.Address = "$B$4" Then
eric
via55
Messages postés
14501
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
28 novembre 2024
2 735
28 déc. 2013 à 20:12
28 déc. 2013 à 20:12
Moi aussi 2007
Mon fichier devrait fonctionner chez toi !
Si tu bâtis ton propre fichier , il faut d'abord dans la feuille où tu veux le calendrier inserer le calendrier selon les explications que je t'ai donné dans mon fichier (Onglet Developpeur, Inserer, Autres controles, Controle Calendrier
Après tu fais Alt F11 pour ouvrir l'éditeur, dans l'arborescence à gauche tu choisis la bonne feuille
et dans la fenetre de droite de l'editeur tu colles ces deux macros :
Private Sub Calendar1_Click()
' Met la date sélectionnée dans la cellule active
ActiveCell.Value = Calendar1.Value
' Masque le calendrier
Calendar1.Visible = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 4 And Target.Row = 2 Then
' Si la cellule sélectionnée est D2on affiche le calendrier à côté de la cellule
Calendar1.Visible = True
Calendar1.Top = ActiveCell.Top
Calendar1.Left = ActiveCell.Left + ActiveCell.Width
Else
' Sinon, on masque le calendrier
Calendar1.Visible = False
End If
End Sub
La cellule affectée à la macro est la cellule en colonne 4 et ligne 2 (Target.Column = 4 And Target.Row = 2) donc D4, si tu veux affecter à une autre cellule il suffit de changer les nombres 4 et dans la macro
Cdlmnt
Mon fichier devrait fonctionner chez toi !
Si tu bâtis ton propre fichier , il faut d'abord dans la feuille où tu veux le calendrier inserer le calendrier selon les explications que je t'ai donné dans mon fichier (Onglet Developpeur, Inserer, Autres controles, Controle Calendrier
Après tu fais Alt F11 pour ouvrir l'éditeur, dans l'arborescence à gauche tu choisis la bonne feuille
et dans la fenetre de droite de l'editeur tu colles ces deux macros :
Private Sub Calendar1_Click()
' Met la date sélectionnée dans la cellule active
ActiveCell.Value = Calendar1.Value
' Masque le calendrier
Calendar1.Visible = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 4 And Target.Row = 2 Then
' Si la cellule sélectionnée est D2on affiche le calendrier à côté de la cellule
Calendar1.Visible = True
Calendar1.Top = ActiveCell.Top
Calendar1.Left = ActiveCell.Left + ActiveCell.Width
Else
' Sinon, on masque le calendrier
Calendar1.Visible = False
End If
End Sub
La cellule affectée à la macro est la cellule en colonne 4 et ligne 2 (Target.Column = 4 And Target.Row = 2) donc D4, si tu veux affecter à une autre cellule il suffit de changer les nombres 4 et dans la macro
Cdlmnt
soah44
Messages postés
40
Date d'inscription
mardi 19 novembre 2013
Statut
Membre
Dernière intervention
8 avril 2016
28 déc. 2013 à 20:23
28 déc. 2013 à 20:23
Ça à marché! Sans aller dans développeur... En utilisant le fichier de via55!
J'ai copié exactement les mêmes écritures. Par contre il me reste à comprendre ce que tout ça veut dire!
J'ai copié exactement les mêmes écritures. Par contre il me reste à comprendre ce que tout ça veut dire!
soah44
Messages postés
40
Date d'inscription
mardi 19 novembre 2013
Statut
Membre
Dernière intervention
8 avril 2016
28 déc. 2013 à 20:05
28 déc. 2013 à 20:05
C'est tout bon!!!
C'est juste que je prend pas le temps de lire!! Ça fonctionne super bien!
Je vous remercie tout les trois d'avoir répondu à mes questions!!
A très vite surement!
C'est juste que je prend pas le temps de lire!! Ça fonctionne super bien!
Je vous remercie tout les trois d'avoir répondu à mes questions!!
A très vite surement!