Meu código está exatamente como o indicado pelo professor na resolução, porém não está funcionando. Retorna como "#NAME".
Identifiquei que quando insiro "MsgBox carro.value" ao inserir o ponto, ele não abre a caixa de opções para selecionar o .Value
O que estou fazendo de errado?
Olá Vinícius, tudo bem? Espero que sim!
O código final deve estar da seguinte forma para que funcione corretamente:
Function ListaCarros(pIntervalo As Range) As Variant
For Each carro In pIntervalo
MsgBox carro.Value
Next
End FunctionColoque os valores de A1:A5 no Excel:
| Ford Ka |
| HB20 |
| Sandero |
| Logan |
| Land Rover |
E coloque a fórmula =ListaCarros(A1:A5) na célula B1.
Qualquer dúvida estou à disposição para ajudar.
Bons estudos!
Comigo ocorreu o mesmo erro, porém conforme a resposta acima, era um erro no momento de definir o tipo de campo...