VBA Select Case - Como Criar Comparações Eficientes no VBA

[@HashtagTreinamentos]

Fala galera! Se você gostou do vídeo deixa sua curtida, se inscreve no canal e clica no sininho! CLIQUE AQUI PARA SABER MAIS SOBRE O CURSO COMPLETO VBA IMPRESSIONADOR: pages.hashtagtreinamentos.com/saiba-mais-yt-vba?origemurl=hashtag_yt_org_saibamaisvba_1_xD09260PI Para receber conteúdo diário de Excel, VBA e Power BI gratuitamente, entre em nosso grupo do Telegram: t.me/joinchat/AAAAAFVJr0C7Il-tVurdUw Clique para baixar a SÉRIE DE CONTROLE PARA EMPRESAS: excelparaestagio.klickpages.com.br/serie-controleempresas-vba?origemurl=hashtag_yt_org_seriecontroleempresas_ ► Arquivo(s) utilizado(s) no vídeo: pages.hashtagtreinamentos.com/arquivo-vba-1Jyu3y-o2BdRrNaVFUGmV1rhdOkb7mV0u?origemurl=hashtag_yt_org_planilhavba_1_xD09260PI ► Blog: bit.ly/2MRUZs0 ► KZbin: bit.ly/2O6A4RP ► Instagram: bit.ly/2F7B6t4 ► Facebook: bit.ly/2UA4SwY ► Telegram: t.me/joinchat/AAAAAFVJr0C7Il-tVurdUw ► Tik Tok: bit.ly/3dUpwkW TOP Vídeos: ► Como sair do ZERO no VBA em apenas UMA aula kzbin.info/www/bejne/iZLPoaBnr9hld68 ► Macros Excel VBA - Como criar uma Macro do Zero kzbin.info/www/bejne/q3OWhXWufahkr7M ► Como criar formulário no Excel - Criando Userform no VBA - 1/5 kzbin.info/www/bejne/eXm5aJ-ElLxnb7s ► VBA - O que é VBA? O que são Macros? kzbin.info/www/bejne/imaVkImLnMR0gbs ► Como criar formulário no Excel - Criando Userform no VBA - 2/5 kzbin.info/www/bejne/Y6auoq2ol6aonrc

[@patriciasoares2286]

VBA e Diego até o fim!!!!...TOP!!!!

[@videosdiversosdiversos]

Excelente aula, parabéns professor. obrigado

[@rafaelsochodolosch3097]

Para essa forma que você apresentou o select case fica mais organizado e visualmente melhor também do que fazer com if, else If e else.. excelente explicação, parabéns

[@JeffMach4do]

Sempre quis aprender sobre Excel e amei essa aula ❤️

[@magnodecastroesousa4857]

Chegamos ao final...

[@SirJuzeph]

Seria bom fazer um video sobre select case com intervalos... tpw... SELECT CASE case < 40 case 41 to 50 case 51 to 60 case else

[@MrAndremauricio]

Vlwzis Dieguito !!! top, mais aulas !!! sou aluno hashtag, aula 40 módulo 4.... segue meu codigo aiiii... Sub ddds() Dim sigla As String Dim linha As Integer Dim ult_linha As Integer Range("E2").ClearContents linha = 2 ult_linha = Range("B2").End(xlDown).Row uf = Range("E1").Value Do Until Cells(linha, 2) = "" Select Case uf Case 11 Range("E2").Value = "SP" Case 21 Range("E2").Value = "RJ" Case 71 Range("E2").Value = "BA" Case 92 Range("E2").Value = "AM" Case 31 Range("E2").Value = "MG" Case 41 Range("E2").Value = "PR" Case 27 Range("E2").Value = "ES" Case Else Range("E2").Value = "Sigla inválida" End Select linha = linha + 1 Loop End Sub