Função Do Until Loop - Como usar a estrutura de repetição Do Until no VBA?

Boa noite, meu amigo
Como eu faço para que q variável da última coluna volte para a primeira coluna e o da coluna 1 passe para a coluna 2 e da coluna 2 para a coluna 3 e sucessivamente.

Percebi que algumas estruturas são semelhantes a linguagem c++, legal. Aula ótima

agora gostei de usar o IF, com Do Until

Minha função não muda de cor como a sua, e o excel não roda. Existe alguma configuração inicial no vba para ele entender minha função?

Parabéns, Deus abençoe.

Loop

Cara... esse video deu uma acelerada no meu VBA, valeu... mas um like para conta

Excelente, parabéns pelo trabalho.

um detalhe quando apaga a coluna da condição e deixa em branco as linhas, quando executa ele traz ver filme, como ficaria se estiver em branco?

super guerra! mesmo!

Eu queria saber só como repetir uma mesma coisa, ou numero na mesma coluna até onde eu demarcar

Ótimo vídeo. Tem algum vídeo que ensina a unificar o Loop mas buscando em abas diferentes?

Ensinou nada, só complicou

muito obrigado pela aula! Deus vos abençoe mais!

Se foi bichão mesmo 👏👏👏

Mais simples que isso, só dois disso hahahaha! Muito obrigado!

top, sempre ajudando muito

Ótimo vídeo. Ganhou mais um inscrito!

Obrigado meu amigo, estou costando muito dos videos, inclusive os de Power BI.

Me da uma ajuda? Utilizei o Until e a principio deu certo, mas tem uma parte do meu codigo que eu não sei resolver:

If Cells(linha, 86) <> "" Then


Cells(linha, 87) = Range([indirect("CH2")]).Select
Selection.Copy
Range("CI2").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True

Else
Cells(linha, 87) = "ERRADO" 'Não preciso de ELSE
End If

linha = linha + 1

Loop
End Sub

Como eu faço para que no mesmo loop a parte onde está ("CH2")]) e ("CI2") mude para próxima linha de forma que fiquem ("CH3")]) e ("CI3")? Obrigado

Abraço

Aula massa!

Muito bom cara. Só esse vídeo fez abrir a mente para várias possibilidades. vlw

Tenho uma célula, que gera número aleatório; e deve papar, quando for igual a 6); criando um loop. Como fazer?

Boa noite!
Eu gostaria de saber se dá para fazer o códico com duas condições?

Excelente conteúdo, parabéns!

Vídeo curto, rápido, mais altamente explicativo!

Eu tenho uma lista de arquivos em formato WSD (antigo formato do MS-DOS) que o Excel consegue abrir, e quero fazer um looping que abra esses arquivos um por um e exporte em formato CSV. Como faço?

Cara consegui sair do zero no VBA com esse vídeo, fiz um trabalho incrível!!! Muito obrigado pelo vídeo!

eu quero

TOP

Parabéns. Mais uma excelente aula. "Tamu Junto Hashtag"

o DO UNTIL desempenha a mesma função do WHILE? pq se formos analisar bem, os dois executam ordens até acontecer algo.

Muito obrigado cara, tava precisando de um código desses!

eu quero

show

Parabéns, ótimas suas aulas!

Como faço para identificar qual linha e coluna está selecionada?

Show.

Bom dia Joao, Parabens pelas aulas, aprendo muito com vc. Mas Estou precisando criar uma situação parecida com o apresentado. porem com 4 criterios. sem doque! tenho uma determinada data que será - (menos) a data de HJ, vai dar um numero se Date - Data <= 7 = "Aberta menos de 1 Semana", Date - Data > 7 <= 31 = "Aguardando mais 1 Semana", Date - Data > 31 <= 365 = "Aguardando mais de Meses", Date - Data > 365 = "Aguardando mais de 1 Ano". Fiz, pelo DoWhile , pelo Do Until, mas nao deu Certo. como posso fazer isso.

Parabéns!

Boa noite. Gosto muito das suas aulas, estou modificando algumas planilhas baseadas nas aulas do canal e me deparei com um erro usando esta formula e também com a formula While. A sintaxe é essa:

Sub macro_data()



linha = 3



Do Until Sheets(5).Cells(linha, 10) = " "



On Error GoTo erro

erro:

If Err Then

linha = linha + 1

Else

busca = Sheets(5).Cells(linha, 10)

macrodata = Plan4.Range("f:f").Find(busca).Row



Sheets(5).Cells(linha, 12).Value = Sheets(4).Cells(macrodata, 5).Value

Sheets(5).Cells(linha, 11).Value = Sheets(4).Cells(macrodata, 2).Value

linha = linha + 1

End If

Loop



End Sub

e quando faz a 4 verificação aparece o erro 91. não consegui sair disso.

Muito obrigado.

Ótimo Video João! me tira uma dúvida, se eu quiser criar uma rotina igual a essa, só que com datas, tipo se a data da coluna tal for menor do que hoje(), Enviar, caso contrário, não enviar, como Ficaria no vba?


Desde já Agradeço!

PARABENS PELA AULA!

Esse cara ensina muito bem

Obrigado por outro ótimo vídeo, João.