Ao invés do quantitativo de gêneros de filmes serem exibidos numa caixa de dialogo, eu poderia colocar numa celula?
Você está vendo a versão anterior da nova experiência da Alura que estamos preparando para você. Em breve, ela ganha uma identidade visual novinha totalmente pensada em potencializar seus estudos!
Ao invés do quantitativo de gêneros de filmes serem exibidos numa caixa de dialogo, eu poderia colocar numa celula?
Oi Marcio, tudo bom?
Poderia sim, basta que no fim do seu laço de repetição, ao invés de exibir uma caixa de menssagem:
For Each genero in RangE(“H5:H8”)
If genero = info_genero then
Tot = tot + 1
Endif
Next
Msgbox “Total de Filmes de “ & info_genero & “ = “ & tot
Você insira o valor em alguma celular =)
Algo como:
Activeworkbook.Sheets("SuaPlanilha").Range("A1").value = “Total de Filmes de “ & info_genero & “ = “ & tot
Abraço.