Forums XLPages

Tous les messages (Titigre)

Re: Attendre le choix de la date avec mdfXLCalendar avant de continuer le code
#1
Titigre
Débutant XLPages

Inscription: 26/04/2012

Messages: 3

Système d'exploitation:
PC
Version Excel utilisée:
2007,2010
Posté le : 27-04-2012 08h48
Ok

Merci pour la réponse !!!
Hors Ligne
 Rapport   Haut 

Re: Attendre le choix de la date avec mdfXLCalendar avant de continuer le code
#2
Titigre
Débutant XLPages

Inscription: 26/04/2012

Messages: 3

Système d'exploitation:
PC
Version Excel utilisée:
2007,2010
Posté le : 26-04-2012 22h36
En attendant j'ai contourné mon probleme ..... avec le clic droit :)

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

      If JeSuisSurLaBonneCelule then
            cancel = true 'Evite l'affichage du menu contextuel
            mDFXLcalShow
      End if
End sub

 


voilou

Edité par Titigre le 27/04/2012 08:45:55
Hors Ligne
 Rapport   Haut 

Attendre le choix de la date avec mdfXLCalendar avant de continuer le code
#3
Titigre
Débutant XLPages

Inscription: 26/04/2012

Messages: 3

Système d'exploitation:
PC
Version Excel utilisée:
2007,2010
Posté le : 26-04-2012 22h24
Bonjour,

Je souhaiterais savoir si on peut mettre en attente un code tant que l'utilisateur n'a pas cliqué sur la date qu'il a choisi (ce que fait le code normalement quand on ouvre une fenetre modale).

Voilà, je travaille sous excel 2007 / 2010 (suivant le poste ou sera installée mon appli)

J'ai un classeur où, avec du vba, je créé des feuilles.

dans l'objet thisWorkBook, j'utilise la fonction suivante  pour savoir sur quelle feuille et dans quelle cellule je double clique.
Selon la cellule j'affiche le calendrier pour choisir une date.

voici le code avec ce que j'aimerai qu'il me fasse :

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
     
      [...]
      ' Vérifie que c'est une cellule où j'ai besoin d'une date
      if target.address = BesoinDate then
            mDFXLcalShow
            'Là j'ai besoin qu'il fasse une pose j'usqu'à ce que l'utilisateur choisisse la date et que le calendrier se ferme.
      end if

end sub
 


Merci d'avance si vous comprenez et que vous pouvez m'aider :)
            

Edité par Titigre le 27/04/2012 08:45:21
Hors Ligne
 Rapport   Haut