Modif sur macro liste validation cascade dans cellule

tototiti2008

XLDnaute Barbatruc

• 24 Janvier 2011

• #2

Re : Modif sur macro liste validation cascade dans cellule

Bonjour Christian,

J'ai donné le nom Choix à la plage C2:C41

puis j'ai modifié le code de BOISGONTIER comme suit :

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Not Application.Intersect(Target, Range("Choix")) Is Nothing And Target.Count = 1 Then
     SendKeys "%{down}"
  End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Application.Intersect(Target, Range("Choix")) Is Nothing And Target.Count = 1 Then
     Set c = [choix1].Find(what:=Target.Value)
     If Not c Is Nothing Then SendKeys "%{down}"
  End If
End Sub

ça semble fonctionner

 

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 24 Janvier 2011

• #3

Re : Modif sur macro liste validation cascade dans cellule

Re le forum, tototiti2008,

Meri pour ta modif ça fonctionne parfaitement.
Dis-moi ; pourquoi sur un PC ça fonctionne et sur mon portable j'ai le message
permission refusée... puis débogage sur ; SendKeys "%{down}"

à te lire.
Bien à toi,
Christian

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 24 Janvier 2011

• #4

Re : Modif sur macro liste validation cascade dans cellule

Re,

Ton portable est un Mac ?

 

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 24 Janvier 2011

• #5

Re : Modif sur macro liste validation cascade dans cellule

Re, le forum, tototiti2008?

Non, mais je ne sais pas ce qui se passe mais, sur mon portable, dans excel, les touches minuscule/MAJUSCULE sont inversées??? alors que sur ce message c'est ok...

Truc du fou ?

à te lire,
Christian

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 25 Janvier 2011

• #6

Re : Modif sur macro liste validation cascade dans cellule

Bonjour Christian,

Pas d'idée.. un virus ?

 

Vote positif 0 Vote négatif