VBA有没有途径可以实现把字符串, 当代码运行?

readmi

需求就是合理,何况别人提出的是提高编程通用性更高级的更灵活要求,你没那个能力不要随便反驳别人的要求.
下面是网上找的供参考:
Sub StringExecute(s As String)
    Dim vbComp As Object
    Set vbComp = ThisWorkbook.VBProject.VBComponents.Add(1)
    vbComp.CodeModule.AddFromString "Sub foo()" & vbCrLf & s & vbCrLf & "End Sub"
    Application.Run vbComp.name & ".foo"
    ThisWorkbook.VBProject.VBComponents.Remove vbComp
End Sub

Sub Testing()
    StringExecute "MsgBox" & """" & "Job Done!" & """"
End Sub

jsdjt

看到回复中有好多自以为是的大神。不管这个问题的用途什么，至少这是一个问题。我刚刚也在研究这个，找到一个链接，你可以看看。https://tieba.baidu.com/p/218411054

jsdjt

readmi 发表于 2020-12-25 15:49
需求就是合理,何况别人提出的是提高编程通用性更高级的更灵活要求,你没那个能力不要随便反驳别人的要求.
...

请允许我对你的敬仰！！