Excel Downloads
Forum

Précédent   Excel Downloads Forums > Excel > Forum Excel


Réponse
 
LinkBack Outils de la discussion
Vieux 22/10/2006, 03h36   #1 (permalink)
XLDnaute Occasionel
 
Avatar de piwa
 
Date d'inscription: avril 2006
Version Excel : Excel 2003 (PC)
Messages: 138
Par défaut Lancer une Macro Differente en fonction d'une Valeur Cellule qui change

Bsr,

J'ai beau fouiller dans le forum..... et vu ma Nulité en VBA and Co.... je n'arrive pas à trouver comment lancer une macro differente en fonction du choix dans une liste deroulante.

J'arrive à faire changer une cellule de valeur en fonciton du click sur l'un de s choix (j'ai une cellule qui indique 1 si premier choix dans la liste , 2 pour le deuxieme etc...) ensuite j'associe le nom de la macro qui doit etre lancer en fonction de la valeur de la cellule precedente... mais comment la lancer de facon automatique ??



Merci d'avance
piwa est déconnecté   Réponse avec citation
ANNONCES
Vieux 22/10/2006, 04h33   #2 (permalink)
Mytå
Guest
 
Messages: n/a
Par défaut Re : Lancer une Macro Differente en fonction d'une Valeur Cellule qui change

Salut Piwa et le forum

Piwa attention tu double tes questions la http://www.excel-downloads.com/forum...eroulante.html

Ta liste déroulante en B3 le code

Code PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
If 
Not Application.Intersect(TargetRange("B3")) Is Nothing Then
Select 
Case Target.Value
Case 1
'Call Macro1
Case 2
'
Call Macro2
Case 3
Call macro3
Case Else
Exit 
Sub
End Select
End 
If
End Sub 
Mytå
  Réponse avec citation
Vieux 22/10/2006, 12h23   #3 (permalink)
XLDnaute Occasionel
 
Avatar de piwa
 
Date d'inscription: avril 2006
Version Excel : Excel 2003 (PC)
Messages: 138
Par défaut Re : Lancer une Macro Differente en fonction d'une Valeur Cellule qui change

Citation:
Envoyé par Mytå
Salut Piwa et le forum

Piwa attention tu double tes questions la http://www.excel-downloads.com/forum...eroulante.html

Ta liste déroulante en B3 le code

Code PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
If 
Not Application.Intersect(TargetRange("B3")) Is Nothing Then
Select 
Case Target.Value
Case 1
'Call Macro1
Case 2
'
Call Macro2
Case 3
Call macro3
Case Else
Exit 
Sub
End Select
End 
If
End Sub 
Mytå
Merci et desolé pour le Doublon.......

Alors Ca fonctionne uniquement quand je change la valeur manuellement. en fait j'ai une liste deroulante qui me genere un code dans une cellule lié en K2 par exemple. Si je selectionne dans ma liste la valeur change dans la cellule lié mais la procedure ne demarre pas ... par contre si je change la valeur manuellement c'est ok ?????

De plus j'ai une liste de 20 choix ..... donc ma cellule lié prend les valeurs 1 à 20 , avec la fonctione RechercheV et une table je detemrine en fonction du resultat le nom de la macro à lancer..... et je voudrai que dans la procedure j'aille cercher le nom de la macro à lancer (emplacement L2 pour le nom d ela macro).

Merci de votre Aide
piwa est déconnecté   Réponse avec citation
Vieux 22/10/2006, 20h53   #4 (permalink)
XLDnaute Occasionel
 
Avatar de piwa
 
Date d'inscription: avril 2006
Version Excel : Excel 2003 (PC)
Messages: 138
Par défaut Re : Lancer une Macro Differente en fonction d'une Valeur Cellule qui change

Je relance la question pour voir.....

Merci
piwa est déconnecté   Réponse avec citation
ANNONCES
Réponse

Liens sociaux

Outils de la discussion

Règles de messages
Vous ne pouvez pas créer de nouvelles discussions
Vous ne pouvez pas envoyer des réponses
Vous ne pouvez pas envoyer des pièces jointes
Vous ne pouvez pas modifier vos messages

Les balises BB sont activées : oui
Les smileys sont activés : oui
La balise [IMG] est activée : oui
Le code HTML peut être employé : non
Trackbacks are oui
Pingbacks are oui
Refbacks are oui

Discussions similaires
Discussion Auteur Forum Réponses Dernier message
Lancer une Macro Differente en fonction du choix dans une liste deroulante piwa Forum Excel 1 22/10/2006 04h36
execution macro qd la valeur d'une cellule change ben Forum Excel 9 19/06/2006 10h19
lancer une macro suivant valeur d'une cellule wachoo31 Forum Excel 8 04/04/2005 10h21
lancer une macro si une valeur change nono Forum Excel Downloads - Archives 2 15/06/2004 18h36
Lancer une macro en fonction des résultats d'une cellule Albert Einstein Forum Excel Downloads - Archives 3 13/09/2003 17h55


Fuseau horaire GMT +2. Il est actuellement 12h01.


(C) 2006 Excel Downloads