[XL-2003] Activation d'un menu déroulant

[Claude_B]

Bonjour,

Je cherche une manière de programmer en VBA pour excel de sélectionner dans tous mes menus déroullants le même item.

Exemple, dans les cellules A1, B1, C1 & D1 j'ai les items suivants. rouge, bleu, vert. Je voudrait par l'activation d'une macro sélectionner le rouge dans les cellules A1, B1, C1 & D1 et cela tous en même temps. Autrement dit, par l'activation de la macro je sélectionne le rouge dans mes 4 cellules. Ne pas oublier que mes 4 cellules sont des menus déroullants.

Merci à l'avance

[Daniel.C]

Bonjour,

Code :

1
2
3
Sub test1()
[A1:D1] = "rouge"
End Sub

[Claude_B]

Bonjour Daniel,

Cela ne marche pas de mon côté. Voici ce que j'ai fait.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
Private sub Commandbutton2_Click()
 
Call menu
 
End sub
 
 
 
Sub menu()
 
(A10:C10)=''rouge''
 
End sub

Le système m'envois une erreure de syntaxe

Je ne veux pas seulement écrire rouge dans les cellules, mais que le mot rouge soit sélectionné dans le menu déroullant des 3 cellules après que j'ais appuyé sur le bouton.

[Claude_B]

Bonjour tout le monde,
J'ai réglé mon problème.
Daniel ton code est bon. Il ne manquait que les guillemets.

Merci

PS pourquoi vous demandé de baliser, et comment faite vous pour baliser. est-ce que c'est dans excel? ou dans un autre programme?

[Daniel.C]

PS pourquoi vous demandé de baliser, et comment faite vous pour baliser. est-ce que c'est dans excel? ou dans un autre programme?

Bonjour,

Par souci de clarté, et pour éviter que, si tu écris par exemple :

Code :

;)

dans le code, ce soit transformé en smiley par exemple. De plus, les strings sont coloriés, ce qui fait que le code est plus lisible. Il suffit de sélectionner les lignes de code et de cliquer sur l'icône dièse (#).