problème calendrier autonome qui affiche seulement la date du jour et non les autres

[piga25]

Bonjour le forum
En ces moments de confinement, mes collègues mon fait part d'un petit bug sur une de mes applications que j'ai réalisé avec l'aide du Forum.
Aux fins de renseigner des dates dans des Userforms, j'utilise un calendrier autonome (Auteur Bru). Cela fonctionne très bien quand c'est la date du jour, cela renseigne bien au bon endroit. Par contre si je veux utiliser, par exemple une autre date que celle du jour, cela ne fonctionne pas, cela me renvoi toujours la date du jour.
Ex: Sur la feuille accueil après avoir cliqué sur le bouton Evènement, puis sur l'icone Explosif (Correspond à l'userform7 et au TexteBox 1, 7 et suivants), Dans cet Userform7, j'ai bien la bonne date choisie, mais lorsque cela me la copie sur la Feuille BD Tir, cela me mets systématiquement la date du jour.

Si vous pouvez me dire ou se trouve l'erreur, je pourrai modifier les codes pour les autres Userforms concernés.

En vous remerciant
Cordialement PIGA25

 

[piga25]

Bonsoir
J'ai seulement le problème sur l'userform6
Bouton évenement, icone location, textbox pour les dates

'====================================
'Pour choisir la date dans textbox
'=====================================
'Private Sub TextBox19_Change()
'TextBox18.Value = Format(TextBox18.Value, "dd/mm/yyyy")
'If TextBox19 = "" Then
'TextBox18.Value = ""
'End If
'End Sub
Private Sub TextBox18_Enter()
TextBox18 = Calendar.ShowX(TextBox1, 2, 0, 1)
MsgBox Calendar.ShowTopLeft(155, 230, 2)
End Sub
'Private Sub Textbox5_change()
'TextBox4.Value = Format(TextBox4.Value, "dd/mm/yyyy")
'If TextBox5 = "" Then
'TextBox4.Value = ""
'End If
'End Sub
Private Sub TextBox4_Enter()
TextBox4 = Calendar.ShowX(TextBox1, 2, 0, 1)
MsgBox Calendar.ShowTopLeft(155, 230, 2)
End Sub

 

[patricktoulon]

re
regarde ce que tu fait un peu ça ira mieux après

TextBox18 = Calendar.ShowX(TextBox1, 2, 0, 1)


TextBox4 = Calendar.ShowX(TextBox1, 2, 0, 1)

et pourquoi tu utilise les deux methode dans le meme event textbox???
c'est du grand n importe quoi

 

[Dranreb]

Avec mon calendrier ça ne risque pas d'arriver: à sa méthode Coupler on indique une seule fois la TexBox qui est à la fois celle en dessous de laquelle il doit se positionner et celle qu'il doit modifier !

 

[patricktoulon]

re
ben ça risque d'arriver seulement aux étourdis
faut le faire quand même y a pourtant des exemple
il y a une seule ligne de code a copier et adapter le nom du textbox et y en a qui passent encore a coté
c'est a ce demander pourquoi se décarcasser

Dranreb toi le TextBox4 = il est dans le userform c'est tout
toi c'est un applicatif
moi c'est un dialog modal qui renvoie une date ou ce qu'il y avait avant dans le textbox
et le mien mon compteur UC ne décolle pas

 

[piga25]

Bonsoir
Il me faut vraiment des lunettes. Comme quoi, il faut pratiquement tout relire à haute voix pour s'en rendre compte.
Désolé pour cette stupidité.
En tout cas merci à vous deux.

@Dranreb
Juste pour me familiariser avec ton calendrier, je vais le mettre également dans ce fichier, cela me permettra de progresser (sans faire le même style de bourde).
Pour info, nous sommes presque voisin.