Sub Test_Exe()
' Execute an exe file attached in sheet1
'
ActiveSheet.Shapes.Range(Array("Object 1")).Select
Selection.Verb Verb:=xlPrimary
End Sub
' Execute an exe file attached in sheet1
'
ActiveSheet.Shapes.Range(Array("Object 1")).Select
Selection.Verb Verb:=xlPrimary
End Sub
Views 1,188
Downloads 217
CodeID
DB ID
ANmarAmdeen
610
Revisions
v1.0
Friday
April
16
2021