- 26 Out 2018 às 14:27
#38135
Boa tarde,
Quero gerar um código para atribuir uma Macro existente à um objeto.
Ao gravar Macro para tentar encontrar o código correspondente, dá no seguinte resultado:
Sub Macro2()
ActiveSheet.Shapes.Range(Array("Rounded Rectangle 16")).Select
Selection.OnAction = "Planilha1.Sortear"
End Sub
Entretanto, ao tentar rodar esta Macro, a mesma não funciona.
Alguém sabe o código correto?
Quero gerar um código para atribuir uma Macro existente à um objeto.
Ao gravar Macro para tentar encontrar o código correspondente, dá no seguinte resultado:
Sub Macro2()
ActiveSheet.Shapes.Range(Array("Rounded Rectangle 16")).Select
Selection.OnAction = "Planilha1.Sortear"
End Sub
Entretanto, ao tentar rodar esta Macro, a mesma não funciona.
Alguém sabe o código correto?