Liste déroulante

[Môgan]

Salut à tous,

J'aimerais créer une liste déroulante dans une cellule avec une liste de prénoms (jusque là pas trop de soucis).

Mais je voudrais pouvoir piocher un prénom dans cette liste déroulante et avec un glisser deplacer le copier dans une cellule de mon choix sur la même feuille ( sans que ma liste ne soit modifiée). Comment faire ?


a+
Môgan

 

[frederic]

salut

as-tu regarde cette fonction :

BeforeDragOver Event

desole mais j'ai une version anglaise donc pas plus d'info....


Bon courrage


Fred

 

[Môgan]

Je suis un néophite complet des programmations , macros etc...

Pourrais tu m'expliquer ?

 

[frederic]

re :

ci-joint ce que j'ai trouve : entre parethese tu y mets tes options pour ton cas "effect"

Private Sub object_BeforeDragOver( ByVal Cancel As MSForms.ReturnBoolean, ByVal Data As DataObject, ByVal X As Single, ByVal Y As Single, ByVal DragState As fmDragState, ByVal Effect As MSForms.ReturnEffect, ByVal Shift As fmShiftState)

ci apres explication de "effect" avec ces arguments

Lorsqu'un contrôle gère cet événement, vous pouvez utiliser l'argument Effect afin d'identifier l'action glisser-déplacer à effectuer. Lorsque Effect est défini sur fmDropEffectCopyOrMove, la source accepte les opérations de copie (fmDropEffectCopy), de déplacement (fmDropEffectMove) et d'annulation (fmDropEffectNone).

Attention :

La plupart des contrôles ne prennent pas en charge l'opération de glisser-déplacer si Cancel a la valeur False (par défaut). Cela signifie que le contrôle rejette toute tentative de glisser-déplacer sur le contrôle, et il ne déclenche pas l'événement BeforeDropOrPaste. Deux exceptions à cette règle : les contrôles TextBox et ComboBox qui supportent l'opération de glisser-déplacer même si Cancel a la valeur False.

Good luck

Fred