Buscar

VBA Letra

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Prévia do material em texto

Sub letras() 
Dim letra As String 
letra = InputBox("Digite letra") 
Do While letra <> "w" And letra <> "W" 
MsgBox (letra) 
letra = InputBox("Digite letra") 
Loop 
End Sub

Outros materiais