///
Analise o código a seguir no contexto do MS Excel/VBA.
Function XPTO(a As Integer, _
b As Integer) As XXX
Set XPTO = ActiveSheet.Cells(a, b)
End Function
Sub TESTE()
Call MsgBox(XPTO(4, 1).Value)
End SubPara que a procedure TESTE seja compilada e executada corretamente, “XXX” deve ser substituído pelo tipo: