XL 2010 [RESOLU] Utilisation Calendrier Autonome via Textbox

cp4

XLDnaute Barbatruc
Bonjour,

Suite à une discussion, je sollicite votre aide.
Une membre à joint un fichier avec un calendrier autonome, sur une feuille le code fonctionne.
Dans le code il y a une procédure pour l'utiliser via un userform.
N'ayant pas réussi, je lui ai proposé le calendrier de PatrickToulon (customisé à mon goût).
J'ai eu beau "trituré" des bouts de code sans succès. Je suis persuadé que c'est très simple si on comprends le fonctionnement du code.
Je sèche complétement, merci pour votre aide.

Bonne journée.
 

Pièces jointes

  • Calendrier.xlsm
    57.3 KB · Affichages: 15
Solution
Bonjour,

Vous y êtes presque :

VB:
If TextBox1 = "" Then UFmCalenS.Coupler "titre", Me.TextBox1, 0, 1

Pas de TextBox1 =
Pas de parenthèses

Coupler est une méthode, pas une fonction. Coupler ne renvoie rien.

Cordialement

Hasco

XLDnaute Barbatruc
Repose en paix
Bonjour,

Vous y êtes presque :

VB:
If TextBox1 = "" Then UFmCalenS.Coupler "titre", Me.TextBox1, 0, 1

Pas de TextBox1 =
Pas de parenthèses

Coupler est une méthode, pas une fonction. Coupler ne renvoie rien.

Cordialement
 

cp4

XLDnaute Barbatruc
Bonjour,

Vous y êtes presque :

VB:
If TextBox1 = "" Then UFmCalenS.Coupler "titre", Me.TextBox1, 0, 1

Pas de TextBox1 =
Pas de parenthèses

Coupler est une méthode, pas une fonction. Coupler ne renvoie rien.

Cordialement
Bonjour Hasco;),
Y a pas photo, les connaissances et expériences font toutes la différences. C'est parfait pour moi.
Je m'inspirais du code pour la feuille et je mettais les paramètres entre parenthèses.
Du coup, aucune de mes combinaisons ne fonctionnaient.
Un grand merci à toi:cool:.

Bon après-midi.