1
resposta

resposta

Sub cadastro()
    Range("a1048576").Select
    ActiveCell.End(xlUp).Select
    ActiveCell.Offset(1, 0).Select
    ActiveCell.Offset(0, 1).Value = InputBox("Convidado")
    ActiveCell.Offset(0, 2).Value = InputBox("Email")

End Sub
1 resposta

Oi Barbara tudo bem?

É isso mesmo!!! Continue assim e bons estudos!!!

Quer mergulhar em tecnologia e aprendizagem?

Receba a newsletter que o nosso CEO escreve pessoalmente, com insights do mercado de trabalho, ciência e desenvolvimento de software