Discussion :

[herji]

Bonjour,

Voici mon problème : dans la cellule A2 je peux avoir l'une de ces deux chaines de caractères : "End" ou "UserForm1.hide"

Y-a-t-il un moyen pour exécuter le contenu cette cellule directement dans le code VBA, c-a-d, que la macro cherche le contenu de la cellule et l'exécute ?

Cordialement.

[fring]

Bonjour,

Code à placer dans un module

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub test()
Select Case LCase(Sheets("Feuil1").Range("A2"))
    Case "hide"
        MsgBox "coucou" '<-- à faire si hide
    Case "end"
        MsgBox "pouêêêt" '<-- à faire si end
End Select
End Sub

[helios77]

Personnellement, je ne suis pas sur que tu puisses le faire comme tu le penses

Par contre, tu pourrais faire ceci
Mettre 0 ou 1 dans la cellule A2 par exemple
Dans ton code faire :

Si A2=0 alors End
Si A2=1 alors Hide

Tu vois ce que je veux dire ?

Si jamais ce n'est pas possible de faire éxécuter du code comme cela, adopte ma solution....
Si c'est possible, je serais interessé par curiosité de savoir ....

[herji]

Je vous remercie pour vos réponses mais malheureusement elles ne répondent pas à ce que je voulais.

En effet, je souhaite exécuter la commande "End" sans écrire nul part le mot "End" dans le code VBA, pour cette raison j'ai pensé à mettre le mot dans une cellule et y faire appel !

J'espère trouver une solution. Merci pour votre aide.

[fring]

En effet, je souhaite exécuter la commande "End" sans écrire nul part le mot "End" dans le code VBA, pour cette raison j'ai pensé à mettre le mot dans une cellule et y faire appel !

euuh et pourquoi
Ce que tu veux faire n'est pas réalisable

[helios77]

tu devrais aussi essayer de faire un fichier qui répond à la pensée de l'utilisateur...
tu vas inventer un nouveau genre de code
BRAVO