Liste validation si clic sur cellules colonne H...

[Christian0258]

Bonjour à tout le forum,

Je souhaiterais votre aide à l'écriture d'une macro afin de résoudre mon problème...
Une partie de ma demande est indiquée dans le titre.

voir fichier joint avec les explications...

Merci pour le temps que vous voudrez bien vouloir m'accorder.

Bien amicalement,
Christian

 

[Christian0258]

Re, le forum, DoubleZero,

Merci, DoubleZero pour tout le boulot que tu m'as fait.

Dis-moi, dans l'ancien calendrier, il y avait une case positionnée sur 1, mais ou j'avais la possibilité de taper le nombre de fois ou il fallait dupliquer la date choisie, afin de ne pas avoir à refaire x fois la manoeuvre...peut-tu me dire si c'est faisable sur ton calendrier...

Bien à toi.
Encore merci,
Christian

 

[DoubleZero]

Re-bonjour,

Le calendrier est remplacé car je n'ai pas su 🙁 comment adapter l'initial. Je vais tenter, à nouveau...

A bientôt 🙂

 

[DoubleZero]

Re-bonjour,

Dans l'onglet "Saisies", remplacer le code par celui-ci :

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal c As Range, Cancel As Boolean)
    If c.Column = 8 And c.Row > 1 And c = "" And IsDate(c.Offset(, -3)) Then c.Name = "ici": Sheets("Base").Activate
    If c.Column = 5 Then Set Cel = c: Calendrier1.Show
    Cancel = True
End Sub

Est-ce correct ?

A bientôt 🙂

 

[Christian0258]

Re, le forum, DoubleZero,

J'ai placé ton nouveau code, mais ça plante sur : Cel

If c.Column = 5 Then Set Cel = c: Calendrier1.Show

message "Variable non définie"...

Merci pour ton aide, bien à toi.
Christian

 

[DoubleZero]

Re-bonjour,

... ça plante sur : Cel...

😵

C'est curieux ! Cf. le fichier joint.

A bientôt 🙂

 

[Christian0258]

Re, le forum, DoubleZero,

Ok, DoubleZero, c'est bon...

Merci infiniment pour ton aide.

Bien à toi.
Christian