Exécuter du texte ? [Urgent]

  • Initiateur de la discussion Initiateur de la discussion SHA
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S

SHA

Guest
Bonjour,

Y a-t-il un moyen de faire s'exécuter une variable ?
Commande = "Call Essai"
execute Commande

Merci de toute suggestion,

JJ
 
Re : Exécuter du texte ? [Urgent]

Salut JJ,

Je ne vois pas trop comment tu peux faire executer une variable, en revanche, tu peux faire executer une macro ou une fonction et tu peux faire appel a une variable.

Peut etre que quelqu'un d'autre t'apportera une réponse différente, on ne sais jamais, ici il y a beaucoup de membres balèze...

@+
 
Re : Exécuter du texte ? [Urgent]

Bonjour SHA, Porcinet82,

Pas sûr d'avoir tout compris... mais au cas où :
Code:
[SIZE=2]Sub test()
[COLOR=navy]Dim [/COLOR]Commande[COLOR=navy] As String[/COLOR]
      Commande = "MaMacro"
      [B]Application.Run[/B] Commande
[COLOR=navy]End Sub[/COLOR]

[COLOR=navy]Sub[/COLOR] MaMacro()
      MsgBox "On ne met jamais ""URGENT"" dans les titres de sujet !" & VbLf &  "Merci de lire la Charte"
[COLOR=navy]End[/COLOR] Sub[/SIZE]
Cordialement,
 
Dernière édition:
Re : Exécuter du texte ? [Urgent]

...
Sub test()
Commande = "MaMacro"
Application.Run Commande]



Oooops,

Ceci marche si Commande = "MaMacro" ,
mais je souhaite que
Commande = "Cette instruction"
Dans le cas précis :
Commande = "SpinButtonP1.Value = " & Str(Int(Range("SimulationAugmentationP1") * 100))

Et là j'ai une erreur d'exécution 1004 : Impossible de trouver la macro 'SpinButtonP1.Value = 120'

😕

Je suis au désespoir ! ! !
 
Dernière modification par un modérateur:
Re : Exécuter du texte ? [Urgent]

rebonsoir

je n'ai rien compris à ton dernier message !

à tout hasard tu peux essayer

Code:
Dim sVar As String
sVar = "SpinButtonP1"
Me.Controls( sVar ).Value = _
Str(Int(Range("SimulationAugmentationP1") * 100))


bonne soiree
MichelXld
 
Dernière édition:
Re : Exécuter du texte ? [Urgent]

Désolé, j'ai omis une ligne, ce que je voudrais c'est :

Commande = "SpinButtonP1.Value = " & Str(Int(Range("SimulationAugmentationP1") * 100))
Application.Run Commande

et que le Application.Run Commande fonctionne.

Ce qui n'est pas le cas...
et ne l'est pas davantage avec ceci :

commande = "Beep"
Application.Run commande


Y a-t-il un moyen ?
 
Dernière modification par un modérateur:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
5
Affichages
481
Réponses
43
Affichages
813
Réponses
16
Affichages
505
Réponses
37
Affichages
1 K
  • Question Question
Microsoft 365 agrandir la liste
Réponses
21
Affichages
663
Retour