Olá, pessoal.

Como todos sabem, existe o modo de trazer imagens no Excel utilizando a câmera e a função indireto no gerenciador de nomes.

Só que, pelo VBA, eu queria criar vários nomes automaticamente.

Quero criar 15 'nomes' com nome de img1 até img15 de forma rápida.

Então, gravei uma macro só pra pegar a sintaxe criando um nome.

Criei o nome img e botei uma fórmula simples, ainda não coloquei a do indireto, só pra pegar a sintaxe mesmo.

ActiveWorkbook.Names.Add Name:="img", RefersToR1C1:="=Plan5!R1C1"

Então, essa fórmula cria um nome.

Só que, quero utilizar o "for" para criar 15 imagens de uma só vez, assim.

Sub img()

For i = 1 To 10

ActiveWorkbook.Names.Add Name:="img" & i, RefersToR1C1:="=Plan5!R1C1"
Next

End Sub

Ou seja, com o for quero que crie 15 nomes, mas quando coloco a variável i depois ele dá erro falando que o nome está inválido.

Como faço pra aplicar o for na criação de vários nomes de vez?

Obrigado.