XL 2010 Afficahcage d'un Calendrier dans une cellule

Eric C

XLDnaute Barbatruc

• 8 Septembre 2019

• #2

IciBonjour le forum
Bonjour noel33

Tu as un sujet similaire Ici

Bon dimanche à toutes & à tous
@+ Eric c

 

Vote positif 0 Vote négatif

N

noel33

XLDnaute Occasionnel

• 8 Septembre 2019

• #3

Bonjour Eric, merci mais il est bien trop compliqué ... je n'ai besoin que de la date de ce type : 01/01/2019..

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 8 Septembre 2019

• #4

Bonjour,

voir avec ceci !
Pour toi, noel33, tu laisses tout par défaut tel quel !
les explications pour adapter certaines conditions sont pour des utilisateurs avertis !

 

Pièces jointes

• CalendrierAutonome_RolM_9_Cell.xlsm

  94.4 KB · Affichages: 23

Vote positif 0 Vote négatif

N

noel33

XLDnaute Occasionnel

• 8 Septembre 2019

• #5

Extra, merci!

N.

 

Vote positif 0 Vote négatif

N

noel33

XLDnaute Occasionnel

• 8 Septembre 2019

• #6

Roland_M à dit:

Bonjour,

voir avec ceci !
Pour toi, noel33, tu laisses tout par défaut tel quel !
les explications pour adapter certaines conditions sont pour des utilisateurs avertis !

Cliquez pour agrandir...

En fait, le problème, c'est que j'aimerai que ce ne soit possible que sur certaines cellules, je ne vois pas dans la macro la selection...

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 8 Septembre 2019

• #7

re

j'y regarde après le repas !
en attendant peux tu déjà donner
sur quelle feuille(son nom) ? (ce n'est pas obligé !)
sur quelles cellules ?

 

Dernière édition: 8 Septembre 2019

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 8 Septembre 2019

• #8

re

en attendant ta réponse, dans:
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

'1' test feuille ok saisie
'If Sh.Name <> "Feuil1" Then Exit Sub '< à toi de voir pour le nom
'2' test cellules ok saisie 'exp colA ColC cells Cells Cell
' If Intersect(Target, Range("A:A, C:C , B1: B12, D4: 10, E20")) Is Nothing Then Exit sub

.
' voir aussi des exemples ici: https://forum.excel-pratique.com/viewtopic.php?t=1314

 

Dernière édition: 8 Septembre 2019

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 8 Septembre 2019

• #9

bonjour
eventuellement voir ici

collection fausse boite de dialogue (Patricktoulon) episode 1 Le calendrier Modal

patricktoulon a posté une nouvelle ressource : collection fausse boite de dialogue (Patricktoulon) episode 1 un vrai faux calendrier - un calendrier valable pour tout version excel Bonjour a tous voici ma dernière version de mon calendrier all excel version utilisable pour les cells et les...

www.excel-downloads.com

 

Vote positif 0 Vote négatif

N

noel33

XLDnaute Occasionnel

• 8 Septembre 2019

• #10

Roland_M à dit:

re

en attendant ta réponse, dans:
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

'1' test feuille ok saisie
'If Sh <> Sheets("Feuil1") Then Exit Sub '< à toi de voir pour le nom
'2' test cellules ok saisie 'exp colA ColC cells Cells Cell
' If Not Intersect(Target, Range("A:A, C:C , B1: B12, D4: 10, E20")) Is Nothing Then ok suite ...
'. . .
'End If
' .
.
' voir aussi des exemples ici: https://forum.excel-pratique.com/viewtopic.php?t=1314

Cliquez pour agrandir...

Ouf ça y est je suis perdu.... sur mon exemple cela serait pas exemple sur la feuille2, et pour L5 à L30 par exemple... j'ai besoin dans d'autre cellule de saisir des nombres, des textes etc...

 

Pièces jointes

• Copie de Test Calendrier.xlsm

  18.6 KB · Affichages: 7

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 8 Septembre 2019

• #11

re

je vais t'arranger ça, à tout de suite . . .

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 8 Septembre 2019

• #12

j'ai intégré mon calendrier dans ton fichier
au click droit sur cellule colonne "L"

 

Pièces jointes

• Copie de Test Calendrier V pat .xlsm

  49.3 KB · Affichages: 24

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 8 Septembre 2019

• #13

re

voici !
donc sur feuil2 de L5 à L30 !

 

Pièces jointes

• Copie de Test Calendrier.xlsm

  81 KB · Affichages: 32

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 8 Septembre 2019

• #14

il est beau ton calendrier Rolland

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 8 Septembre 2019

• #15

patricktoulon à dit:

il est beau ton calendrier Rolland

Cliquez pour agrandir...

tu sais que lorsque j'ai besoin d'aide, je suis tes réalisations ! merci encore !

comme par exemple, là ou tu cites:
"je reconnais certaine partie de mon point to px de base"

je vais d'ailleurs regarder à ta remarque !

 

Vote positif 0 Vote négatif